From 075530a6850ebf899e8874d7675fd900577c9554 Mon Sep 17 00:00:00 2001 From: nobu Date: Sat, 31 May 2008 09:28:20 +0000 Subject: * suppress warnings with -Wwrite-string. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@16716 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- pack.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'pack.c') diff --git a/pack.c b/pack.c index 255f74de82..5408f7e9b2 100644 --- a/pack.c +++ b/pack.c @@ -475,7 +475,7 @@ pack_pack(VALUE ary, VALUE fmt) continue; } if (*p == '_' || *p == '!') { - const char *natstr = "sSiIlL"; + static const char natstr[] = "sSiIlL"; if (strchr(natstr, type)) { #ifdef NATINT_PACK @@ -1335,7 +1335,7 @@ pack_unpack(VALUE str, VALUE fmt) } star = 0; if (*p == '_' || *p == '!') { - const char *natstr = "sSiIlL"; + static const char natstr[] = "sSiIlL"; if (strchr(natstr, type)) { #ifdef NATINT_PACK -- cgit v1.2.3