mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-13 15:10:34 +02:00
Code Activity

(uniform-vector-fill!, make-uniform-vector,

Browse source 
make-uniform-array,list->uniform-array): Deprecated for real.
This commit is contained in:
Marius Vollmer 2005-01-02 21:00:43 +00:00
parent c34e5780b0
commit d030cad861
1 changed files with 8 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

4
ice-9/arrays.scm
View file

@ -24,6 +24,8 @@
;; deprecated ;; deprecated
(begin-deprecated
(define uniform-vector-fill! array-fill!) (define uniform-vector-fill! array-fill!)
(define make-uniform-vector dimensions->uniform-array) (define make-uniform-vector dimensions->uniform-array)
@ -32,4 +34,4 @@
(dimensions->uniform-array args prot)) (dimensions->uniform-array args prot))
(define (list->uniform-vector prot lst) (define (list->uniform-vector prot lst)
(list->uniform-array 1 prot lst)) (list->uniform-array 1 prot lst)))