version 1.25, 2014/04/02 22:08:29 |
version 1.27, 2014/05/12 02:35:36 |
|
|
* 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/load.c,v 1.24 2014/03/30 10:48:16 ohara Exp $ |
* $OpenXM: OpenXM_contrib2/asir2000/parse/load.c,v 1.26 2014/05/09 18:32:13 ohara Exp $ |
*/ |
*/ |
#include "ca.h" |
#include "ca.h" |
#include "parse.h" |
#include "parse.h" |
|
|
#endif |
#endif |
|
|
char **ASIRLOADPATH; |
char **ASIRLOADPATH; |
|
int ASIRLOADPATH_LEN; |
|
|
#if defined(VISUAL) |
#if defined(VISUAL) |
#define ENVDELIM ';' |
#define ENVDELIM ';' |
Line 179 void env_init() { |
|
Line 180 void env_init() { |
|
asir_private_dir = NULL; |
asir_private_dir = NULL; |
#if defined(VISUAL) |
#if defined(VISUAL) |
if ( e = getenv("APPDATA") ) { |
if ( e = getenv("APPDATA") ) { |
asir_private_dir = (char *)malloc(strlen(e)+strlen("/asir/lib/asir-contrib")+1); |
asir_private_dir = (char *)malloc(strlen(e)+strlen("/OpenXM/lib/asir-contrib")+1); |
sprintf(asir_private_dir,"%s/asir/lib/asir-contrib",e); |
sprintf(asir_private_dir,"%s/OpenXM/lib/asir-contrib",e); |
} |
} |
#endif |
#endif |
|
|
Line 208 void env_init() { |
|
Line 209 void env_init() { |
|
if ( !p ) |
if ( !p ) |
break; |
break; |
} |
} |
i += 4; |
i += 5; |
|
ASIRLOADPATH_LEN=i; |
ASIRLOADPATH=(char **)MALLOC(sizeof(char *)*i); |
ASIRLOADPATH=(char **)MALLOC(sizeof(char *)*i); |
for ( l = 0; l<i; l++) ASIRLOADPATH[l] = NULL; |
for ( l = 0; l<i; l++) ASIRLOADPATH[l] = NULL; |
e = getenv("ASIRLOADPATH"); |
e = getenv("ASIRLOADPATH"); |
Line 230 void env_init() { |
|
Line 232 void env_init() { |
|
if (asir_private_dir) ASIRLOADPATH[i++] = asir_private_dir; |
if (asir_private_dir) ASIRLOADPATH[i++] = asir_private_dir; |
if (asir_contrib_dir) ASIRLOADPATH[i++] = asir_contrib_dir; |
if (asir_contrib_dir) ASIRLOADPATH[i++] = asir_contrib_dir; |
if (asir_libdir) ASIRLOADPATH[i++] = asir_libdir; |
if (asir_libdir) ASIRLOADPATH[i++] = asir_libdir; |
|
ASIRLOADPATH[i++] = "."; |
ASIRLOADPATH[i] = NULL; |
ASIRLOADPATH[i] = NULL; |
} |
} |
|
|