version 1.1, 2018/09/19 05:45:08 |
version 1.2, 2020/09/27 04:35:05 |
|
|
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* |
* |
* $OpenXM$ |
* $OpenXM: OpenXM_contrib2/asir2018/parse/pvar.c,v 1.1 2018/09/19 05:45:08 noro Exp $ |
*/ |
*/ |
#include "ca.h" |
#include "ca.h" |
#include "parse.h" |
#include "parse.h" |
Line 65 void mkpvs(char *fname) |
|
Line 65 void mkpvs(char *fname) |
|
/* function must be declared in advance */ |
/* function must be declared in advance */ |
searchf(CUR_MODULE->usrf_list,fname,&f); |
searchf(CUR_MODULE->usrf_list,fname,&f); |
if ( !f ) { |
if ( !f ) { |
buf = ALLOCA(strlen("undeclared function "+strlen(fname)+10)); |
buf = ALLOCA(strlen("undeclared function ")+strlen(fname)+10); |
sprintf(buf,"undeclared function `%s'",fname); |
sprintf(buf,"undeclared function `%s'",fname); |
yyerror(buf); |
yyerror(buf); |
error("cannot continue to read inputs"); |
error("cannot continue to read inputs"); |