diff options
author | pbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-08-04 03:06:12 +0000 |
---|---|---|
committer | pbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-08-04 03:06:12 +0000 |
commit | 7b7afa038f578b0d9e86851ab3a8c2a89e0c0f7e (patch) | |
tree | 79ce8b2fc6abff72b98587b58b629ea8eae957d7 /gcc/fortran/trans.h | |
parent | c999d03166080730b4476ea879899025991347d9 (diff) | |
download | gcc-7b7afa038f578b0d9e86851ab3a8c2a89e0c0f7e.tar.gz |
2005-08-04 Paul Brook <paul@codesourcery.com>
* trans-expr.c (gfc_conv_expr, gfc_conv_expr_type): Update comments.
(gfc_conv_expr_lhs): Fix assertion.
(gfc_conv_expr_val): Merge post block. Set se.expr to new value.
* trans.h: Move and update comments.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102729 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/trans.h')
-rw-r--r-- | gcc/fortran/trans.h | 11 |
1 files changed, 3 insertions, 8 deletions
diff --git a/gcc/fortran/trans.h b/gcc/fortran/trans.h index c4099a982b2..9678ff8a5c7 100644 --- a/gcc/fortran/trans.h +++ b/gcc/fortran/trans.h @@ -275,20 +275,15 @@ tree gfc_chainon_list (tree, tree); when a POST chain may be created, and what the returned expression may be used for. Note that character strings have special handling. This should not be a problem as most statements/operations only deal with - numeric/logical types. */ + numeric/logical types. See the implementations in trans-expr.c + for details of the individual functions. */ -/* Entry point for expression translation. */ void gfc_conv_expr (gfc_se * se, gfc_expr * expr); -/* Like gfc_conv_expr, but the POST block is guaranteed to be empty for - numeric expressions. */ void gfc_conv_expr_val (gfc_se * se, gfc_expr * expr); -/* Like gfc_conv_expr_val, but the value is also suitable for use in the lhs of - an assignment. */ void gfc_conv_expr_lhs (gfc_se * se, gfc_expr * expr); -/* Converts an expression so that it can be passed be reference. */ void gfc_conv_expr_reference (gfc_se * se, gfc_expr *); -/* Equivalent to convert(type, gfc_conv_expr_val(se, expr)). */ void gfc_conv_expr_type (gfc_se * se, gfc_expr *, tree); + /* Find the decl containing the auxiliary variables for assigned variables. */ void gfc_conv_label_variable (gfc_se * se, gfc_expr * expr); /* If the value is not constant, Create a temporary and copy the value. */ |