X-Git-Url: https://perl5.git.perl.org/metaconfig.git/blobdiff_plain/d7a2632b38736a3e49b7334d2dc40e07d4a66813..5622286d229504ed17abd80934c61fede0bed507:/U/a_dvisory/quadtype.U

diff --git a/U/a_dvisory/quadtype.U b/U/a_dvisory/quadtype.U
index 80d4699..94812d8 100644
--- a/U/a_dvisory/quadtype.U
+++ b/U/a_dvisory/quadtype.U
@@ -28,8 +28,9 @@
 ?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
@@ -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___INT64	5
 ?H:?%<:#endif
 ?H:.
 ?LINT:set quadtype