Fix a stack underflow

db4
Alfredo Beaumont 2008-07-10 23:55:45 +02:00
parent 7a5407d19c
commit e3ce229c1f
1 changed files with 1 additions and 1 deletions

View File

@ -75,7 +75,7 @@ SYMBOL: *calling*
"executing quotation..." print flush "executing quotation..." print flush
[ call ] micro-time >r [ call ] micro-time >r
"resetting annotations..." print flush "resetting annotations..." print flush
swap reset-vocab reset-vocab
correct-for-timing-overhead correct-for-timing-overhead
"total time:" write r> pprint "total time:" write r> pprint
print-word-timings ; print-word-timings ;