diff options
Diffstat (limited to 'gcc/f/com.c')
| -rw-r--r-- | gcc/f/com.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/f/com.c b/gcc/f/com.c index 2fdacbd7e31..bdb2a4ac5e7 100644 --- a/gcc/f/com.c +++ b/gcc/f/com.c @@ -3730,6 +3730,10 @@ ffecom_expr_ (ffebld expr, tree dest_tree, ffebld dest, item = ffecom_arg_ptr_to_expr (ffebld_left (expr), &list); return convert (tree_type, item); + case FFEBLD_opPERCENT_VAL: + item = ffecom_arg_expr (ffebld_left (expr), &list); + return convert (tree_type, item); + case FFEBLD_opITEM: case FFEBLD_opSTAR: case FFEBLD_opBOUNDS: |