OpenXM/src/kan96xx/Kan/parser.c - diff

Return to parser.c CVS log

Up to [local] / OpenXM / src / kan96xx / Kan

version 1.12, 2015/10/08 11:49:37

version 1.13, 2020/10/06 11:33:46

Line 1

/* $OpenXM: OpenXM/src/kan96xx/Kan/parser.c,v 1.11 2015/09/29 01:52:14 takayama Exp $ */

/* $OpenXM: OpenXM/src/kan96xx/Kan/parser.c,v 1.12 2015/10/08 11:49:37 takayama Exp $ */

parser.c parser for poly.c

Line 40 static int Spv = 0; /* stack pointer */

#define SSIZE 20000

static int TagStack[SSIZE];

static union valObject ValStack[SSIZE];

#define NAME_MAX 2000

#define MY_NAME_MAX 2000

static char Name[NAME_MAX];

static char Name[MY_NAME_MAX];

static union valObject ValTmp;

Line 222 static int getoken() {

i = 0;

do {

Name[i] = Ch; Name[i+1] = '\0'; i++;

if (i+2 >= NAME_MAX) {

if (i+2 >= MY_NAME_MAX) {

errorParser("Too long name begining with @.");

}

Ch = getcharFromStr();