From 9c3793dc239ea1995755f391f1be3dccb3b75d99 Mon Sep 17 00:00:00 2001
From: PHO <pho@cielonegro.org>
Date: Wed, 1 Sep 2010 00:54:55 +0900
Subject: [PATCH] apr_month_snames and apr_day_snames should be #globalarray

---
 Bindings/APR/Time.hsc   | 5 ++---
 cbits/helper_apr_time.c | 8 ++++++++
 2 files changed, 10 insertions(+), 3 deletions(-)

diff --git a/Bindings/APR/Time.hsc b/Bindings/APR/Time.hsc
index 9c70322..2c9722d 100644
--- a/Bindings/APR/Time.hsc
+++ b/Bindings/APR/Time.hsc
@@ -7,9 +7,8 @@ import Bindings.APR
 import Bindings.APR.ErrNo
 import Bindings.APR.Pools
 
--- Isn't there a better way than this?
-#pointer apr_month_snames
-#pointer apr_day_snames
+#globalarray apr_month_snames, Ptr (Ptr CChar)
+#globalarray apr_day_snames  , Ptr (Ptr CChar)
 
 #integral_t apr_time_t
 #pointer APR_TIME_T_FMT
diff --git a/cbits/helper_apr_time.c b/cbits/helper_apr_time.c
index 9c22ba6..54e0f37 100644
--- a/cbits/helper_apr_time.c
+++ b/cbits/helper_apr_time.c
@@ -1,6 +1,14 @@
 #include <bindings.cmacros.h>
 #include <apr_time.h>
 
+const char (*array_apr_month_snames(void))[12][4] {
+    return &apr_month_snames;
+}
+
+const char (*array_apr_day_snames(void))[7][4] {
+    return &apr_day_snames;
+}
+
 BC_INLINE1(apr_time_sec , apr_time_t, apr_time_t)
 BC_INLINE1(apr_time_usec, apr_time_t, apr_time_t)
 BC_INLINE1(apr_time_msec, apr_time_t, apr_time_t)
-- 
2.40.0