Mercurial > hg > xemacs-beta

comparison src/emacs.c @ 1726:a8d8f419b459

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2003-09-30 15:26:34 by james] Add type information to xfree to avoid alias creation.
author james
date Tue, 30 Sep 2003 15:27:01 +0000
parents 9fc738581a9d
children 7580e52a8218
comparison
equal deleted inserted replaced
1725:7ff8f4d70aec 1726:a8d8f419b459
520 Lisp_Object fullpath; 520 Lisp_Object fullpath;
521 521
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, Extbyte *);
526 result = Fcons (fullpath, result); 526 result = Fcons (fullpath, result);
527 } 527 }
528 else 528 else
529 #endif 529 #endif
530 result = Fcons (build_ext_string (argv[i], 530 result = Fcons (build_ext_string (argv[i],
568 { 568 {
569 int elt = 0; 569 int elt = 0;
570 570
571 while (argv[elt]) 571 while (argv[elt])
572 { 572 {
573 xfree (argv[elt]); 573 xfree (argv[elt], Extbyte *);
574 elt++; 574 elt++;
575 } 575 }
576 xfree (argv); 576 xfree (argv, Extbyte **);
577 } 577 }
578 578
579 static void 579 static void
580 init_cmdargs (int argc, Extbyte **argv, int skip_args) 580 init_cmdargs (int argc, Extbyte **argv, int skip_args)
581 { 581 {
2597 for (i = 0; i < options[best]; i++) 2597 for (i = 0; i < options[best]; i++)
2598 argv[best + i + 1] = 0; 2598 argv[best + i + 1] = 0;
2599 } 2599 }
2600 2600
2601 memcpy (argv, new_argv, sizeof (char *) * argc); 2601 memcpy (argv, new_argv, sizeof (char *) * argc);
2602 xfree (new_argv); 2602 xfree (new_argv, char **);
2603 xfree (options); 2603 xfree (options, int *);
2604 xfree (priority); 2604 xfree (priority, int *);
2605 } 2605 }
2606 2606
2607 DEFUN ("running-temacs-p", Frunning_temacs_p, 0, 0, 0, /* 2607 DEFUN ("running-temacs-p", Frunning_temacs_p, 0, 0, 0, /*
2608 True if running temacs. This means we are in the dumping stage. 2608 True if running temacs. This means we are in the dumping stage.
2609 This is false during normal execution of the `xemacs' program, and 2609 This is false during normal execution of the `xemacs' program, and