home *** CD-ROM | disk | FTP | other *** search
/ GEMini Atari / GEMini_Atari_CD-ROM_Walnut_Creek_December_1993.iso / files / program / dlibsrc / substr.c < prev    next >
Encoding:
Text File  |  1988-10-05  |  652 b   |  36 lines
  1. char *substr(dest, source, start, end)
  2.     register char *dest, *source;
  3.     register int start, end;
  4.     {
  5.     register char *p = dest;
  6.     register int n;
  7.  
  8.     n = strlen(source);
  9.     if(start > n)
  10.         start = n - 1;
  11.     if(end > n)
  12.         end = n - 1;
  13.     source += start;
  14.     while(start++ <= end)
  15.         *p++ = *source++;
  16.     *p = '\0';
  17.     return(dest);
  18.     }
  19.  
  20. char *subnstr(dest, source, start, length)
  21.     register char *dest, *source;
  22.     register int start, length;
  23.     {
  24.     register char *p = dest;
  25.     register int n;
  26.  
  27.     n = strlen(source);
  28.     if(start > n)
  29.         start = n - 1;
  30.     source += start;
  31.     while(*source && (length--))
  32.         *p++ = *source++;
  33.     *p = '\0';
  34.     return(dest);
  35.     }
  36.