[OpenBIOS] [commit] r878 - trunk/openbios-devel/forth/bootstrap
repository service
svn at openbios.org
Sun Oct 3 12:34:50 CEST 2010
Author: mcayland
Date: Sun Oct 3 12:34:50 2010
New Revision: 878
URL: http://tracker.coreboot.org/trac/openbios/changeset/878
Log:
Implement the "to" Forth word for setting defers. This enables OpenSolaris to execute "' kmem64-tte is va>tte-data" for setting
the va>tte-data defer.
Signed-off-by: Mark Cave-Ayland <mark.cave-ayland at siriusit.co.uk>
Modified:
trunk/openbios-devel/forth/bootstrap/bootstrap.fs
Modified: trunk/openbios-devel/forth/bootstrap/bootstrap.fs
==============================================================================
--- trunk/openbios-devel/forth/bootstrap/bootstrap.fs Sun Oct 3 11:37:13 2010 (r877)
+++ trunk/openbios-devel/forth/bootstrap/bootstrap.fs Sun Oct 3 12:34:50 2010 (r878)
@@ -1043,6 +1043,13 @@
then
; immediate
+: is ( xt "wordname<>" -- )
+ parse-word $find if
+ (to)
+ else
+ s" could not find " type type
+ then
+ ;
\
\ 7.3.4.2 Console Input
More information about the OpenBIOS
mailing list