steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

fix ffi

cvs
Slava Pestov 2004-12-20 18:49:28 +00:00
parent cc43f52bb8
commit cf5a90b3b7
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
library/compiler/alien.factor
View File

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