From 6708a79d0ffa7934a378b3467f9bade985b310d6 Mon Sep 17 00:00:00 2001 From: Stefan Reinauer Date: Fri, 20 Nov 2009 15:58:55 +0000 Subject: [PATCH] actually print value of a (lit) git-svn-id: svn://coreboot.org/openbios/trunk/openbios-devel@619 f158a5a8-5612-0410-a976-696ce0be7e32 --- forth/debugging/see.fs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/forth/debugging/see.fs b/forth/debugging/see.fs index bd09336..6977d29 100644 --- a/forth/debugging/see.fs +++ b/forth/debugging/see.fs @@ -71,8 +71,9 @@ endof ['] (lit) of - ." (lit)" + ." ( lit ) h# " drop 1 cells + + dup @ u. endof ['] (") of