From 42b215cc9295a7b3eac1b9c6fb76d42ea02cc441 Mon Sep 17 00:00:00 2001 From: tobi Date: Fri, 10 Feb 2006 00:10:47 +0000 Subject: fortran/ 2006-02-09 Tobias Schlueter PR fortran/14771 * gfortran.h (gfc_intrinsic_op): Add INTRINSIC_PARENTHESES. * dump-parse-tree (gfc_show_expr): Handle INTRINSIC_PARENTHESES. * expr.c (simplify_intrinsic_op): Treat INTRINSIC_PARENTHESES as if it were INTRINSIC_UPLUS. * resolve.c (resolve_operator): Handle INTRINSIC_PARENTHESES. * match.c (intrinsic_operators): Add INTRINSIC_PARENTHESES. * matchexp.c (match_primary): Record parentheses surrounding numeric expressions. * module.c (intrinsics): Add INTRINSIC_PARENTHESES for module dumping. * trans-expr.c (gfc_conv_expr_op): Handle INTRINSIC_PARENTHESES. testsuite/ 2006-02-09 Tobias Schlueter Paul Thomas PR fortran/14771 * gfortran.dg/parens_1.f90: New. * gfortran.dg/parens_2.f90: New. * gfortran.dg/parens_3.f90: New. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@110819 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/fortran/module.c | 1 + 1 file changed, 1 insertion(+) (limited to 'gcc/fortran/module.c') diff --git a/gcc/fortran/module.c b/gcc/fortran/module.c index 8f1ab7301f4..8af0c6d964f 100644 --- a/gcc/fortran/module.c +++ b/gcc/fortran/module.c @@ -2455,6 +2455,7 @@ static const mstring intrinsics[] = minit ("LT", INTRINSIC_LT), minit ("LE", INTRINSIC_LE), minit ("NOT", INTRINSIC_NOT), + minit ("PARENTHESES", INTRINSIC_PARENTHESES), minit (NULL, -1) }; -- cgit v1.2.3