question

Vocabulary

quiz

Definition

IN: quiz

TUPLE: question
    generator generated answer response parsed-response correct?
    ;

Methods

USING: accessors prettyprint quiz ;

M: question ask-question generated>> . ;


USING: accessors kernel quiz ;

M: question check-response
    [ parsed-response>> ] [ answer>> ] bi = ;


USING: accessors combinators kernel quiz ;

M: question generate-question
    dup generate-question* [ >>generated ] keep
    ( -- answer ) call-effect >>answer drop ;


USING: accessors quiz ;

M: question generate-question* generator>> generate-question* ;


USING: kernel quiz ;

M: question parse-response drop trim-blanks ;