diff options
author | Andy Wingo <wingo@pobox.com> | 2019-10-23 14:25:21 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2019-10-23 14:42:35 +0200 |
commit | 99a95383cf405ab0284f98adda41ab4989d9a038 (patch) | |
tree | 397dec77a551e1de3ec3fe2973d55edd04f68254 /test-suite/tests | |
parent | f116bd100915a605ce75d6b4d4b08688a81f1e5b (diff) | |
download | guile-99a95383cf405ab0284f98adda41ab4989d9a038.tar.gz |
Rebase srfi-35 conditions on top of make-record-type
* module/srfi/srfi-35.scm: Import (ice-9 match), and remove now-unused
srfi-1 import.
(print-condition): Print more like records, as appears to be the
intention.
(&condition): Define using make-record-type. Adapt all callers.
Also, compound conditions are now a disjoint type, handled specially
by condition-ref, condition?, and so on.
* test-suite/tests/srfi-35.test (v3): Fix an error in which a
subcondition was initialized without initializers for all of its
fields.
Diffstat (limited to 'test-suite/tests')
-rw-r--r-- | test-suite/tests/srfi-35.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test-suite/tests/srfi-35.test b/test-suite/tests/srfi-35.test index 5e4cb271e..df73c8442 100644 --- a/test-suite/tests/srfi-35.test +++ b/test-suite/tests/srfi-35.test @@ -203,7 +203,7 @@ (define v3 (condition (&c1 (x "V3/1") (a "a3")) - (&c2 (b "b3")))) + (&c2 (x #f) (b "b3")))) (define v4 (make-compound-condition v1 v2)) |