Author: stepan Date: 2009-11-20 19:54:38 +0100 (Fri, 20 Nov 2009) New Revision: 621
Modified: trunk/openbios-devel/forth/lib/64bit.fs Log: - drop commented out functions, they're in others.fs already - fix another stack diagram typo
Modified: trunk/openbios-devel/forth/lib/64bit.fs =================================================================== --- trunk/openbios-devel/forth/lib/64bit.fs 2009-11-20 16:37:41 UTC (rev 620) +++ trunk/openbios-devel/forth/lib/64bit.fs 2009-11-20 18:54:38 UTC (rev 621) @@ -53,7 +53,7 @@ unaligned-x@ \ for now ;
-: x! ( oaddr o -- ) +: x! ( o oaddr -- ) unaligned-x! \ for now ;
@@ -65,22 +65,6 @@ x! ;
-\ : rx@ ( oaddr - o ) -\ compile? if -\ h# 22e get-token if compile, else execute then -\ else -\ h# 22e get-token drop execute -\ then -\ ; immediate - -\ : rx! ( o oaddr -- ) -\ compile? if -\ h# 22f get-token if compile, else execute then -\ else -\ h# 22f get-token drop execute -\ then -\ ; immediate - : x, ( o -- ) here /x allot x! ;