Lines Matching refs:cp

216 	register const char*	cp = first;
226 while (c = *cp++)
230 str = (char*)--cp;
231 if (*cp=='0' && ((c=cp[1])==0 || c==' ' || c=='\t' || c==','))
237 if (cp[1]!='.' || (*cp!='1' && *cp!='2') || (c=strtol(cp+2,&str,10)) <=0)
244 if (*cp=='2')
255 cp = str;
260 if (!(cp= *argv) || cp[1]!='.' || (*cp!='1' && *cp!='2'))
262 if (*cp=='0' && cp[1]==0)
269 str = (char*)cp;
270 c = strtol(cp+2, &str,10);
275 if (*cp=='2')
301 register char* cp;
311 if (!(cp = sfgetr(fp->iop, '\n', 0)))
316 fp->recptr = cp;
320 field->beg = cp;
321 cp += fp->reclen;
322 field->end = cp - 1;
336 field->beg = cp;
339 switch (sp[*(unsigned char*)cp])
342 cp++;
345 tp = cp;
348 cp = tp;
359 switch (sp[*(unsigned char*)cp++])
364 tp = cp - 1;
367 cp = tp;
375 while (sp[*(unsigned char*)cp++]==S_SPACE);
376 cp--;
383 tp = cp;
384 switch (n = sp[*(unsigned char*)cp++])
389 cp--;
390 n = mbchar(cp);
409 while (!(n = sp[*(unsigned char*)cp++]));
410 field->end = cp - 1;
417 cp = fp->fields[n].beg;
424 switch (sp[*(unsigned char*)cp++])
429 tp = cp - 1;
432 cp = tp;
440 while (sp[*(unsigned char*)cp++]==S_SPACE);
441 cp--;
443 fp->fieldlen = fp->fields[n].end - cp;
444 return (unsigned char*)cp;
472 register char* cp;
480 cp = fp->fields[n].beg;
484 cp = 0;
487 if (cp && fp->spaces)
495 switch (sp[*(unsigned char*)cp++])
500 tp = cp - 1;
503 cp = tp;
511 while (sp[*(unsigned char*)cp++]==S_SPACE);
512 cp--;
520 if (cp)
521 size = cpmax - cp;
531 else if (sfwrite(iop, cp, size) < 0)
545 last = cp[size-1];
546 cp[size-1] = n;
547 if (sfwrite(iop, cp, size) < 0)
549 cp[size-1] = last;
829 register char* cp;
852 cp = argv[opt_info.index - 1];
853 for (n = strlen(cp) - 1; n > 0 && cp[n] != 'j'; n--);
854 n = cp[n] == 'j';
863 if (!(cp = argv[opt_info.index]))
868 opt_info.num = strtol(cp, &e, 10);
908 cp = opt_info.arg;
909 jp->delim = mbchar(cp);
910 if ((n = cp - opt_info.arg) > 1)
945 jp->file[0].name = cp = *argv++;
946 if (streq(cp,"-"))
951 error(ERROR_warn(0),"%s: seek may fail",cp);
957 else if (!(jp->file[0].iop = sfopen(NiL, cp, "r")))
960 error(ERROR_system(1),"%s: cannot open",cp);
962 jp->file[1].name = cp = *argv;
963 if (streq(cp,"-"))
968 error(ERROR_warn(0),"%s: seek may fail",cp);
974 else if (!(jp->file[1].iop = sfopen(NiL, cp, "r")))
977 error(ERROR_system(1),"%s: cannot open",cp);