diff options
author | Tobias Burnus <burnus@gcc.gnu.org> | 2013-03-27 11:45:58 +0100 |
---|---|---|
committer | Tobias Burnus <burnus@gcc.gnu.org> | 2013-03-27 11:45:58 +0100 |
commit | 1a8c1e35b38094868dacad28eed2373233088dd2 (patch) | |
tree | 250e755fad9572f8dcf4d3ab8eb89f9394a11c3d /gcc/fortran/intrinsic.h | |
parent | 7d24f650fa1886c29e2431c969e5b7e6f8a50836 (diff) | |
download | gcc-1a8c1e35b38094868dacad28eed2373233088dd2.zip gcc-1a8c1e35b38094868dacad28eed2373233088dd2.tar.gz gcc-1a8c1e35b38094868dacad28eed2373233088dd2.tar.bz2 |
re PR fortran/56650 (Odd error messages with C_SIZEOF for valid code)
2013-03-27 Tobias Burnus <burnus@net-b.de>
PR fortran/56650
PR fortran/36437
* check.c (gfc_check_sizeof, gfc_check_c_sizeof,
gfc_check_storage_size): Update checks.
* intrinsic.texi (SIZEOF): Correct class.
* intrinsic.h (gfc_simplify_sizeof,
gfc_simplify_storage_size): New prototypes.
* intrinsic.c (add_functions): Use them.
* simplify.c (gfc_simplify_sizeof,
gfc_simplify_storage_size): New functions.
2013-03-27 Tobias Burnus <burnus@net-b.de>
PR fortran/56650
PR fortran/36437
* gfortran.dg/sizeof_2.f90: New.
* gfortran.dg/sizeof_3.f90: New.
* gfortran.dg/sizeof_proc.f90: Update dg-error.
From-SVN: r197159
Diffstat (limited to 'gcc/fortran/intrinsic.h')
-rw-r--r-- | gcc/fortran/intrinsic.h | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/fortran/intrinsic.h b/gcc/fortran/intrinsic.h index 0f9b50c..347d71d 100644 --- a/gcc/fortran/intrinsic.h +++ b/gcc/fortran/intrinsic.h @@ -376,6 +376,8 @@ gfc_expr *gfc_simplify_shiftr (gfc_expr *, gfc_expr *); gfc_expr *gfc_simplify_sin (gfc_expr *); gfc_expr *gfc_simplify_sinh (gfc_expr *); gfc_expr *gfc_simplify_size (gfc_expr *, gfc_expr *, gfc_expr *); +gfc_expr *gfc_simplify_sizeof (gfc_expr *); +gfc_expr *gfc_simplify_storage_size (gfc_expr *, gfc_expr *); gfc_expr *gfc_simplify_sngl (gfc_expr *); gfc_expr *gfc_simplify_spacing (gfc_expr *); gfc_expr *gfc_simplify_spread (gfc_expr *, gfc_expr *, gfc_expr *); |