[openfirmware] [commit] r2915 - forth/kernel
repository service
svn at openfirmware.info
Sat Mar 24 20:20:59 CET 2012
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
\
More information about the openfirmware
mailing list