gcc/fortran/trans-stmt.h

   1 /* Header for statement translation functions
   2    Copyright (C) 2002, 2003, 2006, 2007, 2008, 2010
   3    Free Software Foundation, Inc.
   4    Contributed by Paul Brook
   5
   6 This file is part of GCC.
   7
   8 GCC is free software; you can redistribute it and/or modify it under
   9 the terms of the GNU General Public License as published by the Free
  10 Software Foundation; either version 3, or (at your option) any later
  11 version.
  12
  13 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
  14 WARRANTY; without even the implied warranty of MERCHANTABILITY or
  15 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  16 for more details.
  17
  18 You should have received a copy of the GNU General Public License
  19 along with GCC; see the file COPYING3.  If not see
  20 <http://www.gnu.org/licenses/>.  */
  21
  22 /* Statement translators (gfc_trans_*) return a fully translated tree.
  23    Calls gfc_trans_*.  */
  24 tree gfc_trans_code (gfc_code *);
  25
  26 /* Wrapper function used to pass a check condition for implied DO loops.  */
  27 tree gfc_trans_code_cond (gfc_code *, tree);
  28
  29 /* All other gfc_trans_* should only need be called by gfc_trans_code */
  30
  31 /* trans-expr.c */
  32 tree gfc_trans_assign (gfc_code *);
  33 tree gfc_trans_pointer_assign (gfc_code *);
  34 tree gfc_trans_init_assign (gfc_code *);
  35 tree gfc_trans_class_init_assign (gfc_code *);
  36 tree gfc_trans_class_assign (gfc_expr *, gfc_expr *, gfc_exec_op);
  37
  38 /* trans-stmt.c */
  39 tree gfc_trans_cycle (gfc_code *);
  40 tree gfc_trans_critical (gfc_code *);
  41 tree gfc_trans_exit (gfc_code *);
  42 tree gfc_trans_label_assign (gfc_code *);
  43 tree gfc_trans_label_here (gfc_code *);
  44 tree gfc_trans_goto (gfc_code *);
  45 tree gfc_trans_entry (gfc_code *);
  46 tree gfc_trans_pause (gfc_code *);
  47 tree gfc_trans_stop (gfc_code *, bool);
  48 tree gfc_trans_call (gfc_code *, bool, tree, tree, bool);
  49 tree gfc_trans_return (gfc_code *);
  50 tree gfc_trans_if (gfc_code *);
  51 tree gfc_trans_arithmetic_if (gfc_code *);
  52 tree gfc_trans_block_construct (gfc_code *);
  53 tree gfc_trans_do (gfc_code *, tree);
  54 tree gfc_trans_do_concurrent (gfc_code *);
  55 tree gfc_trans_do_while (gfc_code *);
  56 tree gfc_trans_select (gfc_code *);
  57 tree gfc_trans_sync (gfc_code *, gfc_exec_op);
  58 tree gfc_trans_lock_unlock (gfc_code *, gfc_exec_op);
  59 tree gfc_trans_forall (gfc_code *);
  60 tree gfc_trans_where (gfc_code *);
  61 tree gfc_trans_allocate (gfc_code *);
  62 tree gfc_trans_deallocate (gfc_code *);
  63 tree gfc_trans_deallocate_array (tree);
  64
  65 /* trans-openmp.c */
  66 tree gfc_trans_omp_directive (gfc_code *);
  67
  68 /* trans-io.c */
  69 tree gfc_trans_open (gfc_code *);
  70 tree gfc_trans_close (gfc_code *);
  71 tree gfc_trans_read (gfc_code *);
  72 tree gfc_trans_write (gfc_code *);
  73 tree gfc_trans_iolength (gfc_code *);
  74 tree gfc_trans_backspace (gfc_code *);
  75 tree gfc_trans_endfile (gfc_code *);
  76 tree gfc_trans_inquire (gfc_code *);
  77 tree gfc_trans_rewind (gfc_code *);
  78 tree gfc_trans_flush (gfc_code *);
  79
  80 tree gfc_trans_transfer (gfc_code *);
  81 tree gfc_trans_dt_end (gfc_code *);
  82 tree gfc_trans_wait (gfc_code *);