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

Prev:	must-infer-as
Next:	with-test-file ( ..a quot: ( ..a path -- ..b ) -- ..b )

Vocabulary
tools.test

Inputs

quot	a quotation with stack effect ( ..a -- ..b )

Outputs
None

Definition

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

IN: tools.test

: with-test-directory ( ..a quot: ( ..a -- ..b ) -- ..b )
    [ cleanup-unique-directory ] with-temp-directory ; inline