[gforth] / gforth / engine / support.c  

gforth: gforth/engine/support.c

Diff for /gforth/engine/support.c between version 1.20 and 1.21

version 1.20, Thu Feb 15 13:48:26 2007 UTC version 1.21, Sat Feb 17 16:27:16 2007 UTC
Line 500 
Line 500 
    n = 0;     n = 0;
 #if (SIZEOF_CHAR_P > 4)  #if (SIZEOF_CHAR_P > 4)
    if (x <= 0xffffffff) {n+=32; x <<= 32;}     if (x <= 0xffffffff) {n+=32; x <<= 32;}
 #error this can't be correct  #error "this can't be correct"
 #endif  #endif
    if (x <= 0x0000FFFF) {n = n +16; x = x <<16;}     if (x <= 0x0000FFFF) {n = n +16; x = x <<16;}
    if (x <= 0x00FFFFFF) {n = n + 8; x = x << 8;}     if (x <= 0x00FFFFFF) {n = n + 8; x = x << 8;}

Generate output suitable for use with a patch program
Legend:
Removed from v.1.20  
changed lines
  Added in v.1.21
CVS Admin

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help