summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMikael Djurfeldt <djurfeldt@nada.kth.se>2001-03-12 15:03:17 +0000
committerMikael Djurfeldt <djurfeldt@nada.kth.se>2001-03-12 15:03:17 +0000
commit8cdeee7d7875111169f65a26ca72d05ac2aa321f (patch)
tree773444fa73fe843df0a3c092d5b6474cc68c01bc
parente11208ca72463ef39e25e81d0245637b2e586f60 (diff)
downloadguile-8cdeee7d7875111169f65a26ca72d05ac2aa321f.tar.gz
* arrays.scm (make-array): Added quote in front of ().
-rw-r--r--ice-9/ChangeLog4
-rw-r--r--ice-9/arrays.scm4
2 files changed, 6 insertions, 2 deletions
diff --git a/ice-9/ChangeLog b/ice-9/ChangeLog
index 4ce20506a..6dbd2a55c 100644
--- a/ice-9/ChangeLog
+++ b/ice-9/ChangeLog
@@ -1,3 +1,7 @@
+2001-03-12 Mikael Djurfeldt <mdj@linnaeus.mit.edu>
+
+ * arrays.scm (make-array): Added quote in front of ().
+
2001-03-12 Keisuke Nishida <kxn30@po.cwru.edu>
* common-list.scm (count-if): New procedure.
diff --git a/ice-9/arrays.scm b/ice-9/arrays.scm
index 51be69210..7d249795e 100644
--- a/ice-9/arrays.scm
+++ b/ice-9/arrays.scm
@@ -1,6 +1,6 @@
;;; installed-scm-file
-;;;; Copyright (C) 1999 Free Software Foundation, Inc.
+;;;; Copyright (C) 1999, 2001 Free Software Foundation, Inc.
;;;;
;;;; This program is free software; you can redistribute it and/or modify
;;;; it under the terms of the GNU General Public License as published by
@@ -30,7 +30,7 @@
(define uniform-vector-write uniform-array-write)
(define (make-array fill . args)
- (dimensions->uniform-array args () fill))
+ (dimensions->uniform-array args '() fill))
(define (make-uniform-array prot . args)
(dimensions->uniform-array args prot))
(define (list->array ndim lst)