steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

compiler.tests.stack-trace: use with-test-file.

locals-and-roots
John Benediktsson 2016-04-04 12:55:02 -07:00
parent da4812ba21
commit 4bfcc86cc4
1 changed files with 5 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
basis/compiler/tests/stack-trace.factor
View File

@ -1,6 +1,6 @@
USING: accessors combinators continuations grouping io.backend
io.encodings.utf8 io.files io.files.temp io.files.unique kernel
math namespaces parser sequences tools.test ;
io.encodings.utf8 io.files kernel math namespaces parser
sequences tools.test ;
IN: compiler.tests.stack-trace
: symbolic-stack-trace ( -- newseq )
@ -40,9 +40,7 @@ IN: compiler.tests.stack-trace
! #1265: Used to crash factor if compiled in debug mode.
[
[
"compiler-run-file" "-test" [
"USING: continuations io.backend ; [ normalize-path ] ignore-errors f"
swap [ utf8 set-file-contents ] keep run-file
] cleanup-unique-file
] with-temp-directory
"USING: continuations io.backend ; [ normalize-path ] ignore-errors f"
swap [ utf8 set-file-contents ] keep run-file
] with-test-file
] [ wrong-values? ] must-fail-with