Better error message

db4
Slava Pestov 2008-10-22 21:58:37 -05:00
parent 9a07760542
commit ba0ed21e1d
1 changed files with 1 additions and 0 deletions

View File

@ -11,6 +11,7 @@ reg spill-to reload-from split-before split-after
start end uses ;
: add-use ( n live-interval -- )
dup live-interval? [ "No def" throw ] unless
[ (>>end) ] [ uses>> push ] 2bi ;
: <live-interval> ( start vreg -- live-interval )