read-unit-test ( -- str/f )
Scaffold tool

Prev:

scaffold-unit-tests ( vocab -- )

Vocabulary
tools.scaffold

Inputs
None

Outputs

str/f

a string or f

Word description
Consumes a code snippet from input stream, runs it, and returns a unit-test code snippet for use with tools.test vocabulary. If no characters were read before the empty line returns f instead. On the interactive listener input is consumed until an empty line.

See also
run-string, make-unit-test, scaffold-unit-tests

Definition

USING: io kernel prettyprint prettyprint.config sequences ;

IN: tools.scaffold

: read-unit-test ( -- str/f )
    read-contents
    [ f ] [
        [ run-string [ unparse ] without-limits ] keep
        make-unit-test
    ] if-empty ;