]> gitweb.factorcode.org Git - factor.git/commitdiff
remove call to check-c-name
authorDoug Coleman <doug.coleman@gmail.com>
Thu, 23 Jul 2009 23:14:07 +0000 (18:14 -0500)
committerDoug Coleman <doug.coleman@gmail.com>
Thu, 23 Jul 2009 23:14:07 +0000 (18:14 -0500)
basis/alien/parser/parser.factor

index 8e2fe8257868f48b23f855f384b472c2c4a4f461..19ab08c03ca801930f0be6b6f968e855f599dfc7 100644 (file)
@@ -15,7 +15,7 @@ IN: alien.parser
 : parse-arglist ( parameters return -- types effect )
     [
         2 group [ first2 normalize-c-arg 2array ] map
-        unzip [ "," ?tail drop check-c-name ] map
+        unzip [ "," ?tail drop ] map
     ]
     [ [ { } ] [ 1array ] if-void ]
     bi* <effect> ;
@@ -25,7 +25,7 @@ IN: alien.parser
 
 :: make-function ( return! library function! parameters -- word quot effect )
     return function normalize-c-arg function! return!
-    function check-c-name create-in dup reset-generic
+    function create-in dup reset-generic
     return library function
     parameters return parse-arglist [ function-quot ] dip ;