Home | History | Annotate | Line # | Download | only in lint1 
      1  1.5  rillig /*	$NetBSD: lex_wide_char.c,v 1.5 2024/01/19 19:23:34 rillig Exp $	*/
      2  1.1  rillig # 3 "lex_wide_char.c"
      3  1.1  rillig 
      4  1.1  rillig /*
      5  1.1  rillig  * Tests for lexical analysis of character constants.
      6  1.1  rillig  *
      7  1.1  rillig  * C99 6.4.4.4 "Character constants"
      8  1.1  rillig  */
      9  1.1  rillig 
     10  1.4  rillig /* lint1-extra-flags: -X 351 */
     11  1.4  rillig 
     12  1.1  rillig void sink(int);
     13  1.1  rillig 
     14  1.1  rillig void
     15  1.1  rillig test(void)
     16  1.1  rillig {
     17  1.3  rillig 	/* expect+1: error: empty character constant [73] */
     18  1.1  rillig 	sink(L'');
     19  1.1  rillig 
     20  1.1  rillig 	sink(L'a');
     21  1.1  rillig 
     22  1.1  rillig 	sink(L'\0');
     23  1.1  rillig 
     24  1.1  rillig 	/* UTF-8 */
     25  1.3  rillig 	/* expect+1: error: too many characters in character constant [71] */
     26  1.1  rillig 	sink(L'');
     27  1.1  rillig 
     28  1.1  rillig 	/* GCC extension */
     29  1.1  rillig 	sink(L'\e');
     30  1.1  rillig 
     31  1.5  rillig 	/* expect+1: warning: dubious escape \y [79] */
     32  1.5  rillig 	sink(L'\y');
     33  1.5  rillig 
     34  1.1  rillig 	/* since C99 */
     35  1.1  rillig 	sink(L'\x12');
     36  1.1  rillig 
     37  1.1  rillig 	/* octal */
     38  1.1  rillig 	sink(L'\177');
     39  1.1  rillig 
     40  1.1  rillig 	/* newline */
     41  1.1  rillig 	sink(L'\n');
     42  1.1  rillig 
     43  1.3  rillig 	/* expect+1: error: empty character constant [73] */
     44  1.1  rillig 	sink(L'');
     45  1.1  rillig }
     46