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

windows.com.syntax: don't put c-type words inside stack effect of Interface::Method words

db4
Joe Groff 2010-02-21 22:07:32 -08:00
parent 92e1ca8b61
commit dcd76d2abe
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/windows/com/syntax/syntax.factor
View File

@ -71,7 +71,7 @@ ERROR: no-com-interface interface ;
: (stack-effect-from-return-and-parameters) ( return parameters -- stack-effect ) : (stack-effect-from-return-and-parameters) ( return parameters -- stack-effect )
swap swap
[ [ second ] map ] [ [ second ] map ]
[ dup void? [ drop { } ] [ 1array ] if ] bi* [ dup void? [ drop { } ] [ name>> 1array ] if ] bi*
<effect> ; <effect> ;
: (define-word-for-function) ( function interface n -- ) : (define-word-for-function) ( function interface n -- )