diff options
author | Kevin Ryde <user42@zip.com.au> | 2004-07-04 23:57:10 +0000 |
---|---|---|
committer | Kevin Ryde <user42@zip.com.au> | 2004-07-04 23:57:10 +0000 |
commit | c0967f56b0c26745cec559d8faffbb814c87ca43 (patch) | |
tree | 2a25b4142cb592f28458ac9c2081986a6191361e /srfi/srfi-4.c | |
parent | ae7ded5671c02092b767a643c73d5b1a20368309 (diff) | |
download | guile-c0967f56b0c26745cec559d8faffbb814c87ca43.tar.gz |
(uvec_sizes): Add "const".
Diffstat (limited to 'srfi/srfi-4.c')
-rw-r--r-- | srfi/srfi-4.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/srfi/srfi-4.c b/srfi/srfi-4.c index 1d5e9820f..4a37112ed 100644 --- a/srfi/srfi-4.c +++ b/srfi/srfi-4.c @@ -1,6 +1,6 @@ /* srfi-4.c --- Homogeneous numeric vector datatypes. * - * Copyright (C) 2001 Free Software Foundation, Inc. + * Copyright (C) 2001, 2004 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 @@ -73,7 +73,7 @@ int scm_tc16_uvec = 0; /* This array maps type tags to the size of the elements. */ -static int uvec_sizes[10] = {1, 1, 2, 2, 4, 4, 8, 8, 4, 8}; +static const int uvec_sizes[10] = {1, 1, 2, 2, 4, 4, 8, 8, 4, 8}; #if SCM_HAVE_T_INT64 |