compiler.tests.stack-trace: remove temp-file usage.
parent
beae638eab
commit
46f781a56f
|
@ -1,8 +1,6 @@
|
||||||
USING: accessors combinators combinators.short-circuit compiler
|
USING: accessors combinators continuations grouping io.backend
|
||||||
continuations continuations.private fry generic generic.hook
|
io.encodings.utf8 io.files io.files.temp io.files.unique kernel
|
||||||
grouping io.backend io.encodings.utf8 io.files io.files.temp
|
math namespaces parser sequences tools.test ;
|
||||||
kernel kernel.private math namespaces parser sequences sorting
|
|
||||||
splitting tools.test vocabs words ;
|
|
||||||
IN: compiler.tests.stack-trace
|
IN: compiler.tests.stack-trace
|
||||||
|
|
||||||
: symbolic-stack-trace ( -- newseq )
|
: symbolic-stack-trace ( -- newseq )
|
||||||
|
@ -41,6 +39,10 @@ IN: compiler.tests.stack-trace
|
||||||
|
|
||||||
! #1265: Used to crash factor if compiled in debug mode.
|
! #1265: Used to crash factor if compiled in debug mode.
|
||||||
[
|
[
|
||||||
"USING: continuations io.backend ; [ normalize-path ] ignore-errors f"
|
[
|
||||||
"weird.factor" temp-file [ utf8 set-file-contents ] keep run-file
|
"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
|
||||||
] [ wrong-values? ] must-fail-with
|
] [ wrong-values? ] must-fail-with
|
||||||
|
|
Loading…
Reference in New Issue