Use debugger to print an error if startup hook fails; fixes #39
parent
9b23085c95
commit
7d99ff0900
|
@ -1,4 +1,4 @@
|
||||||
USING: init command-line.startup debugger system
|
USING: init io command-line.startup debugger system
|
||||||
continuations parser.notes namespaces ;
|
continuations parser.notes namespaces ;
|
||||||
|
|
||||||
[
|
[
|
||||||
|
@ -6,6 +6,7 @@ continuations parser.notes namespaces ;
|
||||||
t parser-quiet? set-global
|
t parser-quiet? set-global
|
||||||
|
|
||||||
boot
|
boot
|
||||||
do-startup-hooks
|
[ do-startup-hooks command-line-startup ]
|
||||||
[ command-line-startup ] [ print-error 1 exit ] recover
|
[ print-error :c flush 1 exit ]
|
||||||
|
recover
|
||||||
] set-startup-quot
|
] set-startup-quot
|
||||||
|
|
Loading…
Reference in New Issue