no need to override vector? with export syntax

This commit is contained in:
Yuichi Nishiwaki 2014-07-19 15:13:47 +09:00
parent 88d86e1312
commit 5779fcd4e4
1 changed files with 2 additions and 3 deletions

View File

@ -572,7 +572,7 @@
`(define-record-field ,type ,(car x) ,(cadr x) ,@(cddr x)))
field-tag))))))
(export define-record-type vector?))
(export define-record-type))
(import (picrin macro)
(picrin values)
@ -586,8 +586,7 @@
(export make-parameter
parameterize)
(export vector? ; override definition
define-record-type)
(export define-record-type)
(define (every pred list)
(if (null? list)