Permalink
Browse files

Remove ALPM_Group and T_GROUP from typemap.

  • Loading branch information...
1 parent 14fc001 commit 6ba2efac10fc60c20d8f25b046ead071e454977d @juster committed Feb 24, 2012
Showing with 0 additions and 19 deletions.
  1. +0 −19 typemap
View
@@ -8,7 +8,6 @@ ALPM_SyncDB T_ALPM_SYNCDB
ALPM_Package T_ALPM_PACKAGE
ALPM_PackageFree T_ALPM_PACKAGEFREE
ALPM_PackageOrNull T_ALPM_PACKAGEORNULL
-ALPM_Group T_ALPM_GROUP
ALPM_SigLevel T_SIGLEVEL
PackageListFree L_PACKAGE_FREE
@@ -82,16 +81,6 @@ T_ALPM_PACKAGEFREE
\"$var\", \"ALPM::PackageFree\")
}
-T_ALPM_GROUP
- if(sv_derived_from($arg, \"ALPM::Group\")){
- IV tmp = SvIV((SV*)SvRV($arg));
- $var = INT2PTR($type,tmp);
- }else{
- Perl_croak(aTHX_ \"%s: %s is not of type %s\",
- ${$ALIAS?\q[GvNAME(CvGV(cv))]:\qq[\"$pname\"]},
- \"$var\", \"ALPM::Group\")
- }
-
T_SIGLEVEL
$var = p2c_siglevel($arg);
@@ -153,14 +142,6 @@ T_ALPM_PACKAGEORNULL
}
sv_setref_pv($arg, \"ALPM::Package\", (void *)$var);
-T_ALPM_GROUP
- if ( $var == NULL ) {
- $arg = &PL_sv_undef;
- }
- else {
- sv_setref_pv( $arg, \"ALPM::Group\", (void *)$var );
- }
-
T_SIGLEVEL
$arg = c2p_siglevel($var);

0 comments on commit 6ba2efa

Please sign in to comment.