basis: ERROR: changes.

[factor.git] / basis / alien / parser / parser.factor

diff --git a/basis/alien/parser/parser.factor b/basis/alien/parser/parser.factor
index 843f0410aa1908b3fc2f98f9c07b7146f0015d27..507273eda2ad8021f1dd2b6930c049bdbb48100a 100755 (executable)
--- a/basis/alien/parser/parser.factor
+++ b/basis/alien/parser/parser.factor
@@ -15,7 +15,7 @@ ERROR: bad-array-type ;
 
 : parse-array-type ( name -- c-type )
     "[" split unclip
-    [ [ "]" ?tail [ bad-array-type ] unless parse-datum ] map ]
+    [ [ "]" ?tail [ throw-bad-array-type ] unless parse-datum ] map ]
     [ (parse-c-type) ]
     bi* prefix ;