pike.git/ src/ interpret.c

2014-09-03

2014-09-03 21:11:21 by Martin Nilsson <nilsson@opera.com>

• 5aa54c07851a1de7423dde250737182dd3465319 (9 lines) (+5/-4) ^{[ Show | Annotate ]}
  Branch: 8.0

strchr is C89 and 4.3BSD

887:    filep = get_line(Pike_fp->pc,Pike_fp->context->prog,&linep);    if (filep && !filep->size_shift) {    file = filep->str; -  while((f=STRCHR(file,'/'))) +  while((f=strchr(file,'/')))    file=f+1;    }    fprintf(stderr,"- %s:%4ld:%p(%"PRINTPTRDIFFT"d): "
1823:    file = "...";    else {    file = filep->str; -  while((f = STRCHR(file, '/')) +  while((f = strchr(file, '/'))   #ifdef __NT__ -  || (f = STRCHR(file, '\\')) +  || (f = strchr(file, '\\'))   #endif /* __NT__ */    )    file=f+1;
1908:    file = "...";    else {    file = filep->str; -  while((f=STRCHR(file,'/'))) +  while((f=strchr(file,'/')))    file=f+1;    }    }else{