[OpenBIOS] r621 - trunk/openbios-devel/forth/lib

[svn at openbios.org]

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!
 ;