From 6708a79d0ffa7934a378b3467f9bade985b310d6 Mon Sep 17 00:00:00 2001
From: Stefan Reinauer <stepan@openbios.org>
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