[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] 02/02: Remove extra 'error' call in 'make-record-type'.
From: |
Ludovic Courtès |
Subject: |
[Guile-commits] 02/02: Remove extra 'error' call in 'make-record-type'. |
Date: |
Fri, 6 Mar 2020 12:08:54 -0500 (EST) |
civodul pushed a commit to branch master
in repository guile.
commit 8a25546a9458b8416d80bb80f925d0c1f11ec197
Author: Ludovic Courtès <address@hidden>
AuthorDate: Fri Mar 6 17:59:51 2020 +0100
Remove extra 'error' call in 'make-record-type'.
* module/ice-9/boot-9.scm (make-record-type)[computed-fields]: Remove
extra 'error' call.
---
module/ice-9/boot-9.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/module/ice-9/boot-9.scm b/module/ice-9/boot-9.scm
index 39efcb5..004d139 100644
--- a/module/ice-9/boot-9.scm
+++ b/module/ice-9/boot-9.scm
@@ -1082,7 +1082,7 @@ VALUE."
(memq (car field) '(mutable immutable))
(pair? (cdr field))
(null? (cddr field)))
- (error (error "bad field declaration" field)))
+ (error "bad field declaration" field))
(cadr field))))
fields)))
(check-fields fields)