1 /********************************************************************/
2 /*                                                                  */
3 /*  s7   Seed7 interpreter                                          */
4 /*  Copyright (C) 1990 - 2007  Thomas Mertes                        */
5 /*                                                                  */
6 /*  This program is free software; you can redistribute it and/or   */
7 /*  modify it under the terms of the GNU General Public License as  */
8 /*  published by the Free Software Foundation; either version 2 of  */
9 /*  the License, or (at your option) any later version.             */
10 /*                                                                  */
11 /*  This program is distributed in the hope that it will be useful, */
12 /*  but WITHOUT ANY WARRANTY; without even the implied warranty of  */
13 /*  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the   */
14 /*  GNU General Public License for more details.                    */
15 /*                                                                  */
16 /*  You should have received a copy of the GNU General Public       */
17 /*  License along with this program; if not, write to the           */
18 /*  Free Software Foundation, Inc., 51 Franklin Street,             */
19 /*  Fifth Floor, Boston, MA  02110-1301, USA.                       */
20 /*                                                                  */
21 /*  Module: Library                                                 */
22 /*  File: seed7/src/prclib.h                                        */
23 /*  Changes: 1991, 1992, 1993, 1994  Thomas Mertes                  */
24 /*  Content: Primitive actions to implement simple statements.      */
25 /*                                                                  */
26 /********************************************************************/
27 
28 objectType prc_args             (listType arguments);
29 objectType prc_begin            (listType arguments);
30 objectType prc_block            (listType arguments);
31 objectType prc_block_catch_all  (listType arguments);
32 objectType prc_block_otherwise  (listType arguments);
33 objectType prc_case             (listType arguments);
34 objectType prc_case_def         (listType arguments);
35 objectType prc_case_hashset     (listType arguments);
36 objectType prc_case_hashset_def (listType arguments);
37 objectType prc_cpy              (listType arguments);
38 objectType prc_create           (listType arguments);
39 objectType prc_decls            (listType arguments);
40 objectType prc_dynamic          (listType arguments);
41 objectType prc_exit             (listType arguments);
42 objectType prc_for_downto       (listType arguments);
43 objectType prc_for_downto_step  (listType arguments);
44 objectType prc_for_to           (listType arguments);
45 objectType prc_for_to_step      (listType arguments);
46 objectType prc_heapstat         (listType arguments);
47 objectType prc_hsize            (listType arguments);
48 objectType prc_if               (listType arguments);
49 objectType prc_if_elsif         (listType arguments);
50 objectType prc_if_noop          (listType arguments);
51 objectType prc_include          (listType arguments);
52 objectType prc_local            (listType arguments);
53 objectType prc_noop             (listType arguments);
54 objectType prc_raise            (listType arguments);
55 objectType prc_repeat           (listType arguments);
56 objectType prc_repeat_noop      (listType arguments);
57 objectType prc_res_begin        (listType arguments);
58 objectType prc_res_local        (listType arguments);
59 objectType prc_return           (listType arguments);
60 objectType prc_return2          (listType arguments);
61 objectType prc_settrace         (listType arguments);
62 objectType prc_trace            (listType arguments);
63 objectType prc_varfunc          (listType arguments);
64 objectType prc_varfunc2         (listType arguments);
65 objectType prc_while            (listType arguments);
66 objectType prc_while_noop       (listType arguments);
67