Lines Matching refs:num
157 register Sfdouble_t num=0,*dp,*sp; in arith_exec() local
199 if((c==A_JMPZ && num) || (c==A_JMPNZ &&!num)) in arith_exec()
205 num = (num!=0); in arith_exec()
210 (*ep->fun)(&ptr,&node,ASSIGN,num+1); in arith_exec()
214 (*ep->fun)(&ptr,&node,ASSIGN,num-1); in arith_exec()
217 num = num+1; in arith_exec()
219 num = (*ep->fun)(&ptr,&node,ASSIGN,num); in arith_exec()
222 num = num-1; in arith_exec()
224 num = (*ep->fun)(&ptr,&node,ASSIGN,num); in arith_exec()
227 num = sp[-1]; in arith_exec()
250 num = (*ep->fun)(&ptr,&node,VALUE,num); in arith_exec()
259 *++sp = num; in arith_exec()
261 if(num > LDBL_ULLONG_MAX || num < LDBL_LLONG_MIN) in arith_exec()
265 Sfdouble_t d=num; in arith_exec()
266 if(num > LDBL_LLONG_MAX && num <= LDBL_ULLONG_MAX) in arith_exec()
296 num = (*ep->fun)(&ptr,&node,ASSIGN,num); in arith_exec()
302 r = (*ep->fun)(&ptr,&node,VALUE,num); in arith_exec()
303 if(r!=num) in arith_exec()
307 num = (*ep->fun)(&ptr,&node,ASSIGN,r); in arith_exec()
322 num = *((Sfdouble_t*)cp); in arith_exec()
324 *++sp = num; in arith_exec()
329 num = !num; in arith_exec()
332 num = -num; in arith_exec()
335 num = ~((Sflong_t)(num)); in arith_exec()
338 num += sp[-1]; in arith_exec()
341 num = sp[-1] - num; in arith_exec()
344 num *= sp[-1]; in arith_exec()
347 num = pow(sp[-1],num); in arith_exec()
350 if(!(Sflong_t)num) in arith_exec()
353 num = U2F((Sfulong_t)(sp[-1]) % (Sfulong_t)(num)); in arith_exec()
355 num = (Sflong_t)(sp[-1]) % (Sflong_t)(num); in arith_exec()
360 num = sp[-1]/num; in arith_exec()
363 else if((Sfulong_t)(num)==0) in arith_exec()
366 num = U2F((Sfulong_t)(sp[-1]) / (Sfulong_t)(num)); in arith_exec()
368 num = (Sflong_t)(sp[-1]) / (Sflong_t)(num); in arith_exec()
371 if((long)num >= CHAR_BIT*sizeof(Sfulong_t)) in arith_exec()
372 num = 0; in arith_exec()
374 num = U2F((Sfulong_t)(sp[-1]) << (long)(num)); in arith_exec()
376 num = (Sflong_t)(sp[-1]) << (long)(num); in arith_exec()
379 if((long)num >= CHAR_BIT*sizeof(Sfulong_t)) in arith_exec()
380 num = 0; in arith_exec()
382 num = U2F((Sfulong_t)(sp[-1]) >> (long)(num)); in arith_exec()
384 num = (Sflong_t)(sp[-1]) >> (long)(num); in arith_exec()
388 num = U2F((Sfulong_t)(sp[-1]) ^ (Sfulong_t)(num)); in arith_exec()
390 num = (Sflong_t)(sp[-1]) ^ (Sflong_t)(num); in arith_exec()
394 num = U2F((Sfulong_t)(sp[-1]) | (Sfulong_t)(num)); in arith_exec()
396 num = (Sflong_t)(sp[-1]) | (Sflong_t)(num); in arith_exec()
400 num = U2F((Sfulong_t)(sp[-1]) & (Sfulong_t)(num)); in arith_exec()
402 num = (Sflong_t)(sp[-1]) & (Sflong_t)(num); in arith_exec()
405 num = (sp[-1]==num); in arith_exec()
409 num = (sp[-1]!=num); in arith_exec()
413 num = (sp[-1]<=num); in arith_exec()
417 num = (sp[-1]>=num); in arith_exec()
421 num = (sp[-1]>num); in arith_exec()
425 num = (sp[-1]<num); in arith_exec()
435 arg[0] = num; in arith_exec()
437 num = sh_mathfun(shp,(void*)fun,1,arg); in arith_exec()
440 num = (*((Math_1f_f)fun))(num); in arith_exec()
446 num = (*((Math_1i_f)(uintptr_t)fun))(num); in arith_exec()
456 arg[1] = num; in arith_exec()
458 num = sh_mathfun(shp,(void*)fun,2,arg); in arith_exec()
462 num = (*((Math_2f_i)fun))(sp[1],(int)num); in arith_exec()
464 num = (*((Math_2f_f)fun))(sp[1],num); in arith_exec()
470 num = (*((Math_2i_f)(uintptr_t)fun))(sp[1],num); in arith_exec()
481 arg[2] = num; in arith_exec()
483 num = sh_mathfun(shp,(void*)fun,3,arg); in arith_exec()
486 num = (*((Math_3f_f)fun))(sp[1],sp[2],num); in arith_exec()
497 *sp = num; in arith_exec()
502 if(type==0 && !num) in arith_exec()
503 num = 0; in arith_exec()
504 return(num); in arith_exec()