Lines Matching defs:str
224 char *str = (char*)*ptr;
242 register int c = *str;
243 register char *xp=str;
246 str++;
247 c = mbchar(str);
254 while(xp=str, c=mbchar(str), isaname(c));
255 str = xp;
258 str = nv_endsubscript((Namval_t*)0,str,0);
259 c = *str;
264 if((c = *++str) !='[')
266 str = nv_endsubscript((Namval_t*)0,cp=str,NV_SUBQUOTE)-1;
268 str -=2;
273 int fsize = str- (char*)(*ptr);
299 lvalue->flag = str-lvalue->value;
302 *str = 0;
310 *str = c;
311 cp = str;
316 str = nv_endsubscript(np,str,0);
317 if((c= *str)!='[' && c!='.')
319 str = cp;
327 str++;
328 while(xp=str, c=mbchar(str), isaname(c));
329 str = xp;
332 *str = 0;
351 lvalue->flag = str-lvalue->value;
358 *str = c;
368 lvalue->flag = (str-lvalue->expr);
373 str++;
374 while(xp=str, c=mbchar(str), isaname(c));
375 c = *(str = xp);
378 str = nv_endsubscript(np,str,0);
380 while((c= *str)=='[' || c=='.');
394 r = strtonll(val,&str, &lastbase,-1);
395 if(*str=='8' || *str=='9')
399 r = strtonll(val,&str, &lastbase,-1);
413 c = *str;
418 r = strtold(val,&str);
424 if((str-val)>2*sizeof(Sflong_t))
427 rr = strtold(val,&str);
499 *ptr = str;
509 Sfdouble_t sh_strnum(register const char *str, char** ptr, int mode)
514 if(*str==0)
517 *ptr = (char*)str;
521 d = strtonll(str,&last,&base,-1);
525 d = strval(shp,str,&last,arith,mode);
527 errormsg(SH_DICT,ERROR_exit(1),e_lexbadchar,*last,str);
529 else if (!d && *str=='-')
536 Sfdouble_t sh_arith(Shell_t *shp,register const char *str)
538 return(sh_strnum(str, (char**)0, 1));
541 void *sh_arithcomp(Shell_t *shp,register char *str)
543 const char *ptr = str;
545 ep = arith_compile(shp,str,(char**)&ptr,arith,ARITH_COMP|1);
547 errormsg(SH_DICT,ERROR_exit(1),e_lexbadchar,*ptr,str);