From ac44b7ae086063fbe204c5b6a97b4f6b1f35e6b8 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Mon, 13 Apr 2020 10:04:39 -0700 Subject: ignwarn: handle warnings with multiple args. * share/txr/stdlib/except.tl (ignwarn): Warnings have more than one argument; the handling lambda must take variable args. --- share/txr/stdlib/except.tl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/share/txr/stdlib/except.tl b/share/txr/stdlib/except.tl index aa2c214a..15d7a365 100644 --- a/share/txr/stdlib/except.tl +++ b/share/txr/stdlib/except.tl @@ -85,4 +85,4 @@ (sys:expand-handle form try-form handle-clauses)) (defmacro ignwarn (. forms) - ^(handler-bind (lambda (exc-sym arg) (throw 'continue)) (warning) ,*forms)) + ^(handler-bind (lambda (exc-sym . args) (throw 'continue)) (warning) ,*forms)) -- cgit v1.2.3