conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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

5
piclib/prelude.scm
View File

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