OpenXM_contrib2/asir2000/parse/pvar.c - diff

Return to pvar.c CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / parse

version 1.18, 2006/06/21 09:46:06

version 1.22, 2015/08/14 13:51:56

Line 45

* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,

* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.

* $OpenXM: OpenXM_contrib2/asir2000/parse/pvar.c,v 1.17 2006/03/11 23:14:53 noro Exp $

* $OpenXM: OpenXM_contrib2/asir2000/parse/pvar.c,v 1.21 2015/08/08 14:19:42 fujimoto Exp $

#include "ca.h"

#include "parse.h"

Line 68 void mkpvs(char *fname)

buf = ALLOCA(strlen("undeclared function "+strlen(fname)+10));

sprintf(buf,"undeclared function `%s'",fname);

yyerror(buf);

error("cannot continue to read inputs");

}

pvs = (VS)MALLOC(sizeof(struct oVS));

Line 305 int getpvar(VS pvs,char *str,int searchonly)

Line 306 int getpvar(VS pvs,char *str,int searchonly)

return i;

}

#if defined(VISUAL)

#if defined(VISUAL) || defined(__MINGW32__)

#define PCLOSE _pclose

#else

#define PCLOSE pclose

Line 316 void closecurrentinput()

Line 317 void closecurrentinput()

if ( asir_infile && !asir_infile->fp )

return;

#if defined(VISUAL)

#if defined(VISUAL) || defined(__MINGW32__)

fclose(asir_infile->fp);

unlink(asir_infile->tname);

#else