steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
basis/compiler/cfg/linear-scan/live-intervals/live-intervals.factor
View File

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