1 |
712 |
jeremybenn |
/* Header for dependency analysis
|
2 |
|
|
Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 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 |
|
|
/****************************** Enums *********************************/
|
23 |
|
|
typedef enum
|
24 |
|
|
{
|
25 |
|
|
NOT_ELEMENTAL, /* Not elemental case: normal dependency check. */
|
26 |
|
|
ELEM_CHECK_VARIABLE, /* Test whether variables overlap. */
|
27 |
|
|
ELEM_DONT_CHECK_VARIABLE /* Test whether variables overlap only if used
|
28 |
|
|
in an expression. */
|
29 |
|
|
}
|
30 |
|
|
gfc_dep_check;
|
31 |
|
|
|
32 |
|
|
/*********************** Functions prototypes **************************/
|
33 |
|
|
|
34 |
|
|
bool gfc_ref_needs_temporary_p (gfc_ref *);
|
35 |
|
|
bool gfc_full_array_ref_p (gfc_ref *, bool *);
|
36 |
|
|
gfc_expr *gfc_get_noncopying_intrinsic_argument (gfc_expr *);
|
37 |
|
|
int gfc_check_fncall_dependency (gfc_expr *, sym_intent, gfc_symbol *,
|
38 |
|
|
gfc_actual_arglist *, gfc_dep_check);
|
39 |
|
|
int gfc_check_dependency (gfc_expr *, gfc_expr *, bool);
|
40 |
|
|
int gfc_expr_is_one (gfc_expr *, int);
|
41 |
|
|
|
42 |
|
|
int gfc_dep_resolver(gfc_ref *, gfc_ref *, gfc_reverse *);
|
43 |
|
|
int gfc_are_equivalenced_arrays (gfc_expr *, gfc_expr *);
|