diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1998-02-08 21:31:55 -0500 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-02-09 07:30:19 +0000 |
commit | ef50df4b2435a16251e94335bad8aa9485e4478c (patch) | |
tree | f9c34021c30005404fdcb5adf18834ff2a160052 /ext | |
parent | d9bb4600de3a7f46a4972e4a2d2e5d1ea333bb0a (diff) | |
download | perl-ef50df4b2435a16251e94335bad8aa9485e4478c.tar.gz |
[win32] enhancements to previous patch for XSUB OUTPUT args
Message-Id: <199802090731.CAA04438@aatma.engin.umich.edu>
Subject: Re: [PATCH] XSUB OUTPUT arguments and 'set' magic
p4raw-id: //depot/win32/perl@492
Diffstat (limited to 'ext')
-rw-r--r-- | ext/GDBM_File/typemap | 4 | ||||
-rw-r--r-- | ext/NDBM_File/typemap | 4 | ||||
-rw-r--r-- | ext/ODBM_File/typemap | 4 | ||||
-rw-r--r-- | ext/SDBM_File/typemap | 4 |
4 files changed, 8 insertions, 8 deletions
diff --git a/ext/GDBM_File/typemap b/ext/GDBM_File/typemap index 73ad370359..a9b73d8b81 100644 --- a/ext/GDBM_File/typemap +++ b/ext/GDBM_File/typemap @@ -20,8 +20,8 @@ T_GDATUM UNIMPLEMENTED OUTPUT T_DATUM - SvSetMagicPVN($arg, $var.dptr, $var.dsize); + sv_setpvn($arg, $var.dptr, $var.dsize); T_GDATUM - SvUseMagicPVN($arg, $var.dptr, $var.dsize); + sv_usepvn($arg, $var.dptr, $var.dsize); T_PTROBJ sv_setref_pv($arg, dbtype, (void*)$var); diff --git a/ext/NDBM_File/typemap b/ext/NDBM_File/typemap index 73ad370359..a9b73d8b81 100644 --- a/ext/NDBM_File/typemap +++ b/ext/NDBM_File/typemap @@ -20,8 +20,8 @@ T_GDATUM UNIMPLEMENTED OUTPUT T_DATUM - SvSetMagicPVN($arg, $var.dptr, $var.dsize); + sv_setpvn($arg, $var.dptr, $var.dsize); T_GDATUM - SvUseMagicPVN($arg, $var.dptr, $var.dsize); + sv_usepvn($arg, $var.dptr, $var.dsize); T_PTROBJ sv_setref_pv($arg, dbtype, (void*)$var); diff --git a/ext/ODBM_File/typemap b/ext/ODBM_File/typemap index c2c3e3e725..a6b0e5faa8 100644 --- a/ext/ODBM_File/typemap +++ b/ext/ODBM_File/typemap @@ -20,6 +20,6 @@ T_GDATUM UNIMPLEMENTED OUTPUT T_DATUM - SvSetMagicPVN($arg, $var.dptr, $var.dsize); + sv_setpvn($arg, $var.dptr, $var.dsize); T_GDATUM - SvUseMagicPVN($arg, $var.dptr, $var.dsize); + sv_usepvn($arg, $var.dptr, $var.dsize); diff --git a/ext/SDBM_File/typemap b/ext/SDBM_File/typemap index 73ad370359..a9b73d8b81 100644 --- a/ext/SDBM_File/typemap +++ b/ext/SDBM_File/typemap @@ -20,8 +20,8 @@ T_GDATUM UNIMPLEMENTED OUTPUT T_DATUM - SvSetMagicPVN($arg, $var.dptr, $var.dsize); + sv_setpvn($arg, $var.dptr, $var.dsize); T_GDATUM - SvUseMagicPVN($arg, $var.dptr, $var.dsize); + sv_usepvn($arg, $var.dptr, $var.dsize); T_PTROBJ sv_setref_pv($arg, dbtype, (void*)$var); |