diff --git a/collects/rnrs/conditions-6.ss b/collects/rnrs/conditions-6.ss index a25ed3ac02..8322e13893 100644 --- a/collects/rnrs/conditions-6.ss +++ b/collects/rnrs/conditions-6.ss @@ -133,7 +133,7 @@ #f)))) null) (if (exn:fail:contract:variable? c) - (make-undefined-violation) + (list (make-undefined-violation)) null))] [else (raise-type-error 'simple-conditions "condition"