Author: mcayland Date: Mon Aug 19 14:58:00 2013 New Revision: 1219 URL: http://tracker.coreboot.org/trac/openbios/changeset/1219 Log: Add peek/poke hooks Add hooks for hardware specific fault handlers for the peek and poke commands. Signed-off-by: Bob Breuer <breuerr@mc.net> Signed-off-by: Mark Cave-Ayland <mark.cave-ayland@ilande.co.uk> Modified: trunk/openbios-devel/forth/device/other.fs Modified: trunk/openbios-devel/forth/device/other.fs ============================================================================== --- trunk/openbios-devel/forth/device/other.fs Mon Aug 19 14:57:56 2013 (r1218) +++ trunk/openbios-devel/forth/device/other.fs Mon Aug 19 14:58:00 2013 (r1219) @@ -20,28 +20,38 @@ \ 5.3.7.1 Peek/poke +defer (peek) +:noname + execute true +; to (peek) + : cpeek ( addr -- false | byte true ) - c@ true + ['] c@ (peek) ; : wpeek ( waddr -- false | w true ) - w@ true + ['] w@ (peek) ; : lpeek ( qaddr -- false | quad true ) - l@ true + ['] l@ (peek) ; +defer (poke) +:noname + execute true +; to (poke) + : cpoke ( byte addr -- okay? ) - c! true + ['] c! (poke) ; : wpoke ( w waddr -- okay? ) - w! true + ['] w! (poke) ; : lpoke ( quad qaddr -- okay? ) - l! true + ['] l! (poke) ;