comparison src/emacs.c @ 26193:45f2d2b5f0d7

(standard_args): Add `file' as synonym for `visit', `execute' as synonym for `eval'. (main): Add new options to usage message.
author Gerd Moellmann <gerd@gnu.org>
date Tue, 26 Oct 1999 14:33:53 +0000
parents d39ec0a27081
children c3c9cc1c2379
comparison
equal deleted inserted replaced
26192:01d4feb7e1e4 26193:45f2d2b5f0d7
857 Usage: %s [--batch] [-t term] [--terminal term]\n\ 857 Usage: %s [--batch] [-t term] [--terminal term]\n\
858 [-d display] [--display display] [-nw] [--no-windows]\n\ 858 [-d display] [--display display] [-nw] [--no-windows]\n\
859 [-q] [--no-init-file] [-u user] [--user user] [--debug-init]\n\ 859 [-q] [--no-init-file] [-u user] [--user user] [--debug-init]\n\
860 [--unibyte] [--multibyte] [--version] [--no-site-file]\n\ 860 [--unibyte] [--multibyte] [--version] [--no-site-file]\n\
861 [-f func] [--funcall func] [-l file] [--load file] [--eval expr]\n\ 861 [-f func] [--funcall func] [-l file] [--load file] [--eval expr]\n\
862 [--insert file] [+linenum] file-to-visit [--kill]\n\ 862 [--execute expr] [--visit file] [--file file] [--insert file]\n\
863 [+linenum] file-to-visit [--kill]\n\
863 Report bugs to bug-gnu-emacs@gnu.org. First, please see\n\ 864 Report bugs to bug-gnu-emacs@gnu.org. First, please see\n\
864 the Bugs section of the Emacs manual or the file BUGS.\n", argv[0]); 865 the Bugs section of the Emacs manual or the file BUGS.\n", argv[0]);
865 exit (0); 866 exit (0);
866 } 867 }
867 868
1377 if (initialized) 1378 if (initialized)
1378 { 1379 {
1379 extern void _mcleanup (); 1380 extern void _mcleanup ();
1380 extern char etext; 1381 extern char etext;
1381 extern void safe_bcopy (); 1382 extern void safe_bcopy ();
1383 extern void dump_opcode_frequencies ();
1384
1382 atexit (_mcleanup); 1385 atexit (_mcleanup);
1386 // atexit (dump_opcode_frequencies);
1383 /* This uses safe_bcopy because that function comes first in the 1387 /* This uses safe_bcopy because that function comes first in the
1384 Emacs executable. It might be better to use something that 1388 Emacs executable. It might be better to use something that
1385 gives the start of the text segment, but start_of_text is not 1389 gives the start of the text segment, but start_of_text is not
1386 defined on all systems now. */ 1390 defined on all systems now. */
1387 monstartup (safe_bcopy, &etext); 1391 monstartup (safe_bcopy, &etext);
1482 { "-l", "--load", 0, 1 }, 1486 { "-l", "--load", 0, 1 },
1483 { "-load", 0, 0, 1 }, 1487 { "-load", 0, 0, 1 },
1484 { "-f", "--funcall", 0, 1 }, 1488 { "-f", "--funcall", 0, 1 },
1485 { "-funcall", 0, 0, 1 }, 1489 { "-funcall", 0, 0, 1 },
1486 { "-eval", "--eval", 0, 1 }, 1490 { "-eval", "--eval", 0, 1 },
1491 { "-execute", "--execute", 0, 1 },
1487 { "-find-file", "--find-file", 0, 1 }, 1492 { "-find-file", "--find-file", 0, 1 },
1488 { "-visit", "--visit", 0, 1 }, 1493 { "-visit", "--visit", 0, 1 },
1494 { "-file", "--file", 0, 1 },
1489 { "-insert", "--insert", 0, 1 }, 1495 { "-insert", "--insert", 0, 1 },
1490 /* This should be processed after ordinary file name args and the like. */ 1496 /* This should be processed after ordinary file name args and the like. */
1491 { "-kill", "--kill", -10, 0 }, 1497 { "-kill", "--kill", -10, 0 },
1492 }; 1498 };
1493 1499