Commit 18a78954 by Dominique d'Humieres Committed by Tobias Burnus

re PR testsuite/56082 (FAIL: gfortran.dg/bind_c_bool_1.f90 -O (test for…

re PR testsuite/56082 (FAIL: gfortran.dg/bind_c_bool_1.f90  -O   (test for errors, line 18) on powerpc-apple-darwin9 with -m32)

2013-02-12  Dominique d'Humieres  <dominiq@lps.ens.fr>
            Tobias Burnus  <burnus@net-b.de>

        PR fortran/56082
        * gfortran.dg/bind_c_bool_1.f90 (sub): Change kind=4
        to kind=2 as 32bit Darwin has C_Bool == 4.


Co-Authored-By: Tobias Burnus <burnus@net-b.de>

From-SVN: r195984
parent 3331275a
2013-02-12 Dominique d'Humieres <dominiq@lps.ens.fr>
Tobias Burnus <burnus@net-b.de>
PR fortran/56082
* gfortran.dg/bind_c_bool_1.f90 (sub): Change kind=4
to kind=2.
2013-02-12 Richard Biener <rguenther@suse.de> 2013-02-12 Richard Biener <rguenther@suse.de>
PR lto/56297 PR lto/56297
......
...@@ -16,7 +16,7 @@ end function sub4 ...@@ -16,7 +16,7 @@ end function sub4
subroutine sub(x) bind(C) ! { dg-error "GNU Extension: LOGICAL dummy argument 'x' at .1. with non-C_Bool kind in BIND.C. procedure 'sub'" } subroutine sub(x) bind(C) ! { dg-error "GNU Extension: LOGICAL dummy argument 'x' at .1. with non-C_Bool kind in BIND.C. procedure 'sub'" }
logical(kind=4) :: x logical(kind=2) :: x
end subroutine sub end subroutine sub
subroutine sub3(y) bind(C) subroutine sub3(y) bind(C)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment