stack-checker: make this an unchecked-example.

db4
John Benediktsson 2014-10-19 08:29:51 -07:00
parent af2a53239e
commit c8cfaee9af
1 changed files with 1 additions and 1 deletions

View File

@ -85,7 +85,7 @@ $nl
"However a small change can be made:" "However a small change can be made:"
{ $example ": good ( ? quot: ( ? -- ) -- ) [ good ] 2keep [ not ] dip call ; inline recursive" "[ [ drop ] good ] infer." "( x -- )" } { $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:" "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" ": foo ( quot ? -- ) [ f foo ] [ call ] if ; inline"
"[ [ 5 ] t foo ] infer." "[ [ 5 ] t foo ] infer."
"The inline recursive word “foo” must be declared recursive\nword foo" "The inline recursive word “foo” must be declared recursive\nword foo"