summaryrefslogtreecommitdiff
path: root/utils
diff options
context:
space:
mode:
Diffstat (limited to 'utils')
-rw-r--r--utils/h2xs.PL2
1 files changed, 2 insertions, 0 deletions
diff --git a/utils/h2xs.PL b/utils/h2xs.PL
index 5c3fcff51e..0a065ecce8 100644
--- a/utils/h2xs.PL
+++ b/utils/h2xs.PL
@@ -1587,6 +1587,8 @@ sub assign_typemap_entry {
print "Type mutation via typedefs: $otype ==> $type\n" if $opt_d;
$entry = assign_typemap_entry($type);
}
+ # XXX good do better if our UV happens to be long long
+ return "T_NV" if $type =~ /^(unsigned\s+)?long\s+(long|double)\z/;
$entry ||= $typemap{$otype}
|| (td_is_struct($type) ? "T_OPAQUE_STRUCT" : "T_PTROBJ");
$typemap{$otype} = $entry;