home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / PCTV3N3.ZIP / STRCINS.C < prev    next >
Encoding:
Text File  |  1992-04-09  |  298 b   |  12 lines
  1. /* strcins:
  2.    insert character c into string s at position p. */
  3.  
  4. void strcins(char *s, int p, char c)
  5. {
  6.    int n;
  7.  
  8.    for(n = strlen(s) - p; n >= 0; n--)
  9.       *(s+p+n+1) = *(s+p+n);      /* move everything over, */
  10.       *(s+p) = c;                 /* then insert the character */
  11. }
  12.