mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-03 13:20:26 +02:00
2006-02-01 Ludovic Courtès <ludovic.courtes@laas.fr>
* deprecated.scm (make-uniform-array): Fill the returned vector with PROT, per guile 1.6 behaviour.
This commit is contained in:
parent
aa092c5d7f
commit
1d314ec23b
1 changed files with 3 additions and 3 deletions
|
@ -1,4 +1,4 @@
|
|||
;;;; Copyright (C) 2003 Free Software Foundation, Inc.
|
||||
;;;; Copyright (C) 2003, 2006 Free Software Foundation, Inc.
|
||||
;;;;
|
||||
;;;; This library is free software; you can redistribute it and/or
|
||||
;;;; modify it under the terms of the GNU Lesser General Public
|
||||
|
@ -173,8 +173,8 @@
|
|||
|
||||
(define make-uniform-vector dimensions->uniform-array)
|
||||
|
||||
(define (make-uniform-array prot . args)
|
||||
(dimensions->uniform-array args prot))
|
||||
(define (make-uniform-array prot . bounds)
|
||||
(dimensions->uniform-array bounds prot prot))
|
||||
|
||||
(define (list->uniform-vector prot lst)
|
||||
(list->uniform-array 1 prot lst))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue