Paste: help-lint error

Author: elasticdog
Mode: factor
Date: Tue, 7 Apr 2009 22:29:08
Plain Text |
USING: help.markup help.syntax strings ;
IN: poker

HELP: <hand>
{ $values { "str" string } { "hand" "a new hand" } }
{ $description "Creates a new poker hand containing the cards specified in " { $snippet "str" } "." }
{ $examples
    { $example "USING: math.order poker prettyprint ;"
        "\"AC KC QC JC TC\" \"7C 6D 5H 4S 2C\" [ <hand> ] bi@ <=> ." "+lt+" }
    { $example "USING: poker prettyprint ;"
        "\"TC 9C 8C 7C 6C\" \"TH 9H 8H 7H 6H\" [ <hand> ] bi@ = ." "t" }
}
{ $notes "Cards may be specified in any order. Hands are directly comparable to each other on the basis of their computed value. Two hands are considered equal when they would tie in a game (despite being composed of different cards)." } ;


! -------------------------------------------

( scratchpad ) "poker" help-lint
Checking poker...
Checking poker.arrays...
Checking poker.private...

==== poker:

In <hand>
Assertion failed
Expect: "+lt+"
Got:    "2: \"AC KC QC JC TC\" \"7C 6D 5H 4S 2C\" [ <hand> ] bi@ <=> .\n   ..."

New Annotation

Summary:
Author:
Mode:
Body: