Code Review
/
kvmfornfv.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
review
|
tree
raw
| inline |
side by side
These changes are the raw update to qemu-2.6.
[kvmfornfv.git]
/
qemu
/
roms
/
openbios
/
forth
/
system
/
ciface.fs
diff --git
a/qemu/roms/openbios/forth/system/ciface.fs
b/qemu/roms/openbios/forth/system/ciface.fs
index
fd6c54e
..
85a6076
100644
(file)
--- a/
qemu/roms/openbios/forth/system/ciface.fs
+++ b/
qemu/roms/openbios/forth/system/ciface.fs
@@
-326,6
+326,14
@@
external
: exit ( -- )
." EXIT"
+
+ \ Execute (exit) hook if one exists
+ s" (exit)" $find if
+ execute
+ else
+ 2drop
+ then
+
outer-interpreter
;