OpenXM_contrib2/asir2000/parse/glob.c - diff

Return to glob.c CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / parse

version 1.77, 2010/05/26 06:32:49

version 1.81, 2012/05/09 06:17:13

Line 45

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

* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.

* $OpenXM: OpenXM_contrib2/asir2000/parse/glob.c,v 1.76 2009/03/18 05:13:47 ohara Exp $

* $OpenXM: OpenXM_contrib2/asir2000/parse/glob.c,v 1.80 2011/06/16 08:17:15 noro Exp $

#include "ca.h"

#include "al.h"

Line 167 void glob_init() {

reallocarray((char **)&APVS->va,(int *)&APVS->asize,(int *)&APVS->n,(int)sizeof(struct oPV));

reallocarray((char **)&PPVS->va,(int *)&PPVS->asize,(int *)&PPVS->n,(int)sizeof(struct oPV));

CPVS = GPVS;

MKNODE(ONENODE,mkfnode(1,I_FORMULA,ONE),0);

MKNODE(ONENODE,mkfnode(1,I_FORMULA,ONE),NULLP);

OID(F_TRUE)=O_F; FOP(F_TRUE)=AL_TRUE; F_TRUE->arg.dummy = 0;

OID(F_FALSE)=O_F; FOP(F_FALSE)=AL_FALSE; F_FALSE->arg.dummy = 0;

OID(Symbol_grlex) = O_SYMBOL; Symbol_grlex->name = "@grlex";

Line 318 static int which(char *prog, char *path, char *buf, si

void cppname_init()

{

#if !defined(VISUAL)

char *oxhome;

char oxcpp[BUFSIZ];

#define OXCPP "/bin/ox_cpp"

if ( oxhome = getenv("OpenXM_HOME") ) {

if ( strlen(oxhome)+strlen(OXCPP)<BUFSIZ ) {

sprintf(oxcpp,"%s%s",oxhome,OXCPP);

if ( access(oxcpp,X_OK&R_OK) == 0 ) {

strcpy(cppname,oxcpp);

return;

}

if (access(cppname, X_OK&R_OK) != 0) {

which("cpp", "/lib:/usr/ccs/lib:/usr/bin", cppname, BUFSIZ) ||

which("cpp", getenv("PATH"), cppname, BUFSIZ);

Line 778 char *get_asir_distribution();

Line 791 char *get_asir_distribution();

char *get_gcversion()

{

#if defined(GC7)

#else

#endif