Home | History | Annotate | Line # | Download | only in lint1 
      1  1.7  rillig /*	$NetBSD: platform_schar.c,v 1.7 2025/04/07 16:06:18 rillig Exp $	*/
      2  1.1  rillig # 3 "platform_schar.c"
      3  1.1  rillig 
      4  1.1  rillig /*
      5  1.1  rillig  * Test features that only apply to platforms where plain char has the same
      6  1.1  rillig  * representation as signed char.
      7  1.1  rillig  */
      8  1.1  rillig 
      9  1.7  rillig /* lint1-extra-flags: -c -h -a -p -b -r -z -X 351 */
     10  1.1  rillig /* lint1-only-if: schar */
     11  1.1  rillig 
     12  1.4  rillig /* expect+1: warning: nonportable character comparison '-128 < ?' [230] */
     13  1.5  rillig typedef int char_char[(char)'\200' < (char)'\177' ? 1 : -1];
     14  1.5  rillig /* expect+1: warning: nonportable character comparison '-128 < ?' [230] */
     15  1.5  rillig typedef int char_int[(char)'\200' < (char)127 ? 1 : -1];
     16  1.5  rillig /* expect+1: warning: nonportable character comparison '-128 < ?' [230] */
     17  1.5  rillig typedef int int_char[(char)-128 < (char)'\177' ? 1 : -1];
     18  1.5  rillig /* expect+1: warning: nonportable character comparison '-128 < ?' [230] */
     19  1.5  rillig typedef int int_int[(char)-128 < (char)127 ? 1 : -1];
     20  1.6  rillig 
     21  1.6  rillig 
     22  1.6  rillig void
     23  1.6  rillig first_to_upper(char *p)
     24  1.6  rillig {
     25  1.6  rillig 	*p += 'A' - 'a';
     26  1.6  rillig }
     27