Ignore character constants in traditional mode. Should help Jira#PCC-4.

1 files changed, 2 insertions, 0 deletions

diff --git a/token.c b/token.c
index 28addab..383c764 100644
--- a/token.c
+++ b/token.c
@@ -252,6 +252,8 @@ str:			PUTCH(ch);
 
 		case '\'': /* character literal */
 con:			PUTCH(ch);
+			if (tflag)
+				continue; /* character constants ignored */
 			while ((ch = NXTCH()) != '\'') {
 				PUTCH(ch);
 				if (ch == '\\') {