version 1.122, 2003/01/23 21:45:59
|
version 1.123, 2003/01/24 22:03:20
|
Line 2013 f1=FLAG(flag!=0);
|
Line 2013 f1=FLAG(flag!=0);
|
f2=FLAG(isdigit((unsigned)(sig[0]))!=0); |
f2=FLAG(isdigit((unsigned)(sig[0]))!=0); |
siglen=strlen(sig); |
siglen=strlen(sig); |
memcpy(c_addr,sig,siglen); |
memcpy(c_addr,sig,siglen); |
memset(c_addr+siglen,'0',u-siglen); |
memset(c_addr+siglen,f2?'0':' ',u-siglen); |
|
|
>float ( c_addr u -- flag ) float to_float |
>float ( c_addr u -- flag ) float to_float |
""Actual stack effect: ( c_addr u -- r t | f ). Attempt to convert the |
""Actual stack effect: ( c_addr u -- r t | f ). Attempt to convert the |