Christopher Baines
b3fa4d069b
All checks were successful
/ test (push) Successful in 6s
Try and improve the print-backtrace-and-exception/knots output, be selective about the stack frames which are shown to try and produce some useful output which reflects user code and hide the &knots-exceptions. This commit also introduces a bunch of tests scripts that produce output from print-backtrace-and-exception/knots, to help test this code in different situations.
16 lines
476 B
Scheme
16 lines
476 B
Scheme
(use-modules (knots))
|
|
|
|
;; FIRST BACKTRACE ENTRY: 1762:12 (with-exception-handler
|
|
(with-exception-handler
|
|
(lambda (exn)
|
|
(print-backtrace-and-exception/knots exn)
|
|
(primitive-exit 1))
|
|
(lambda ()
|
|
(with-exception-handler
|
|
(lambda (exn)
|
|
(raise-exception
|
|
(make-exception
|
|
exn
|
|
(make-knots-exception (make-stack #t)))))
|
|
(lambda ()
|
|
(error "wrapped error message"))))) ; LAST BACKTRACE ENTRY HERE
|