shithub: pprolog

Info  •  Files  •  Log  •  Branches

Add support for character code constants like 0'a

--- a/parser.c

+++ b/parser.c

@@ -404,6 +404,11 @@

 		if(peek == L'0'){

 			peek = Bgetrune(parsein);

 			switch(peek){

+			case L'\'': /* Character code */

+				peek = Bgetrune(parsein);

+				lookahead.tag = IntTok;

+				lookahead.ival = peek;

+				return;

 			case L'o': /* Octal */

 			case L'x': /* Hexadecimal */

 			case L'b': /* Binary */