home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1994 November: Tool Chest / Dev.CD Nov 94.toast / New System Software Extensions / Macintosh Drag and Drop 1.1.1 / Demo Applications / DragText Sources / utility.c < prev    next >
Encoding:
Text File  |  1992-03-01  |  407 b   |  34 lines  |  [TEXT/KAHL]
  1. /*
  2.  *
  3.  *        utility.c
  4.  *
  5.  *        Utility routines.
  6.  *        
  7.  *
  8.  *        Author:        Rob Johnston
  9.  *        Date:        Tuesday, January 14, 1992
  10.  *
  11.  *        Copyright © 1992 Apple Computer, Inc.
  12.  *
  13.  */
  14.  
  15.  
  16. /*
  17.  *    PStrCmp returns true if the two given pascal strings are equal.
  18.  */
  19.  
  20. short PStrCmp(char *s1, char *s2)
  21.  
  22. {    short        size, index;
  23.  
  24.     size = s1[0] + 1;
  25.  
  26.     while (size--) {
  27.         if (*(s1++) != *(s2++))
  28.             return(false);
  29.     }
  30.  
  31.     return(true);
  32. }
  33.  
  34.