diff --git a/piclib/built-in.scm b/piclib/built-in.scm index 0307e54f..809b7c1f 100644 --- a/piclib/built-in.scm +++ b/piclib/built-in.scm @@ -886,4 +886,9 @@ `(define-record-field ,type ,(car x) ,(cadr x) ,@(cddr x))) field-tag)))))) - (export define-record-type)) + (export define-record-type vector?)) + +(import (picrin record)) + +(export vector? ; override definition + define-record-type)