integrate cfgperl changes into mainline
[p5sagit/p5-mst-13.2.git] / ext / ODBM_File / typemap
index c2c3e3e..5e12e73 100644 (file)
@@ -14,12 +14,12 @@ FATALFUNC           T_OPAQUEPTR
 
 INPUT
 T_DATUM
-       $var.dptr = SvPV($arg, na);
-       $var.dsize = (int)na;
+       $var.dptr = SvPV($arg, PL_na);
+       $var.dsize = (int)PL_na;
 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);