mes: Rename make-vector to core:make-vector.
[mes.git] / module / mes / scm.mes
index 550ec6c6e7b0f760d0844f9484b3ca573b990ffe..438568ade9ddaa0229daa898eecd36358d12b95b 100644 (file)
 \f
 ;; Vector
 (define (vector . rest) (list->vector rest))
-(define c:make-vector make-vector)
 (define (make-vector n . x)
-  (if (null? x) (c:make-vector n)
+  (if (null? x) (core:make-vector n)
       (list->vector (apply make-list (cons n x)))))
 
 (define (vector-copy x)