summaryrefslogtreecommitdiff
path: root/ext/NDBM_File
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1998-01-18 18:09:07 -0500
committerGurusamy Sarathy <gsar@cpan.org>1998-01-19 04:10:43 +0000
commit189b2af51bf236b53a02db0b105a3de423d3fff4 (patch)
treee144975915f994ffa46db0ce8f0bc73998c7566d /ext/NDBM_File
parentf5cd9d9c4a18b1d2556c41570273131b83659fe4 (diff)
downloadperl-189b2af51bf236b53a02db0b105a3de423d3fff4.tar.gz
[win32] Fix autovivification problems with XSUB OUTPUT args
Message-Id: <199801190409.XAA26710@aatma.engin.umich.edu> Subject: [PATCH] XSUB OUTPUT arguments and 'set' magic p4raw-id: //depot/win32/perl@430
Diffstat (limited to 'ext/NDBM_File')
-rw-r--r--ext/NDBM_File/typemap4
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/NDBM_File/typemap b/ext/NDBM_File/typemap
index a9b73d8b81..73ad370359 100644
--- a/ext/NDBM_File/typemap
+++ b/ext/NDBM_File/typemap
@@ -20,8 +20,8 @@ T_GDATUM
UNIMPLEMENTED
OUTPUT
T_DATUM
- sv_setpvn($arg, $var.dptr, $var.dsize);
+ SvSetMagicPVN($arg, $var.dptr, $var.dsize);
T_GDATUM
- sv_usepvn($arg, $var.dptr, $var.dsize);
+ SvUseMagicPVN($arg, $var.dptr, $var.dsize);
T_PTROBJ
sv_setref_pv($arg, dbtype, (void*)$var);