Stack trace unit test

TODO.FACTOR.txt

@@ -35,6 +35,8 @@
 - overhaul models, set-model* is crap
 - fix windows gcc issue
 - robustify stepper -- see if step back past a throw works
+- httpd crash
+- fep when closing window
 
 + ui:
 

library/compiler/load.factor

@@ -64,4 +64,5 @@ PROVIDE: library/compiler
     "test/optimizer.factor"
     "test/alien.factor"
     "test/callbacks.factor"
+    "test/stack-trace.factor"
 } } ;

library/compiler/test/stack-trace.factor

@@ -0,0 +1,12 @@
+IN: temporary
+USING: errors compiler test namespaces sequences ;
+
+: foo 3 throw 7 ;
+: bar foo 4 ;
+: baz bar 5 ;
+\ baz compile
+[ 3 ] [ [ baz ] catch ] unit-test
+[ { foo bar baz } ] [
+    error-stack-trace get symbolic-stack-trace
+    [ second ] map [ ] subset
+] unit-test