### Diff for /gforth/prim between versions 1.264 and 1.265

version 1.264, 2011/12/31 15:29:25 version 1.265, 2012/02/21 21:34:10
Line 2571  u = (c_addr << 8) | (c_addr); Line 2571  u = (c_addr << 8) | (c_addr);

be-ul@ ( c_addr -- u )  gforth l_fetch_be  be-ul@ ( c_addr -- u )  gforth l_fetch_be
""@i{u} is the zero-extended 32-bit big endian value stored at @i{c_addr}.""  ""@i{u} is the zero-extended 32-bit big endian value stored at @i{c_addr}.""
u = (c_addr << 24) | (c_addr << 16) | (c_addr << 8) | (c_addr);  u = ((Cell)c_addr << 24) | (c_addr << 16) | (c_addr << 8) | (c_addr);

le-uw@ ( c_addr -- u )  gforth w_fetch_le  le-uw@ ( c_addr -- u )  gforth w_fetch_le
""@i{u} is the zero-extended 16-bit little endian value stored at @i{c_addr}.""  ""@i{u} is the zero-extended 16-bit little endian value stored at @i{c_addr}.""
Line 2579  u = (c_addr << 8) | (c_addr); Line 2579  u = (c_addr << 8) | (c_addr);

le-ul@ ( c_addr -- u )  gforth l_fetch_le  le-ul@ ( c_addr -- u )  gforth l_fetch_le
""@i{u} is the zero-extended 32-bit little endian value stored at @i{c_addr}.""  ""@i{u} is the zero-extended 32-bit little endian value stored at @i{c_addr}.""
u = (c_addr << 24) | (c_addr << 16) | (c_addr << 8) | (c_addr);  u = ((Cell)c_addr << 24) | (c_addr << 16) | (c_addr << 8) | (c_addr);

\+64bit  \+64bit

 Removed from v.1.264 changed lines Added in v.1.265

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>