mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-24 12:20:20 +02:00
Code Activity

Fix SRFI-9 for records without fields

Browse source 
* module/srfi/srfi-9.scm (define-record-type): Deal with fieldless records.
* test-suite/tests/srfi-9.test: Add a fieldless record definition.
This commit is contained in:
Andreas Rottmann 2010-06-19 14:52:56 +02:00 • committed by Andy Wingo
parent b1e5445f77
commit c4a8200fa0
2 changed files with 6 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
test-suite/tests/srfi-9.test
View file

@ -23,6 +23,8 @@
#:use-module (srfi srfi-9))
(define-record-type :qux (make-qux) qux?)
(define-record-type :foo (make-foo x) foo?
(x get-x) (y get-y set-y!))