1 /* Header for functions resolving DATA statements. 2 Copyright (C) 2007-2020 Free Software Foundation, Inc. 3 4 This file is part of GCC. 5 6 GCC is free software; you can redistribute it and/or modify it under 7 the terms of the GNU General Public License as published by the Free 8 Software Foundation; either version 3, or (at your option) any later 9 version. 10 11 GCC is distributed in the hope that it will be useful, but WITHOUT ANY 12 WARRANTY; without even the implied warranty of MERCHANTABILITY or 13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 14 for more details. 15 16 You should have received a copy of the GNU General Public License 17 along with GCC; see the file COPYING3. If not see 18 <http://www.gnu.org/licenses/>. */ 19 20 void gfc_formalize_init_value (gfc_symbol *); 21 void gfc_get_section_index (gfc_array_ref *, mpz_t *, mpz_t *); 22 bool gfc_assign_data_value (gfc_expr *, gfc_expr *, mpz_t, mpz_t *); 23 void gfc_advance_section (mpz_t *, gfc_array_ref *, mpz_t *); 24