From 0b1438a9dab2d9388e02d23d261bc7e45487d4a1 Mon Sep 17 00:00:00 2001 From: Yuichi Nishiwaki Date: Wed, 19 Feb 2014 01:41:35 +0900 Subject: [PATCH] cleanup --- piclib/built-in.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/piclib/built-in.scm b/piclib/built-in.scm index b9826de2..ef5d4dfc 100644 --- a/piclib/built-in.scm +++ b/piclib/built-in.scm @@ -796,7 +796,7 @@ (record-set! new 1 name) (record-set! new 2 field-tags) new)) - + (define (record-type record) (record-ref record 0)) @@ -863,7 +863,7 @@ (record-accessor ,type ',field-tag)) (define ,(cadr acc-mod) (record-modifier ,type ',field-tag)))))))) - + (define-syntax define-record-type (ir-macro-transformer (lambda (form inject compare?)