]> gitweb.factorcode.org Git - factor.git/commitdiff
compiler.tests.stack-trace: Fix unit test.
authorDoug Coleman <doug.coleman@gmail.com>
Sat, 17 Jan 2015 21:57:56 +0000 (13:57 -0800)
committerDoug Coleman <doug.coleman@gmail.com>
Sat, 17 Jan 2015 21:57:56 +0000 (13:57 -0800)
basis/compiler/tests/stack-trace.factor

index 9c779cfe6d8acd159d6b1943a18f84d6e63b5e5d..9af2b88d2fd9646ae64fae630944bbc48fe8dfed 100644 (file)
@@ -1,7 +1,8 @@
-USING: accessors combinators.short-circuit compiler continuations
-continuations.private fry generic generic.hook grouping io.backend
-io.encodings.utf8 io.files io.files.temp kernel kernel.private math namespaces
-parser sequences sorting splitting tools.test vocabs words ;
+USING: accessors combinators combinators.short-circuit compiler
+continuations continuations.private fry generic generic.hook
+grouping io.backend io.encodings.utf8 io.files io.files.temp
+kernel kernel.private math namespaces parser sequences sorting
+splitting tools.test vocabs words ;
 IN: compiler.tests.stack-trace
 
 : symbolic-stack-trace ( -- newseq )
@@ -38,8 +39,8 @@ IN: compiler.tests.stack-trace
     call>> callstack>array [ f = ] any?
 ] unit-test
 
-! Crashes 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
-] unit-test
+] [ wrong-values? ] must-fail-with