Home | History | Annotate | Line # | Download | only in lint1
platform_uchar.c revision 1.6
      1  1.6  rillig /*	$NetBSD: platform_uchar.c,v 1.6 2025/04/07 16:06:18 rillig Exp $	*/
      2  1.1  rillig # 3 "platform_uchar.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 unsigned char.
      7  1.1  rillig  */
      8  1.1  rillig 
      9  1.6  rillig /* lint1-extra-flags: -c -h -a -p -b -r -z -X 351 */
     10  1.1  rillig /* lint1-only-if: uchar */
     11  1.1  rillig 
     12  1.3  rillig /* expect+1: warning: nonportable character comparison '< 128' [230] */
     13  1.4  rillig typedef int char_char[(char)'\177' < (char)'\200' ? 1 : -1];
     14  1.4  rillig /* expect+1: warning: nonportable character comparison '< 128' [230] */
     15  1.4  rillig typedef int int_char[(char)127 < (char)'\200' ? 1 : -1];
     16  1.4  rillig /* expect+1: warning: nonportable character comparison '< 128' [230] */
     17  1.4  rillig typedef int char_int[(char)'\177' < (char)128 ? 1 : -1];
     18  1.4  rillig /* expect+1: warning: nonportable character comparison '< 128' [230] */
     19  1.4  rillig typedef int int_int[(char)127 < (char)128 ? 1 : -1];
     20  1.5  rillig 
     21  1.5  rillig 
     22  1.5  rillig void
     23  1.5  rillig first_to_upper(char *p)
     24  1.5  rillig {
     25  1.5  rillig 	/* expect+1: warning: conversion of negative constant -32 to unsigned type 'char' [222] */
     26  1.5  rillig 	*p += 'A' - 'a';
     27  1.5  rillig }
     28