cbaines/guile-knots
1
Fork 0
Code Issues 1 Pull requests Activity Actions

Remove Guile line numbers from backtrace tests
All checks were successful
/ test (push) Successful in 4s
Details

Browse source 
As these differ between 3.0.10 and 3.0.11.
This commit is contained in:
Christopher Baines 2026-03-22 19:12:59 +00:00
parent 33db002464
commit f203a8933a
14 changed files with 14 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

2
tests/backtraces/call-with-cached-connection.scm
View file

@ -4,7 +4,7 @@
(lambda () (lambda ()
(let ((cache (make-fixed-size-resource-pool (let ((cache (make-fixed-size-resource-pool
(list (open-input-string "fake"))))) (list (open-input-string "fake")))))
;; FIRST BACKTRACE ENTRY: 1762:12 (with-exception-handler ;; FIRST BACKTRACE ENTRY: (with-exception-handler
(with-exception-handler (with-exception-handler
(lambda (e) (lambda (e)
(print-backtrace-and-exception/knots e) (print-backtrace-and-exception/knots e)

2
tests/backtraces/call-with-resource-from-pool.scm
View file

@ -3,7 +3,7 @@
(run-fibers (run-fibers
(lambda () (lambda ()
(let ((pool (make-resource-pool (const 'resource) 1))) (let ((pool (make-resource-pool (const 'resource) 1)))
;; FIRST BACKTRACE ENTRY: 1762:12 (with-exception-handler ;; FIRST BACKTRACE ENTRY: (with-exception-handler
(with-exception-handler (with-exception-handler
(lambda (e) (lambda (e)
(print-backtrace-and-exception/knots e) (print-backtrace-and-exception/knots e)

2
tests/backtraces/call-with-thread.scm
View file

@ -2,7 +2,7 @@
(define thread-pool (make-fixed-size-thread-pool 1)) (define thread-pool (make-fixed-size-thread-pool 1))
;; FIRST BACKTRACE ENTRY: 1762:12 (with-exception-handler ;; FIRST BACKTRACE ENTRY: (with-exception-handler
(with-exception-handler (with-exception-handler
(lambda (exn) (lambda (exn)
(print-backtrace-and-exception/knots exn) (print-backtrace-and-exception/knots exn)

2
tests/backtraces/fibers-force.scm
View file

@ -2,7 +2,7 @@
(run-fibers (run-fibers
(lambda () (lambda ()
;; FIRST BACKTRACE ENTRY: 1762:12 (with-exception-handler ;; FIRST BACKTRACE ENTRY: (with-exception-handler
(with-exception-handler (with-exception-handler
(lambda (e) (lambda (e)
(print-backtrace-and-exception/knots e) (print-backtrace-and-exception/knots e)

2
tests/backtraces/fibers-map.scm
View file

@ -7,7 +7,7 @@
;; To avoid the test hanging if there's an exception ;; To avoid the test hanging if there's an exception
(primitive-exit 1)) (primitive-exit 1))
(lambda () (lambda ()
;; FIRST BACKTRACE ENTRY: 1762:12 (with-exception-handler ;; FIRST BACKTRACE ENTRY: (with-exception-handler
(with-exception-handler (with-exception-handler
(lambda (e) (lambda (e)
(print-backtrace-and-exception/knots e) (print-backtrace-and-exception/knots e)

2
tests/backtraces/guile-error-deep-in-thread.scm
View file

@ -7,7 +7,7 @@
(+ 1 'a))) ; LAST BACKTRACE ENTRY HERE (+ 1 'a))) ; LAST BACKTRACE ENTRY HERE
'unreachable)) 'unreachable))
;; FIRST BACKTRACE ENTRY: 1762:12 (with-exception-handler ;; FIRST BACKTRACE ENTRY: (with-exception-handler
(with-exception-handler (with-exception-handler
(lambda (exn) (lambda (exn)
(print-backtrace-and-exception/knots exn) (print-backtrace-and-exception/knots exn)

2
tests/backtraces/guile-error-in-thread.scm
View file

@ -1,6 +1,6 @@
(use-modules (knots)) (use-modules (knots))
;; FIRST BACKTRACE ENTRY: 1762:12 (with-exception-handler ;; FIRST BACKTRACE ENTRY: (with-exception-handler
(with-exception-handler (with-exception-handler
(lambda (exn) (lambda (exn)
(print-backtrace-and-exception/knots exn) (print-backtrace-and-exception/knots exn)

2
tests/backtraces/nested-parallelism.scm
View file

@ -30,7 +30,7 @@
(define result (define result
(run-fibers (run-fibers
(lambda () (lambda ()
;; FIRST BACKTRACE ENTRY: 1762:12 (with-exception-handler ;; FIRST BACKTRACE ENTRY: (with-exception-handler
(with-exception-handler (with-exception-handler
(lambda (e) (lambda (e)
(print-backtrace-and-exception/knots e) (print-backtrace-and-exception/knots e)

2
tests/backtraces/plain-exception.scm
View file

@ -1,6 +1,6 @@
(use-modules (knots)) (use-modules (knots))
;; FIRST BACKTRACE ENTRY: 1762:12 (with-exception-handler ;; FIRST BACKTRACE ENTRY: (with-exception-handler
(with-exception-handler (with-exception-handler
(lambda (exn) (lambda (exn)

2
tests/backtraces/temporary-thread.scm
View file

@ -1,6 +1,6 @@
(use-modules (knots)) (use-modules (knots))
;; FIRST BACKTRACE ENTRY: 1762:12 (with-exception-handler ;; FIRST BACKTRACE ENTRY: (with-exception-handler
(with-exception-handler (with-exception-handler
(lambda (exn) (lambda (exn)
(print-backtrace-and-exception/knots exn) (print-backtrace-and-exception/knots exn)

2
tests/backtraces/triple-with-exception-handler.scm
View file

@ -1,6 +1,6 @@
(use-modules (knots)) (use-modules (knots))
;; FIRST BACKTRACE ENTRY: 1762:12 (with-exception-handler ;; FIRST BACKTRACE ENTRY: (with-exception-handler
(with-exception-handler (with-exception-handler
(lambda _ #f) (lambda _ #f)

2
tests/backtraces/vhash-fold-in-thread.scm
View file

@ -14,7 +14,7 @@
#f) #f)
'done)) 'done))
;; FIRST BACKTRACE ENTRY: 1762:12 (with-exception-handler ;; FIRST BACKTRACE ENTRY: (with-exception-handler
(with-exception-handler (with-exception-handler
(lambda (exn) (lambda (exn)
(print-backtrace-and-exception/knots exn) (print-backtrace-and-exception/knots exn)

2
tests/backtraces/vhash-fold.scm
View file

@ -14,7 +14,7 @@
#f) #f)
'done)) 'done))
;; FIRST BACKTRACE ENTRY: 1762:12 (with-exception-handler ;; FIRST BACKTRACE ENTRY: (with-exception-handler
(with-exception-handler (with-exception-handler
(lambda (exn) (lambda (exn)
(print-backtrace-and-exception/knots exn) (print-backtrace-and-exception/knots exn)

2
tests/backtraces/wrapped-exception.scm
View file

@ -1,6 +1,6 @@
(use-modules (knots)) (use-modules (knots))
;; FIRST BACKTRACE ENTRY: 1762:12 (with-exception-handler ;; FIRST BACKTRACE ENTRY: (with-exception-handler
(with-exception-handler (with-exception-handler
(lambda (exn) (lambda (exn)
(print-backtrace-and-exception/knots exn) (print-backtrace-and-exception/knots exn)