The return values in the stack effects of FUNCTION: words were c-types rather than strings. This was causing scaffold-help to fail on vocabularies with FUNCTION:.
							parent
							
								
									30b586ef5f
								
							
						
					
					
						commit
						b25e945c74
					
				| 
						 | 
				
			
			@ -72,10 +72,10 @@ IN: alien.parser
 | 
			
		|||
: function-quot ( return library function types -- quot )
 | 
			
		||||
    '[ _ _ _ _ alien-invoke ] ;
 | 
			
		||||
 | 
			
		||||
:: make-function ( return! library function! parameters -- word quot effect )
 | 
			
		||||
    return function normalize-c-arg function! return!
 | 
			
		||||
:: make-function ( return library function parameters -- word quot effect )
 | 
			
		||||
    return function normalize-c-arg :> ( return-c-type function )
 | 
			
		||||
    function create-in dup reset-generic
 | 
			
		||||
    return library function
 | 
			
		||||
    return-c-type library function
 | 
			
		||||
    parameters return parse-arglist [ function-quot ] dip ;
 | 
			
		||||
 | 
			
		||||
: parse-arg-tokens ( -- tokens )
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
		Reference in New Issue