diff options
Diffstat (limited to 'perl/typemap')
| -rw-r--r-- | perl/typemap | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/perl/typemap b/perl/typemap index 752ca0d..2cc5e0c 100644 --- a/perl/typemap +++ b/perl/typemap @@ -1,11 +1,11 @@ TYPEMAP char * T_PV const char * T_PV -guestfs_h * O_OBJECT_guestfs_h +hive_h * O_OBJECT_hive_h int64_t T_IV INPUT -O_OBJECT_guestfs_h +O_OBJECT_hive_h if (sv_isobject ($arg) && SvTYPE (SvRV ($arg)) == SVt_PVMG) $var = ($type) SvIV ((SV *) SvRV ($arg)); else { @@ -14,5 +14,5 @@ O_OBJECT_guestfs_h } OUTPUT -O_OBJECT_guestfs_h - sv_setref_pv ($arg, "Sys::Guestfs", (void *) $var); +O_OBJECT_hive_h + sv_setref_pv ($arg, "Win::Hivex", (void *) $var); |