* test-suite/tests/srfi-9.test ("incompatible field paths"): Rename
':bar' to 'bar' to avoid the possibility of the symbol name being
printed with #{...}# notation.
'(syntax-error set-fields
"\
field paths (bar-i bar-j) and (bar-i foo-x) require one object \
-to belong to two different record types (:bar and foo)"
+to belong to two different record types (bar and foo)"
(set-fields s
((bar-i foo-x) 1)
((bar-i bar-j) 2)
(y foo-y set-foo-y)
(z foo-z set-foo-z))
- (define-immutable-record-type :bar
+ (define-immutable-record-type bar
(make-bar i j)
bar?
(i bar-i)