]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/compiler/cfg/registers/registers.factor
change ERROR: words from throw-foo back to foo.
[factor.git] / basis / compiler / cfg / registers / registers.factor
index c1d6246e267b48307fb95a5dd528ca3cde6539f2..480ce70d86a0bf64640e2e626a5b1e4a839e41de 100644 (file)
@@ -16,7 +16,7 @@ SYMBOL: representations
 ERROR: bad-vreg vreg ;
 
 : rep-of ( vreg -- rep )
-    representations get ?at [ throw-bad-vreg ] unless ;
+    representations get ?at [ bad-vreg ] unless ;
 
 : set-rep-of ( rep vreg -- )
     representations get set-at ;