version 1.205, 2008/04/28 08:42:59
|
version 1.206, 2008/05/04 17:04:58
|
Line 161 int ufileattr[6]= {
|
Line 161 int ufileattr[6]= {
|
#endif |
#endif |
/* end global vars for engine.c */ |
/* end global vars for engine.c */ |
|
|
lt_dladvise ltdl_advice; |
|
|
|
#define PRIM_VERSION 1 |
#define PRIM_VERSION 1 |
/* increment this whenever the primitives change in an incompatible way */ |
/* increment this whenever the primitives change in an incompatible way */ |
|
|
Line 2318 int main(int argc, char **argv, char **e
|
Line 2316 int main(int argc, char **argv, char **e
|
fprintf(stderr,"%s: lt_dlinit failed", progname); |
fprintf(stderr,"%s: lt_dlinit failed", progname); |
exit(1); |
exit(1); |
} |
} |
if (lt_dladvise_init(<dl_advice)!=0) { |
|
fprintf(stderr,"%s: lt_dladvise_init: %s\n", progname, lt_dlerror()); |
|
exit(1); |
|
} |
|
if (lt_dladvise_global(<dl_advice)!=0) { |
|
fprintf(stderr,"%s: lt_dladvise_global: %s\n", progname, lt_dlerror()); |
|
exit(1); |
|
} |
|
|
|
#ifdef HAS_OS |
#ifdef HAS_OS |
gforth_args(argc, argv, &path, &imagename); |
gforth_args(argc, argv, &path, &imagename); |