From b156d7259bd8b2c84ca7f8e8e9e8e24d4a49870d Mon Sep 17 00:00:00 2001 From: Guido van Rossum Date: Thu, 20 Dec 1990 23:13:00 +0000 Subject: Changes for THINK C 4.0. --- Include/pgenheaders.h | 13 ++++++++++++- Parser/tokenizer.c | 4 ++-- 2 files changed, 14 insertions(+), 3 deletions(-) diff --git a/Include/pgenheaders.h b/Include/pgenheaders.h index 95fdbf2..b53fdf2 100644 --- a/Include/pgenheaders.h +++ b/Include/pgenheaders.h @@ -2,13 +2,24 @@ This is a precompiled header for THINK C. */ #include +#include #ifdef THINK_C +/* #define THINK_C_3_0 /*** TURN THIS ON FOR THINK C 3.0 ****/ #define label label_ -#include #undef label #endif +#ifdef THINK_C_3_0 +#include +#endif + +#ifdef THINK_C +#ifndef THINK_C_3_0 +#include +#endif +#endif + #include "PROTO.h" #include "malloc.h" diff --git a/Parser/tokenizer.c b/Parser/tokenizer.c index ad6f63a..6bb57ef 100644 --- a/Parser/tokenizer.c +++ b/Parser/tokenizer.c @@ -358,8 +358,8 @@ tok_get(tok, p_start, p_end) This is also recognized by vi, when it occurs near the beginning or end of the file. (Will vi never die...?) */ int x; - /* XXX The case to (unsigned char *) is needed by THINK C */ - if (sscanf((unsigned char *)tok->cur, + /* XXX The case to (unsigned char *) is needed by THINK C 3.0 */ + if (sscanf(/*(unsigned char *)*/tok->cur, " vi:set tabsize=%d:", &x) == 1 && x >= 1 && x <= 40) { fprintf(stderr, "# vi:set tabsize=%d:\n", x); -- cgit v0.12