stack-checker: make this an unchecked-example.
							parent
							
								
									af2a53239e
								
							
						
					
					
						commit
						c8cfaee9af
					
				| 
						 | 
				
			
			@ -85,7 +85,7 @@ $nl
 | 
			
		|||
"However a small change can be made:"
 | 
			
		||||
{ $example ": good ( ? quot: ( ? -- ) -- ) [ good ] 2keep [ not ] dip call ; inline recursive" "[ [ drop ] good ] infer." "( x -- )" }
 | 
			
		||||
"An inline recursive word must have a fixed stack effect in its base case. The following will not infer:"
 | 
			
		||||
{ $example
 | 
			
		||||
{ $unchecked-example
 | 
			
		||||
    ": foo ( quot ? -- ) [ f foo ] [ call ] if ; inline"
 | 
			
		||||
    "[ [ 5 ] t foo ] infer."
 | 
			
		||||
    "The inline recursive word “foo” must be declared recursive\nword foo"
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
		Reference in New Issue