diff options
Diffstat (limited to 'gnuradio-core/src')
| -rw-r--r-- | gnuradio-core/src/guile/srfi/srfi-64.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gnuradio-core/src/guile/srfi/srfi-64.scm b/gnuradio-core/src/guile/srfi/srfi-64.scm index 4ad9ccbab..8d61b14a8 100644 --- a/gnuradio-core/src/guile/srfi/srfi-64.scm +++ b/gnuradio-core/src/guile/srfi/srfi-64.scm @@ -850,11 +850,11 @@ (define-syntax test-error (syntax-rules () ((test-error name etype expr) - (test-assert name (%test-error etype expr))) + (test-assert name (%test-error (test-runner-get) etype expr))) ((test-error etype expr) - (test-assert (%test-error etype expr))) + (test-assert (%test-error (test-runner-get) etype expr))) ((test-error expr) - (test-assert (%test-error #t expr))))))) + (test-assert (%test-error (test-runner-get) #t expr))))))) (define (test-apply first . rest) (if (test-runner? first) |