Lines Matching refs:svar
354 char *slimit,*sstep,*svar; local
632 svar=pstackptr+epstackptr-3*four;/* point to FOR field */
633 svar-=four, /* point to variable length */
634 svar -= align(varlen= *(int *)svar);/* point to name */
635 testvarname(&lineptr,svar,varlen-1);/* Check it matches */
645 svar=pstackptr+epstackptr-3*four;/* point to FOR field */
646 if((fr= *(int *)svar)>0) /* get the FOR field */
647 (*(int *)svar)= --fr; /* fr now holds its new value */
652 svar-=four, /* point to variable length */
653 svar -= align(varlen= *(int *)svar); /* point to name */
654 testvarname(&lineptr,svar,varlen-1); /* Check it matches */
656 getvarname(svar,&tmpchr,varname,&varlen,maxvarname);
660 sslen= *((int *)svar-1), /* get the step's length */
661 sstep=svar-align(sslen)-four,/* and the step's address */
1095 svar=pstackptr+epstackptr-4*four,
1096 svar -= align(len= *(int *)svar); /* point to the name */
1097 if(!(reflen&&(len-1!=reflen||memcmp(varref,svar,reflen))))
1110 svar=pstackptr+epstackptr-4*four,
1111 svar -= align(len= *(int *)svar);
1113 testvarname(&lineptr,svar,len-1);
1143 svar=pstackptr+epstackptr-4*four,
1144 svar -= align(len= *(int *)svar);
1145 if(!(reflen&&(len-1!=reflen||memcmp(varref,svar,reflen))))
1160 svar=pstackptr+epstackptr-4*four,
1161 svar -= align(len= *(int *)svar);
1162 testvarname(&lineptr,svar,len-1);