From: mike <mike>
Date: Thu, 13 Oct 2005 16:01:48 +0000 (+0000)
Subject: Clearer commentary.
X-Git-Tag: cpan_1_22~451
X-Git-Url: http://lists.indexdata.dk/?a=commitdiff_plain;h=3a31be99c1d620523dc98a752ae2c665054d46cb;p=ZOOM-Perl-moved-to-github.git

Clearer commentary.
---

diff --git a/typemap b/typemap
index 4f00557..956a2b5 100644
--- a/typemap
+++ b/typemap
@@ -1,4 +1,4 @@
-# $Id: typemap,v 1.3 2005-10-11 15:40:14 mike Exp $
+# $Id: typemap,v 1.4 2005-10-13 16:01:48 mike Exp $
 
 ZOOM_connection					T_PTROBJ
 ZOOM_connection *				T_PTROBJ
@@ -24,7 +24,9 @@ const __sigset_t *				T_PTROBJ
 # type of "const char *" as T_PTROBJ -- a pointer to an opaque object.
 # This prevented the return value of ZOOM_record_get() from being
 # translated into a Perl string.  Instead, I am using T_PV, which
-# works properly.
+# works properly.  This also has the pleasant side-effect that I no
+# longer have to discard the "const" qualfiers from the arguments to
+# the functions in the .xs file.
 const char *					T_PV
 const char **					T_PTROBJ
 const struct timespec *				T_PTROBJ