From: Dominique d'Humieres <dominiq@lps.ens.fr>
Date: Tue, 12 Feb 2013 16:22:13 +0000 (+0100)
Subject: re PR testsuite/56082 (FAIL: gfortran.dg/bind_c_bool_1.f90  -O   (test for errors... 
X-Git-Tag: releases/gcc-4.8.0~473
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=18a7895438fdfc98fc07f43eac156d8224c81943;p=thirdparty%2Fgcc.git

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
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 13114a1683e7..ab009a5a46b4 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,10 @@
+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>
 
 	PR lto/56297
diff --git a/gcc/testsuite/gfortran.dg/bind_c_bool_1.f90 b/gcc/testsuite/gfortran.dg/bind_c_bool_1.f90
index 467bdc1b28ab..871405a77b00 100644
--- a/gcc/testsuite/gfortran.dg/bind_c_bool_1.f90
+++ b/gcc/testsuite/gfortran.dg/bind_c_bool_1.f90
@@ -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'" }
-  logical(kind=4) :: x
+  logical(kind=2) :: x
 end subroutine sub
 
 subroutine sub3(y) bind(C)