diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2023-12-13 11:06:57 +0100 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2023-12-13 11:17:34 +0100 |
| commit | 00a66eca0f32fcf585d2c21375641020e877e3ea (patch) | |
| tree | c2aceeb5047bf46e03726e1c5e8378cf86a4df63 /testrunner.scm | |
| parent | Fix sxml namespaced util. (diff) | |
| download | calp-00a66eca0f32fcf585d2c21375641020e877e3ea.tar.gz calp-00a66eca0f32fcf585d2c21375641020e877e3ea.tar.xz | |
Update things depending on namespaced sxml.sxml-work
Update all code to emit correctly formed namespaced sxml objects,
instead of the old list based approach.
Also introduces a number of typechecks which in semi-related parts of
the code.
Note that the webdav-server test is currently broken.
Diffstat (limited to 'testrunner.scm')
| -rwxr-xr-x | testrunner.scm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/testrunner.scm b/testrunner.scm index 8abea1e2..a757fdee 100755 --- a/testrunner.scm +++ b/testrunner.scm @@ -183,7 +183,12 @@ exec "$GUILE" --debug --no-auto-compile -e main -s "$0" "$@" (lambda args (enqueue! (format-test-runner-crash-message args) error-queue) - (values #f '())))) + (values #f '())) + (lambda _ + ;; TODO make backtrace configurable + ;; TODO backtrace should be placed AFTER the error + (enqueue! (with-output-to-string (lambda () (backtrace))) error-queue) + ))) (catch 'wrong-type-arg (lambda () (typecheck module-names (list-of (list-of symbol?)))) (lambda (_ __ fmt args ___) |