fix ffi

2004-12-20 18:49:28 +00:00 · 2004-12-20 18:49:28 +00:00 · cf5a90b3b7
parent cc43f52bb8
commit cf5a90b3b7
1 changed files with 4 additions and 4 deletions
--- a/library/compiler/alien.factor
+++ b/library/compiler/alien.factor
@ -77,10 +77,10 @@ SYMBOL: alien-parameters

 : infer-alien ( -- )
    4 ensure-d
-    dataflow-drop, pop-d car
-    dataflow-drop, pop-d car
-    dataflow-drop, pop-d car alien-function >r
-    dataflow-drop, pop-d car swap
+    dataflow-drop, pop-d literal
+    dataflow-drop, pop-d literal
+    dataflow-drop, pop-d literal alien-function >r
+    dataflow-drop, pop-d literal swap
    r> dataflow, [
        alien-returns set
        alien-parameters set