basis: ERROR: changes.

[factor.git] / basis / math / complex / complex.factor

diff --git a/basis/math/complex/complex.factor b/basis/math/complex/complex.factor
index f57523dd02137214f7e72b79b317bb5737c0058a..0de7db33a0ff8ca13c8fcfb15f38b2f01ab4fcd2 100644 (file)
--- a/basis/math/complex/complex.factor
+++ b/basis/math/complex/complex.factor
@@ -38,7 +38,7 @@ IN: syntax
 ERROR: malformed-complex obj ;
 
 : parse-complex ( seq -- complex )
-    dup length 2 = [ first2-unsafe rect> ] [ malformed-complex ] if ;
+    dup length 2 = [ first2-unsafe rect> ] [ throw-malformed-complex ] if ;
 
 SYNTAX: C{ \ } [ parse-complex ] parse-literal ;