Browse files

Remove CPP directives in favor of plain C

  • Loading branch information...
1 parent a25384a commit 1443db4378fcb060829c751c94dd9c23c882bada @jbenjore committed Sep 24, 2012
Showing with 24 additions and 17 deletions.
  1. +8 −0 Changes
  2. +16 −17 typemap
View
8 Changes
@@ -1,5 +1,13 @@
Revision history for Judy
+0.41
+
+Bug fixes:
+
+ * ExtUtils::ParseXS circa 3.16 no longer handles CPP directives in typemap
+ files. The typemap file now uses plain C instead of any CPP directives
+ for conditional compilation.
+
0.40
Bug fixes:
View
33 typemap
@@ -55,10 +55,10 @@ T_IWORD
}
}
else {
- #if LONGSIZE == IVSIZE
+ if (LONGSIZE == IVSIZE) {
assert( LONG_MIN <= SvIV($arg) && SvIV($arg) <= LONG_MAX );
$var = SvIV($arg);
- #else
+ } else {
if ( SvIV($arg) > LONG_MAX ) {
$var = LONG_MAX;
warn(\"Truncating %\"IVdf\" to %ld because your number is larger than fits in a signed integer\",
@@ -72,7 +72,7 @@ T_IWORD
else {
$var = SvIV($arg);
}
- #endif
+ }
}
@@ -95,22 +95,21 @@ T_UWORD
SvIV($arg));
}
}
- #if (LONGSIZE == UVSIZE)
- else {
- $var = SvUV($arg);
- }
- #else
- else if ( SvUV($arg) > ULONG_MAX ) {
- $var = LONG_MAX;
- warn(\"Truncating %\"UVuf\" to %lu because your number is larger than fits in an unsigned integer\",
- SvUV($arg), ULONG_MAX);
- }
else {
- $var = SvUV($arg);
+ if (LONGSIZE == UVSIZE) {
+ $var = SvUV($arg);
+ }
+ else {
+ if (SvUV($arg) > ULONG_MAX) {
+ $var = LONG_MAX;
+ warn(\"Truncating %\"UVuf\" to %lu because your number is larger than fits in an unsigned integer\",
+ SvUV($arg), ULONG_MAX);
+ }
+ else {
+ $var = SvUV($arg);
+ }
+ }
}
- #endif
- /* This line added to get the immediately preceding #endif to work
- properly in generated C source. */
OUTPUT
T_STR

0 comments on commit 1443db4

Please sign in to comment.