Author: wmb Date: Sat Mar 24 20:20:59 2012 New Revision: 2915 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/2915
Log: Added le-x, and be-x, for 64-bit machines.
Modified: forth/kernel/endian.fth
Modified: forth/kernel/endian.fth ============================================================================== --- forth/kernel/endian.fth Thu Mar 22 02:13:14 2012 (r2914) +++ forth/kernel/endian.fth Sat Mar 24 20:20:59 2012 (r2915) @@ -33,6 +33,9 @@ 64\ : be-x@ ( a -- l ) dup la1+ be-l@ swap be-l@ lxjoin ; 64\ : le-x! ( l a -- ) >r xlsplit r@ la1+ le-l! r> le-l! ; 64\ : be-x! ( l a -- ) >r xlsplit r@ be-l! r> la1+ be-l! ; +64\ : le-x, ( x -- ) here /x allot le-x! ; +64\ : be-x, ( x -- ) here /x allot be-x! ; + \ LICENSE_BEGIN \ Copyright (c) 2006 FirmWorks \