This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Backport 7eb35c035978bf0530591a57244b6922682a3344
[metaconfig.git] / U / a_dvisory / quadtype.U
index 80d4699..94812d8 100644 (file)
@@ -28,8 +28,9 @@
 ?S:.
 ?C:HAS_QUAD:
 ?C:    This symbol, if defined, tells that there's a 64-bit integer type,
 ?S:.
 ?C:HAS_QUAD:
 ?C:    This symbol, if defined, tells that there's a 64-bit integer type,
-?C:    Quad_t, and its unsigned counterpar, Uquad_t. QUADKIND will be one
-?C:    of QUAD_IS_INT, QUAD_IS_LONG, QUAD_IS_LONG_LONG, or QUAD_IS_INT64_T.
+?C:    Quad_t, and its unsigned counterpart, Uquad_t. QUADKIND will be one
+?C:    of QUAD_IS_INT, QUAD_IS_LONG, QUAD_IS_LONG_LONG, QUAD_IS_INT64_T,
+?C:    or QUAD_IS___INT64.
 ?C:.
 ?H:#$d_quad HAS_QUAD   /**/
 ?H:?%<:#ifdef HAS_QUAD
 ?C:.
 ?H:#$d_quad HAS_QUAD   /**/
 ?H:?%<:#ifdef HAS_QUAD
@@ -40,6 +41,7 @@
 ?H:?%<:#   define QUAD_IS_LONG 2
 ?H:?%<:#   define QUAD_IS_LONG_LONG    3
 ?H:?%<:#   define QUAD_IS_INT64_T      4
 ?H:?%<:#   define QUAD_IS_LONG 2
 ?H:?%<:#   define QUAD_IS_LONG_LONG    3
 ?H:?%<:#   define QUAD_IS_INT64_T      4
+?H:?%<:#   define QUAD_IS___INT64      5
 ?H:?%<:#endif
 ?H:.
 ?LINT:set quadtype
 ?H:?%<:#endif
 ?H:.
 ?LINT:set quadtype