tools.trace: Rename

db4
Doug Coleman 2013-03-24 10:04:44 -07:00
parent 45e33f5c09
commit 11c4c4634a
1 changed files with 3 additions and 3 deletions

View File

@ -43,9 +43,9 @@ SYMBOL: end
]
} 1&& ;
TUPLE: trace-step word inputs ;
TUPLE: trace-step-state word inputs ;
M: trace-step summary
M: trace-step-state summary
[
[ "Word: " % word>> name>> % ]
[ " -- inputs: " % inputs>> unparse-short % ] bi
@ -53,7 +53,7 @@ M: trace-step summary
: <trace-step> ( continuation word -- trace-step )
[ nip ] [ [ data>> ] [ stack-effect in>> length ] bi* short tail* ] 2bi
\ trace-step boa ;
\ trace-step-state boa ;
: print-step ( continuation -- )
dup continuation-current dup word? [