Changess for THINK C 4.0.
diff --git a/Parser/pgenmain.c b/Parser/pgenmain.c
index 6eae230..cc266ae 100644
--- a/Parser/pgenmain.c
+++ b/Parser/pgenmain.c
@@ -102,8 +102,8 @@
 		printf("EOF\n");
 		exit(1);
 	}
-	/* XXX The (unsigned char *) case is needed by THINK C */
-	if (sscanf((unsigned char *)buf, " %s ", name) != 1) {
+	/* XXX The (unsigned char *) case is needed by THINK C 3.0 */
+	if (sscanf(/*(unsigned char *)*/buf, " %s ", name) != 1) {
 		printf("No file\n");
 		exit(1);
 	}