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

alien.marshall.syntax: remove duplicate annotate-effect call

db4
Jeremy Hughes 2009-07-08 09:31:27 +12:00
parent ca740fcb03
commit 0aa1a9a43d
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/marshall/syntax/syntax.factor
View File

@ -6,7 +6,7 @@ quotations sequences words ;
IN: alien.marshall.syntax IN: alien.marshall.syntax
:: marshalled-function ( function types effect -- word quot effect ) :: marshalled-function ( function types effect -- word quot effect )
function types effect annotate-effect factor-function function types effect factor-function
[ in>> ] [ in>> ]
[ out>> types [ pointer-to-primitive? ] filter append ] [ out>> types [ pointer-to-primitive? ] filter append ]
bi <effect> bi <effect>