]>
Commit | Line | Data |
---|---|---|
6de9cd9a DN |
1 | /* Header for statement translation functions |
2 | Copyright (C) 2002, 2003 Free Software Foundation, Inc. | |
3 | Contributed by Paul Brook | |
4 | ||
9fc4d79b | 5 | This file is part of GCC. |
6de9cd9a | 6 | |
9fc4d79b TS |
7 | GCC is free software; you can redistribute it and/or modify it under |
8 | the terms of the GNU General Public License as published by the Free | |
9 | Software Foundation; either version 2, or (at your option) any later | |
10 | version. | |
6de9cd9a | 11 | |
9fc4d79b TS |
12 | GCC is distributed in the hope that it will be useful, but WITHOUT ANY |
13 | 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. | |
6de9cd9a DN |
16 | |
17 | You should have received a copy of the GNU General Public License | |
9fc4d79b | 18 | along with GCC; see the file COPYING. If not, write to the Free |
ab57747b KC |
19 | Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA |
20 | 02110-1301, USA. */ | |
6de9cd9a DN |
21 | |
22 | /* Statement translators (gfc_trans_*) return a fully translated tree. | |
23 | Calls gfc_trans_*. */ | |
24 | tree gfc_trans_code (gfc_code *); | |
25 | ||
26 | /* All other gfc_trans_* should only need be called by gfc_trans_code */ | |
27 | ||
28 | /* trans-expr.c */ | |
29 | tree gfc_trans_assign (gfc_code *); | |
30 | tree gfc_trans_pointer_assign (gfc_code *); | |
31 | ||
32 | /* trans-stmt.c */ | |
33 | tree gfc_trans_cycle (gfc_code *); | |
34 | tree gfc_trans_exit (gfc_code *); | |
35 | tree gfc_trans_label_assign (gfc_code *); | |
36 | tree gfc_trans_label_here (gfc_code *); | |
37 | tree gfc_trans_goto (gfc_code *); | |
3d79abbd | 38 | tree gfc_trans_entry (gfc_code *); |
6de9cd9a DN |
39 | tree gfc_trans_pause (gfc_code *); |
40 | tree gfc_trans_stop (gfc_code *); | |
41 | tree gfc_trans_call (gfc_code *); | |
42 | tree gfc_trans_return (gfc_code *); | |
43 | tree gfc_trans_if (gfc_code *); | |
44 | tree gfc_trans_arithmetic_if (gfc_code *); | |
45 | tree gfc_trans_do (gfc_code *); | |
46 | tree gfc_trans_do_while (gfc_code *); | |
47 | tree gfc_trans_select (gfc_code *); | |
48 | tree gfc_trans_forall (gfc_code *); | |
49 | tree gfc_trans_where (gfc_code *); | |
50 | tree gfc_trans_allocate (gfc_code *); | |
51 | tree gfc_trans_deallocate (gfc_code *); | |
52 | tree gfc_trans_deallocate_array (tree); | |
53 | ||
54 | /* trans-io.c */ | |
55 | tree gfc_trans_open (gfc_code *); | |
56 | tree gfc_trans_close (gfc_code *); | |
57 | tree gfc_trans_read (gfc_code *); | |
58 | tree gfc_trans_write (gfc_code *); | |
59 | tree gfc_trans_iolength (gfc_code *); | |
60 | tree gfc_trans_backspace (gfc_code *); | |
61 | tree gfc_trans_endfile (gfc_code *); | |
62 | tree gfc_trans_inquire (gfc_code *); | |
63 | tree gfc_trans_rewind (gfc_code *); | |
64 | ||
65 | tree gfc_trans_transfer (gfc_code *); | |
66 | tree gfc_trans_dt_end (gfc_code *); |