windows.com.syntax: don't put c-type words inside stack effect of Interface::Method words
							parent
							
								
									92e1ca8b61
								
							
						
					
					
						commit
						dcd76d2abe
					
				| 
						 | 
				
			
			@ -71,7 +71,7 @@ ERROR: no-com-interface interface ;
 | 
			
		|||
: (stack-effect-from-return-and-parameters) ( return parameters -- stack-effect )
 | 
			
		||||
    swap
 | 
			
		||||
    [ [ second ] map ]
 | 
			
		||||
    [ dup void? [ drop { } ] [ 1array ] if ] bi*
 | 
			
		||||
    [ dup void? [ drop { } ] [ name>> 1array ] if ] bi*
 | 
			
		||||
    <effect> ;
 | 
			
		||||
 | 
			
		||||
: (define-word-for-function) ( function interface n -- )
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
		Reference in New Issue