expr_fold_strict_bool.c revision 1.2
11.2Srillig/*	$NetBSD: expr_fold_strict_bool.c,v 1.2 2021/08/22 21:17:04 rillig Exp $	*/
21.1Srillig# 3 "expr_fold_strict_bool.c"
31.1Srillig
41.1Srillig/*
51.1Srillig * Test constant folding in strict bool mode.
61.1Srillig *
71.1Srillig * In this mode, _Bool is not an unsigned integer type.  In fact, it is not
81.1Srillig * an arithmetic type at all.
91.1Srillig */
101.1Srillig
111.1Srillig/* lint1-extra-flags: -T */
121.1Srillig/* lint1-only-if: lp64 */
131.1Srillig
141.1Srilligtypedef long long int64_t;
151.1Srilligtypedef unsigned long long uint64_t;
161.1Srillig
171.1Srilligstruct fold_64_bit {
181.1Srillig
191.1Srillig	_Bool lt_signed_small_ok: -3LL < 1LL ? 1 : -1;
201.1Srillig	/* expect+1: error: illegal bit-field size: 255 [36] */
211.1Srillig	_Bool lt_signed_small_bad: 1LL < -3LL ? 1 : -1;
221.1Srillig
231.1Srillig	_Bool lt_signed_big_ok: (int64_t)(1ULL << 63) < 1LL ? 1 : -1;
241.1Srillig	/* expect+1: error: illegal bit-field size: 255 [36] */
251.1Srillig	_Bool lt_signed_big_bad: 1LL < (int64_t)(1ULL << 63) ? 1 : -1;
261.1Srillig
271.1Srillig	_Bool lt_unsigned_small_ok: 1ULL < 3ULL ? 1 : -1;
281.1Srillig	/* expect+1: error: illegal bit-field size: 255 [36] */
291.1Srillig	_Bool lt_unsigned_small_bad: 3ULL < 1ULL ? 1 : -1;
301.1Srillig
311.2Srillig	/*
321.2Srillig	 * Before tree.c 1.345 from 2021-08-22, lint wrongly assumed that the
331.2Srillig	 * result of all binary operators were the common arithmetic type,
341.2Srillig	 * but that was wrong for the comparison operators.  The expression
351.2Srillig	 * '1ULL < 2ULL' does not have type 'unsigned long long' but 'int' in
361.2Srillig	 * default mode, or '_Bool' in strict bool mode.
371.2Srillig	 */
381.2Srillig	_Bool lt_unsigned_big_ok: 1ULL < 1ULL << 63 ? 1 : -1;
391.1Srillig	/* expect+1: error: illegal bit-field size: 255 [36] */
401.1Srillig	_Bool lt_unsigned_big_bad: 1ULL << 63 < 1ULL ? 1 : -1;
411.1Srillig};
42