1 /* $RCSfile: walk.c,v $$Revision: 4.1 $$Date: 92/08/07 18:29:31 $
9  * $Log:	walk.c,v $
37 STR * walk ( int useval, int level, int node, int *numericptr, int minprec );
45 walk(int useval, int level, register int node, int *numericptr, int minprec)
91 	str = walk(0,level,ops[node+1].ival,&numarg,P_MIN);
128 	    str_scat(str,fstr=walk(0,level,ops[node+2].ival,&numarg,P_MIN));
132 	fstr = walk(0,level+1,ops[node+3].ival,&numarg,P_MIN);
159 	    str_scat(str,fstr=walk(0,level,ops[node+4].ival,&numarg,P_MIN));
224 	str = walk(0,level,ops[node+1].ival,&numarg,P_MIN);
225 	str_scat(str,fstr=walk(0,level,ops[node+2].ival,&numarg,P_MIN));
228 	    str_scat(str,fstr=walk(0,level,ops[node+3].ival,&numarg,P_MIN));
236 	str = walk(1,level,ops[node+1].ival,&numarg,prec+1);
238 	str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,prec+1));
246 	tmpstr=walk(0,level,ops[node+1].ival,&numarg,P_MIN);
270 	    str = walk(0,level,oper1(OPRINT,0),&numarg,P_MIN);
272 	    str_scat(str,fstr=walk(0,level,ops[node+1].ival,&numarg,P_MIN));
277 	    tmpstr = walk(0,level,ops[node+1].ival,&numarg,P_MIN);
284 		str_scat(str,fstr=walk(0,level,ops[node+2].ival,&numarg,P_MIN));
291 		str = walk(0,level,ops[node+2].ival,&numarg,P_MIN);
298 	str_scat(str,fstr=walk(useval != 0,level,ops[node+1].ival,&numarg,P_MIN));
304 	str = walk(1,level,ops[node+1].ival,&numarg,prec);
306 	str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,prec+1));
308 	str_scat(str,fstr=walk(1,level,ops[node+3].ival,&numarg,prec+1));
313 	str = walk(1,level,ops[node+1].ival,&numarg,prec);
315 	str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,prec+1));
317 	str_scat(str,fstr=walk(1,level,ops[node+3].ival,&numarg,prec+1));
324 	str_scat(str,fstr=walk(1,level,ops[node+1].ival,&numarg,prec));
329 	str = walk(1,level,ops[node+1].ival,&numarg,prec);
331 	str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,prec+1));
334 	str_scat(str,fstr=walk(1,level,ops[node+3].ival,&numarg,prec+1));
340 	str_scat(str,fstr=walk(useval != 0,level,ops[node+1].ival,&numarg,P_MIN));
347 	str = walk(1,level,ops[node+1].ival,&numarg,prec);
350 	str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,prec+1));
352 	str_scat(str,fstr=walk(1,level,ops[node+3].ival,&numarg,prec+1));
357 	str = walk(1,level,ops[node+1].ival,&numarg,prec);
360 	str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,prec+1));
362 	str_scat(str,fstr=walk(1,level,ops[node+3].ival,&numarg,prec+1));
369 	str_scat(str,fstr=walk(1,level,ops[node+1].ival,&numarg,prec));
375 	str = walk(1,level,ops[node+2].ival,&numarg,prec+1);
377 	tmpstr = walk(0,level,ops[node+1].ival,&numarg,P_MIN);
378 	tmp2str = walk(1,level,ops[node+3].ival,&numarg,prec+1);
418 	str_scat(str,fstr=walk(useval != 0,level,ops[node+1].ival,&numarg,P_MIN));
425 	str = walk(1,level,ops[node+2].ival,&numarg,prec+1);
427 	tmpstr = walk(0,level,ops[node+1].ival,&numarg,P_MIN);
435 	str_scat(str,fstr=walk(1,level,ops[node+3].ival,&numarg,prec+1));
443 	  fstr=walk(useval != 0,level,ops[node+1].ival,&numarg,P_MIN));
451 	str = walk(1,level,ops[node+1].ival,&numarg,prec+(type != OCONCAT));
455 	  fstr=walk(1,level,ops[node+2].ival,&numarg,prec+(type != OCONCAT)));
460 	str = walk(0,level,ops[node+2].ival,&numarg,prec+1);
462 	tmpstr = walk(0,level,ops[node+1].ival,&numarg,P_MIN);
468 	str_scat(str,fstr=walk(1,level,ops[node+3].ival,&numarg,prec));
476 	str = walk(1,level,ops[node+1].ival,&numarg,prec);
478 	str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,prec+1));
484 	str = walk(1,level,ops[node+1].ival,&numarg,prec);
486 	str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,prec+1));
492 	str = walk(1,level,ops[node+1].ival,&numarg,prec);
494 	str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,prec+1));
500 	str = walk(1,level,ops[node+1].ival,&numarg,prec);
502 	str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,prec+1));
508 	str = walk(1,level,ops[node+1].ival,&numarg,prec+1);
510 	str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,prec));
516 	str = walk(1,level,ops[node+1].ival,&numarg,prec);
518 	str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,prec+1));
524 	str = walk(1,level,ops[node+1].ival,&numarg,prec+1);
530 	str = walk(1,level,ops[node+1].ival,&numarg,prec+1);
538 	str_scat(str,fstr=walk(1,level,ops[node+1].ival,&numarg,prec+1));
546 	str_scat(str,fstr=walk(1,level,ops[node+1].ival,&numarg,prec+1));
554 	str_scat(str,fstr=walk(1,level,ops[node+1].ival,&numarg,prec));
565 	  fstr=walk(useval != 0,level,ops[node+1].ival,&numarg,P_MIN));
575 	    str_scat(str,fstr=walk(1,level,ops[node+1].ival,&numarg,P_MIN));
585 	    tmpstr=walk(1,level,ops[node+3].ival,&numarg,P_MIN);
586 	    fstr=walk(1,level,ops[node+2].ival,&numarg,P_MIN);
651 	str_scat(str,fstr=walk(1,level,ops[node+1].ival,&numarg,P_MIN));
658 	str_scat(str,fstr=walk(1,level,ops[node+1].ival,&numarg,P_COMMA+1));
661 	str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,P_COMMA+1));
665 	    str_scat(str,fstr=walk(1,level,ops[node+3].ival,&numarg,P_COMMA+1));
680 	tmpstr = walk(1,level,ops[node+2].ival,&numarg,P_MIN);
688 	    fstr = walk(1,level,ops[node+3].ival,&numarg,P_COMMA+1);
714 	str_scat(str,fstr=walk(1,level,ops[node+1].ival,&numarg,P_COMMA+1));
725 	str_scat(str,fstr=walk(1,level,ops[node+1].ival,&numarg,P_COMMA+1));
728 	str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,P_COMMA+1));
736 	str_scat(str,fstr=walk(1,level,ops[node+1].ival,&numarg,P_MATCH+1));
739 	str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,P_MATCH+1));
747 	fstr=walk(1,level-1,ops[node+2].ival,&numarg,P_MIN);
751 	tmp2str=walk(1,level,ops[node+5].ival,&numarg,P_MIN);
774 	str_scat(str,tmpstr=walk(1,level,ops[node+1].ival,&numarg,P_MIN));
783 	str_scat(str,fstr=walk(1,level,ops[node+3].ival,&numarg,P_MIN));
786 	str_scat(str,fstr=walk(1,level,ops[node+4].ival,&numarg,P_MIN));
808 	    str_scat(str,fstr=walk(1,level,ops[node+1].ival,&numarg,P_UNI+1));
819 	str_scat(str,fstr=walk(1,level,ops[node+1].ival,&numarg,P_MIN));
825 	str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,P_MIN));
836 	    tmpstr = walk(1,level,ops[node+3].ival,&numarg,P_MATCH+1);
851 	    tmp2str=walk(1,level,ops[ops[node+2].ival+1].ival,&numarg,P_MIN);
864 	    tmp2str=walk(1,level,ops[node+2].ival,&numarg,P_MIN);
876 	fstr=walk(1,level,ops[node+1].ival,&numarg,P_MIN);
916 	str = walk(1,level,ops[node+1].ival,&numarg,P_MIN);
920 	tmpstr = walk(1,level,ops[node+1].ival,&numarg,P_MIN);
961 	str_scat(str,tmpstr=walk(1,level,ops[node+1].ival,&numarg,P_MIN));
998 	    str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,P_MIN));
1020 	    str_scat(str,fstr=walk(1,level,ops[node+1].ival,&numarg,P_MIN));
1025 	    i = atoi(walk(1,level,ops[node+1].ival,&numarg,P_MIN)->str_ptr);
1039 	tmpstr=walk(1,level,i,&numarg,P_MIN);
1059 	tmpstr = walk(0,level,ops[node+1].ival,&numarg,P_MIN);
1068 	tmpstr = walk(0,level,ops[node+1].ival,&numarg,P_MIN);
1077 	str = walk(1,level,ops[node+1].ival,&numarg,prec);
1079 	str_scat(str,fstr=walk(1,level,ops[node+2].ival,&numarg,P_MIN));
1081 	str_scat(str,fstr=walk(1,level,ops[node+3].ival,&numarg,prec+1));
1090 	str = walk(0,level,ops[node+1].ival,&numarg,P_MIN);
1091 	str_scat(str,fstr=walk(0,level,ops[node+2].ival,&numarg,P_MIN));
1097 	    str_scat(str,fstr=walk(0,level,ops[node+1].ival,&numarg,P_MIN));
1100 		tmpstr = walk(0,level,ops[node+2].ival,&numarg,P_MIN);
1111 	tmpstr = walk(1,level,ops[node+1].ival,&numarg,P_MIN);
1146 	    tmpstr = walk(1,level,ops[node+3].ival,&numarg,P_MIN);
1147 	    tmp2str = walk(1,level,ops[node+2].ival,&numarg,P_MIN);
1218 	tmpstr = walk(1+(type==OPRINT),level,ops[node+1].ival,&numarg,P_MIN);
1291 	    tmpstr = walk(1,level,ops[node+1].ival,&numarg,P_MIN);
1348 		  fstr=walk(1,level,ops[node+1].ival,&numarg,prec+1));
1357 		  fstr=walk(1,level,ops[node+1].ival,&numarg,P_ASSIGN));
1373 	str_scat(str,fstr=walk(1,level,ops[node+1].ival,&numarg,P_MIN));
1376 	str_scat(str,fstr=walk(0,level,ops[node+2].ival,&numarg,P_MIN));
1393 		str_scat(str,fstr=walk(0,level,i,&numarg,P_MIN));
1398 		str_scat(str,fstr=walk(0,level,ops[node+3].ival,&numarg,P_MIN));
1406 	str_scat(str,fstr=walk(1,level,ops[node+1].ival,&numarg,P_MIN));
1409 	str_scat(str,fstr=walk(0,level,ops[node+2].ival,&numarg,P_MIN));
1415 	str_scat(str,fstr=walk(1,level,ops[node+1].ival,&numarg,P_MIN));
1420 	str_scat(str,fstr=walk(0,level,ops[node+2].ival,&numarg,P_MIN));
1427 	str_scat(str,tmpstr=walk(1,level,ops[node+1].ival,&numarg,P_MIN));
1438 	fstr=walk(1,level,ops[node+2].ival,&numarg,P_MIN);
1447 	str_scat(str,fstr=walk(1,level,ops[node+3].ival,&numarg,P_MIN));
1450 	str_scat(str,fstr=walk(0,level,ops[node+4].ival,&numarg,P_MIN));
1454 	tmpstr = walk(0,level,ops[node+1].ival,&numarg,P_MIN);
1488 	str_scat(str,fstr=walk(0,level,ops[node+2].ival,&numarg,P_MIN));
1496 	    str_scat(str,fstr=walk(0,level,ops[node+2].ival,&numarg,P_MIN));
1500 	str_scat(str,fstr=walk(0,level,ops[node+1].ival,&numarg,P_MIN));
1507 	    str_scat(str,fstr=walk(0,level,ops[node+3].ival,&numarg,P_MIN));
1515 		fatal("Garbage length in walk");
1516 	    str = walk(0,level,ops[node+1].ival,&numarg,P_MIN);
1518 		str_scat(str,fstr=walk(0,level,ops[node+i].ival,&numarg,P_MIN));
1854 	tmpstr = walk(0,level,ops[node+1].ival,&numarg,P_MIN);
1877 	str_scat(tmp2str,tmpstr=walk(1,level,ops[node+1].ival,&numarg,P_MIN));
2060 	tmpstr=walk(0,0,ops[node+1].ival,&numarg,P_MIN);

Indexes created Tue Jul 24 14:28:13 CEST 2018