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

Return to parser.c CVS log

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

version 1.8, 2005/06/16 05:07:23

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

Line 1

/* $OpenXM: OpenXM/src/kan96xx/Kan/parser.c,v 1.7 2004/09/17 02:42:57 takayama Exp $ */

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

parser.c parser for poly.c

#include <stdio.h>

#include <string.h>

#include "datatype.h"

#include "setjmp.h"

#include "stackm.h"

#include "extern.h"

#include "extern2.h"

#define NUM 1 /* NUM means struct Bignum */

#define POL 0

Line 123 POLY stringToPOLY(s,ringp)

Line 125 POLY stringToPOLY(s,ringp)

Ring0.p = 0;

Ring0.next = (struct ring *)NULL;

#if defined(__CYGWIN__)

if (sigsetjmp(EnvOfParser,1)) {

if (MYSIGSETJMP(EnvOfParser,1)) {

#else

if (setjmp(EnvOfParser)) {

if (MYSETJMP(EnvOfParser)) {

#endif

fprintf(stderr,"\nERROR: You have syntax errors in the expression: %s\n",s);

errorKan1("%s\n"," parser.c : Syntax error in the input polynomial.");

Line 600 static void errorParser(s) char s[]; {

Line 602 static void errorParser(s) char s[]; {

GotoP = 0;

}

#if defined(__CYGWIN__)

siglongjmp(EnvOfParser,1);

MYSIGLONGJMP(EnvOfParser,1);

#else

longjmp(EnvOfParser,1);

MYLONGJMP(EnvOfParser,1);

#endif

}