1
|
1 /* |
|
2 |
1884
|
3 Copyright (C) 1996 John W. Eaton |
1
|
4 |
|
5 This file is part of Octave. |
|
6 |
|
7 Octave is free software; you can redistribute it and/or modify it |
|
8 under the terms of the GNU General Public License as published by the |
|
9 Free Software Foundation; either version 2, or (at your option) any |
|
10 later version. |
|
11 |
|
12 Octave is distributed in the hope that it will be useful, but WITHOUT |
|
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
|
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
|
15 for more details. |
|
16 |
|
17 You should have received a copy of the GNU General Public License |
|
18 along with Octave; see the file COPYING. If not, write to the Free |
1315
|
19 Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
1
|
20 |
|
21 */ |
|
22 |
1670
|
23 #if !defined (octave_toplev_h) |
|
24 #define octave_toplev_h 1 |
1
|
25 |
1355
|
26 #include <cstdio> |
1
|
27 |
1488
|
28 class tree_constant; |
|
29 class tree_function; |
578
|
30 class tree_statement_list; |
1572
|
31 class charMatrix; |
1
|
32 |
1747
|
33 #include <string> |
|
34 |
1426
|
35 extern void clean_up_and_exit (int) NORETURN; |
574
|
36 |
|
37 extern void parse_and_execute (FILE *f, int print = 0); |
1604
|
38 |
1747
|
39 extern void parse_and_execute (const string& s, int print = 0, |
1605
|
40 int verbose = 0, |
|
41 const char *warn_for = 0); |
1
|
42 |
1755
|
43 extern tree_constant eval_string (const string&, int print, |
1488
|
44 int& parse_status); |
|
45 |
1907
|
46 extern int main_loop (void); |
|
47 |
2077
|
48 extern void do_octave_atexit (void); |
|
49 |
1
|
50 // argv[0] for this program. |
1755
|
51 extern string raw_prog_name; |
1
|
52 |
|
53 // Cleaned-up name of this program, not including path information. |
1755
|
54 extern string prog_name; |
1
|
55 |
|
56 // Login name for user running this program. |
1755
|
57 extern string user_name; |
1
|
58 |
|
59 // Name of the host we are running on. |
1755
|
60 extern string host_name; |
1
|
61 |
|
62 // User's home directory. |
1755
|
63 extern string home_directory; |
1
|
64 |
|
65 // Guess what? |
1755
|
66 extern string the_current_working_directory; |
1
|
67 |
1613
|
68 // The path that will be searched for programs that we execute. |
1755
|
69 extern string exec_path; |
1613
|
70 |
1
|
71 // Load path specified on command line. |
1755
|
72 extern string load_path; |
1
|
73 |
186
|
74 // Name of the info file specified on command line. |
1755
|
75 extern string info_file; |
186
|
76 |
1613
|
77 // Name of the info reader we'd like to use. |
1755
|
78 extern string info_prog; |
1613
|
79 |
195
|
80 // Name of the editor to be invoked by the edit_history command. |
1755
|
81 extern string editor; |
195
|
82 |
1822
|
83 // Nonzero means we are using readline. |
|
84 extern int using_readline; |
1
|
85 |
1671
|
86 // Nonzero means we printed messages about reading startup files. |
|
87 extern int reading_startup_message_printed; |
|
88 |
1
|
89 // Command number, counting from the beginning of this session. |
|
90 extern int current_command_number; |
|
91 |
|
92 // Nonzero means we are exiting via the builtin exit or quit functions. |
|
93 extern int quitting_gracefully; |
|
94 |
|
95 // Current command to execute. |
578
|
96 extern tree_statement_list *global_command; |
1
|
97 |
206
|
98 // Pointer to function that is currently being evaluated. |
|
99 extern tree_function *curr_function; |
|
100 |
315
|
101 // Nonzero means input is coming from startup file. |
|
102 extern int input_from_startup_file; |
|
103 |
1516
|
104 // Nonzero means that input is coming from a file that was named on |
|
105 // the command line. |
|
106 extern int input_from_command_line_file; |
|
107 |
1
|
108 #endif |
|
109 |
|
110 /* |
|
111 ;;; Local Variables: *** |
|
112 ;;; mode: C++ *** |
|
113 ;;; End: *** |
|
114 */ |