-# $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
# 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