I16 ashort;
int aint;
I32 along;
-#ifdef Quad_t
+#ifdef HAS_QUAD
Quad_t aquad;
#endif
U16 aushort;
unsigned int auint;
U32 aulong;
-#ifdef Quad_t
+#ifdef HAS_QUAD
Uquad_t auquad;
#endif
char *aptr;
sv_setpvn(sv, aptr, len);
PUSHs(sv_2mortal(sv));
break;
-#ifdef Quad_t
+#ifdef HAS_QUAD
case 'q':
along = (strend - s) / sizeof(Quad_t);
if (len > along)
unsigned int auint;
I32 along;
U32 aulong;
-#ifdef Quad_t
+#ifdef HAS_QUAD
Quad_t aquad;
Uquad_t auquad;
#endif
}
}
break;
-#ifdef Quad_t
+#ifdef HAS_QUAD
case 'Q':
while (len-- > 0) {
fromstr = NEXTFROM;
sv_catpvn(cat, (char*)&aquad, sizeof(Quad_t));
}
break;
-#endif /* Quad_t */
+#endif
case 'P':
len = 1; /* assume SV is correct length */
/* FALL THROUGH */