alien.parser: have define-enum handle the case when the enum name is f

diff --git a/basis/alien/parser/parser.factor b/basis/alien/parser/parser.factor
index 63f5043eeb200b71a55aa07039c8182d38b8c7ac..952f7b64d99391966828e861c8b295f3a2bae90a 100755 (executable)
--- a/basis/alien/parser/parser.factor
+++ b/basis/alien/parser/parser.factor
@@ -96,7 +96,7 @@ PRIVATE>
     [ swap parse-enum-member parse-enum-members ] [ 2drop ] if ;
 
 : define-enum ( word members -- )
-    [ int swap typedef ] [ define-enum-members ] bi* ;
+    [ [ int swap typedef ] when ] [ define-enum-members ] bi* ;
 
 : scan-function-name ( -- return function )
     scan-c-type scan parse-pointers ;