with-test-file ( ..a quot: ( ..a path -- ..b ) -- ..b )
Factor handbook » Developer tools » Unit testing

Prev:	with-test-directory ( ..a quot: ( ..a -- ..b ) -- ..b )
Next:	test ( prefix -- )

Vocabulary
tools.test

Inputs

quot	a quotation

Outputs
None

Word description
Creates an empty temporary file and applies the quotation to it. The file is deleted after the word returns.

Definition

USING: io.files.temp io.files.unique kernel ;

IN: tools.test

: with-test-file ( ..a quot: ( ..a path -- ..b ) -- ..b )
    [ [ "" "" ] ] dip [ cleanup-unique-file ] curry compose
    with-temp-directory ; inline