Mercurial > hg > xemacs-beta

comparison src/emacs.c @ 1706:9fc738581a9d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2003-09-22 03:21:12 by james] Remove GNU DLD support, fix the C++ build, make eval-related functions visible to modules, and fix minor Windows-related problems.
author james
date Mon, 22 Sep 2003 03:21:19 +0000
parents 01c57eb70ae9
children a8d8f419b459
comparison
equal deleted inserted replaced
1705:cdbc76885304 1706:9fc738581a9d
522 full_exe_path = mswindows_get_module_file_name (); 522 full_exe_path = mswindows_get_module_file_name ();
523 assert (full_exe_path); 523 assert (full_exe_path);
524 fullpath = build_tstr_string (full_exe_path); 524 fullpath = build_tstr_string (full_exe_path);
525 xfree (full_exe_path); 525 xfree (full_exe_path);
526 result = Fcons (fullpath, result); 526 result = Fcons (fullpath, result);
527 #ifdef HAVE_SHLIB
528 {
529 Extbyte *fullpathext;
530
531 /* Don't use full_exe_path directly because it's probably
532 in a different format. */
533 LISP_STRING_TO_EXTERNAL (fullpath, fullpathext,
534 Qdll_filename_encoding);
535 (void) dll_init (fullpathext);
536 }
537 #endif
538 } 527 }
539 else 528 else
540 #endif 529 #endif
541 result = Fcons (build_ext_string (argv[i], 530 result = Fcons (build_ext_string (argv[i],
542 Qcommand_argument_encoding), 531 Qcommand_argument_encoding),
2354 2343
2355 Vinvocation_name = Ffile_name_nondirectory (Vinvocation_directory); 2344 Vinvocation_name = Ffile_name_nondirectory (Vinvocation_directory);
2356 Vinvocation_directory = Ffile_name_directory (Vinvocation_directory); 2345 Vinvocation_directory = Ffile_name_directory (Vinvocation_directory);
2357 } 2346 }
2358 2347
2359 #if defined (HAVE_SHLIB) && !defined (WIN32_NATIVE)
2360 /* This is Unix only. MS Windows NT has a library call that does
2361 The Right Thing on that system. Rumor has it, this must be
2362 called for GNU dld in temacs and xemacs. */
2363 {
2364 char *buf = (char *)ALLOCA (XSTRING_LENGTH (Vinvocation_directory)
2365 + XSTRING_LENGTH (Vinvocation_name)
2366 + 2);
2367 sprintf (buf, "%s/%s", XSTRING_DATA (Vinvocation_directory),
2368 XSTRING_DATA (Vinvocation_name));
2369
2370 C_STRING_TO_EXTERNAL (buf, buf, Qfile_name);
2371 /* All we can do is cry if an error happens, so ignore it. */
2372 (void) dll_init (buf);
2373 }
2374 #endif
2375
2376 #if defined (LOCALTIME_CACHE) && defined (HAVE_TZSET) 2348 #if defined (LOCALTIME_CACHE) && defined (HAVE_TZSET)
2377 /* sun's localtime() has a bug. it caches the value of the time 2349 /* sun's localtime() has a bug. it caches the value of the time
2378 zone rather than looking it up every time. Since localtime() is 2350 zone rather than looking it up every time. Since localtime() is
2379 called to bolt the undumping time into the undumped emacs, this 2351 called to bolt the undumping time into the undumped emacs, this
2380 results in localtime() ignoring the TZ environment variable. 2352 results in localtime() ignoring the TZ environment variable.