[OpenBIOS] r619 - trunk/openbios-devel/forth/debugging
svn at openbios.org
svn at openbios.org
Fri Nov 20 16:58:56 CET 2009
Author: stepan
Date: 2009-11-20 16:58:55 +0100 (Fri, 20 Nov 2009)
New Revision: 619
Modified:
trunk/openbios-devel/forth/debugging/see.fs
Log:
actually print value of a (lit)
Modified: trunk/openbios-devel/forth/debugging/see.fs
===================================================================
--- trunk/openbios-devel/forth/debugging/see.fs 2009-11-20 15:42:28 UTC (rev 618)
+++ trunk/openbios-devel/forth/debugging/see.fs 2009-11-20 15:58:55 UTC (rev 619)
@@ -71,8 +71,9 @@
endof
['] (lit) of
- ." (lit)"
+ ." ( lit ) h# "
drop 1 cells +
+ dup @ u.
endof
['] (") of
More information about the OpenBIOS
mailing list