Return to function.c CVS log | Up to [local] / OpenXM_contrib2 / asir2000 / parse |
version 1.7, 2004/11/16 01:47:31 | version 1.9, 2014/08/09 06:08:11 | ||
---|---|---|---|
|
|
||
* 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_contrib2/asir2000/parse/function.c,v 1.6 2004/10/27 08:21:47 noro Exp $ | * $OpenXM: OpenXM_contrib2/asir2000/parse/function.c,v 1.8 2005/09/21 23:39:32 noro Exp $ | ||
*/ | */ | ||
#include "ca.h" | #include "ca.h" | ||
#include "parse.h" | #include "parse.h" | ||
|
|
||
f->secure = value; | f->secure = value; | ||
return 0; | return 0; | ||
} | } | ||
gen_searchf_searchonly(name,&f); | gen_searchf_searchonly(name,&f,0); | ||
if ( f ) { | if ( f ) { | ||
f->secure = value; | f->secure = value; | ||
return 0; | return 0; | ||
|
|
||
return -1; | return -1; | ||
} | } | ||
void appendbinf(flistp,name,func,argc) | void appendbinf(flistp,name,func,argc,quote) | ||
NODE *flistp; | NODE *flistp; | ||
char *name; | char *name; | ||
void (*func)(); | void (*func)(); | ||
int argc; | int argc; | ||
unsigned int quote; | |||
{ | { | ||
FUNC t; | FUNC t; | ||
NODE n; | NODE n; | ||
t = (FUNC)MALLOC(sizeof(struct oFUNC)); | t = (FUNC)MALLOC(sizeof(struct oFUNC)); | ||
t->name = name; t->id = A_BIN; t->argc = argc; t->f.binf = func; | t->name = name; t->id = A_BIN; t->argc = argc; t->f.binf = func; | ||
t->fullname = name; | t->fullname = name; t->quote = quote; | ||
MKNODE(n,t,*flistp); *flistp = n; | MKNODE(n,t,*flistp); *flistp = n; | ||
} | } | ||
|
|
||
MKNODE(n,t,*flistp); *flistp = n; | MKNODE(n,t,*flistp); *flistp = n; | ||
} | } | ||
void appendsysf(name,func,argc) | void appendsysf(name,func,argc,quote) | ||
char *name; | char *name; | ||
void (*func)(); | void (*func)(); | ||
int argc; | int argc; | ||
unsigned int quote; | |||
{ | { | ||
appendbinf(&sysf,name,func,argc); | appendbinf(&sysf,name,func,argc,quote); | ||
} | } | ||
void appendubinf(name,func,argc) | void appendubinf(name,func,argc,quote) | ||
char *name; | char *name; | ||
void (*func)(); | void (*func)(); | ||
int argc; | int argc; | ||
unsigned int quote; | |||
{ | { | ||
appendbinf(&ubinf,name,func,argc); | appendbinf(&ubinf,name,func,argc,quote); | ||
} | } | ||
int comp_dcp(DCP *a,DCP *b) | int comp_dcp(DCP *a,DCP *b) |