On 1/10/07, Daniel Sadilek <[EMAIL PROTECTED]> wrote:
Hello,
this program causes a segmentation fault on Windows (cygwin) and Linux
with Chicken 2.5:
(define-record record value)
(print (make-record 1))
If I rename the record it works:
(define-record foo value)
(print (make-foo 1))
Uh oh - the printer thinks this is a special case, which it isn't.
IIRC this is left over from times where a different record-type
facility was internally supported.
Sorry, here is a patch for library.scm:
2779,2780c2779
< [typename (if (eq? 'record type) (##sys#slot (##sys#slot x 1) 1) type)]
< [a (assq typename ##sys#record-printers)] )
---
[a (assq type ##sys#record-printers)] )
cheers,
felix
_______________________________________________
Chicken-users mailing list
Chicken-users@nongnu.org
http://lists.nongnu.org/mailman/listinfo/chicken-users