mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 03:40:34 +02:00
Code Activity

Remove extra 'error' call in 'make-record-type'.

Browse source 
* module/ice-9/boot-9.scm (make-record-type)[computed-fields]: Remove
extra 'error' call.
This commit is contained in:
Ludovic Courtès 2020-03-06 17:59:51 +01:00
parent d49453259b
commit 8a25546a94
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
module/ice-9/boot-9.scm
View file

@ -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)