Home | History | Annotate | Line # | Download | only in lint1
lex_wide_char.c revision 1.1
      1  1.1  rillig /*	$NetBSD: lex_wide_char.c,v 1.1 2021/06/19 08:30:08 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.1  rillig void sink(int);
     11  1.1  rillig 
     12  1.1  rillig void
     13  1.1  rillig test(void)
     14  1.1  rillig {
     15  1.1  rillig 	/* TODO: expect+1: empty character constant */
     16  1.1  rillig 	sink(L'');
     17  1.1  rillig 
     18  1.1  rillig 	sink(L'a');
     19  1.1  rillig 
     20  1.1  rillig 	sink(L'\0');
     21  1.1  rillig 
     22  1.1  rillig 	/* UTF-8 */
     23  1.1  rillig 	/* expect+1: too many characters in character constant */
     24  1.1  rillig 	sink(L'');
     25  1.1  rillig 	/* rescue the parser: ' */
     26  1.1  rillig 
     27  1.1  rillig 	/* GCC extension */
     28  1.1  rillig 	/* expect+1: dubious escape \e */
     29  1.1  rillig 	sink(L'\e');
     30  1.1  rillig 
     31  1.1  rillig 	/* since C99 */
     32  1.1  rillig 	sink(L'\x12');
     33  1.1  rillig 
     34  1.1  rillig 	/* octal */
     35  1.1  rillig 	sink(L'\177');
     36  1.1  rillig 
     37  1.1  rillig 	/* newline */
     38  1.1  rillig 	sink(L'\n');
     39  1.1  rillig 
     40  1.1  rillig 	/* TODO: expect+1: empty character constant */
     41  1.1  rillig 	sink(L'');
     42  1.1  rillig }
     43