summaryrefslogtreecommitdiff
path: root/pp.h
diff options
context:
space:
mode:
Diffstat (limited to 'pp.h')
-rw-r--r--pp.h8
1 files changed, 8 insertions, 0 deletions
diff --git a/pp.h b/pp.h
index 0e6383c58a..c35f9677d4 100644
--- a/pp.h
+++ b/pp.h
@@ -67,6 +67,7 @@
#define POPul ((unsigned long)SvIVx(POPs))
#ifdef HAS_QUAD
#define POPq ((Quad_t)SvIVx(POPs))
+#define POPuq ((Uquad_t)SvIVx(POPs))
#endif
#define TOPs (*sp)
@@ -79,6 +80,7 @@
#define TOPul ((unsigned long)SvIV(TOPs))
#ifdef HAS_QUAD
#define TOPq ((Quad_t)SvIV(TOPs))
+#define TOPuq ((Uquad_t)SvIV(TOPs))
#endif
/* Go to some pains in the rare event that we must extend the stack. */
@@ -123,6 +125,12 @@
#define dPOPiv IV value = POPi
#define dTOPuv UV value = TOPu
#define dPOPuv UV value = POPu
+#ifdef HAS_QUAD
+#define dTOPqv Quad_t value = TOPu
+#define dPOPqv Quad_t value = POPu
+#define dTOPuqv Uquad_t value = TOPuq
+#define dPOPuqv Uquad_t value = POPuq
+#endif
#define dPOPXssrl(X) SV *right = POPs; SV *left = CAT2(X,s)
#define dPOPXnnrl(X) NV right = POPn; NV left = CAT2(X,n)