OpenXM_contrib2/asir2018/parse/load.c - diff

Return to load.c CVS log

Up to [local] / OpenXM_contrib2 / asir2018 / parse

version 1.2, 2020/10/06 06:31:20

version 1.4, 2021/03/25 08:42:32

Line 45

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

* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.

* $OpenXM: OpenXM_contrib2/asir2018/parse/load.c,v 1.1 2018/09/19 05:45:08 noro Exp $

* $OpenXM: OpenXM_contrib2/asir2018/parse/load.c,v 1.3 2021/03/24 04:35:15 noro Exp $

#include "ca.h"

#include "parse.h"

Line 212 void env_init() {

if ( !p )

break;

}

i += 5;

i += 6;

ASIRLOADPATH_LEN=i;

ASIRLOADPATH=(char **)MALLOC(sizeof(char *)*i);

for ( l = 0; l<i; l++) ASIRLOADPATH[l] = NULL;

e = getenv("ASIRLOADPATH");

for ( i = 0; ; i++, e = p+1 ) {

Line 226 void env_init() {

if ( !p )

break;

}

}else{

ASIRLOADPATH=(char **)MALLOC(sizeof(char *)*3);

ASIRLOADPATH=(char **)MALLOC(sizeof(char *)*6);

ASIRLOADPATH[0] = NULL;

}

Line 369 void loadasirfile(char *name0)

#else

char com[BUFSIZ];

sprintf(com,"%s -I%s -D__FILE__=%s %s",cppname,asir_libdir,name0,name0); in = popen(com,"r");

// sprintf(com,"%s -I%s -D__FILE__=%s %s",cppname,asir_libdir,name0,name0); in = popen(com,"r");

sprintf(com,"%s -I%s %s",cppname,asir_libdir,name0); in = popen(com,"r");

if ( !in ) {

perror("popen");

error("load : failed");