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
/
SLOF
/
slof
/
fs
/
terminal.fs
diff --git
a/qemu/roms/SLOF/slof/fs/terminal.fs
b/qemu/roms/SLOF/slof/fs/terminal.fs
index
582bede
..
dc82e7b
100644
(file)
--- a/
qemu/roms/SLOF/slof/fs/terminal.fs
+++ b/
qemu/roms/SLOF/slof/fs/terminal.fs
@@
-167,6
+167,7
@@
false VALUE stopcsi
CREATE twtracebuf 4000 allot twtracebuf 4000 erase
twtracebuf VALUE twbp
0 VALUE twbc
CREATE twtracebuf 4000 allot twtracebuf 4000 erase
twtracebuf VALUE twbp
0 VALUE twbc
+0 VALUE twtrace-enabled?
: twtrace
twbc 4000 = IF 0 to twbc twtracebuf to twbp THEN
: twtrace
twbc 4000 = IF 0 to twbc twtracebuf to twbp THEN
@@
-176,7
+177,7
@@
twtracebuf VALUE twbp
: terminal-write ( addr len -- actual-len )
cursor-off
tuck bounds ?DO i c@
: terminal-write ( addr len -- actual-len )
cursor-off
tuck bounds ?DO i c@
- twtrace
+ twtrace
-enabled? IF twtrace THEN
esc-on IF esc-process
ELSE CASE
1B OF true to esc-on ENDOF
esc-on IF esc-process
ELSE CASE
1B OF true to esc-on ENDOF