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

alien.inline: stopped annotate-effect affecting prototype strings

db4
Jeremy Hughes 2009-07-05 21:05:17 +12:00
parent c32d7c5c97
commit 64aef112b5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/alien/inline/inline.factor
View File

@ -42,7 +42,7 @@ SYMBOL: c-strings
concat make-function ; concat make-function ;
:: marshalled-function ( function types effect -- word quot effect ) :: marshalled-function ( function types effect -- word quot effect )
function types effect factor-function function types effect annotate-effect factor-function
[ in>> ] [ in>> ]
[ out>> types [ pointer-to-primitive? ] filter append ] [ out>> types [ pointer-to-primitive? ] filter append ]
bi <effect> bi <effect>