gforth/engine/main.c - diff

Return to main.c CVS log

Up to [gforth] / gforth / engine

version 1.202, 2008/03/22 15:44:26	version 1.203, 2008/04/19 19:15:14
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 2316 int main(int argc, char argv, char e	Line 2318 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(&ltdl_advice)!=0) {
	fprintf(stderr,"%s: lt_dladvise_init: %s\n", progname, lt_dlerror());
	exit(1);
	}
	if (lt_dladvise_global(&ltdl_advice)!=0) {
	fprintf(stderr,"%s: lt_dladvise_global: %s\n", progname, lt_dlerror());
	exit(1);
	}
	if (lt_dladvise_ext(&ltdl_advice)!=0) {
	fprintf(stderr,"%s: lt_dladvise_ext: %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);
#ifndef NO_DYNAMIC	#ifndef NO_DYNAMIC