]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
Fortran: Fixup broken build on 32bit after r15-6415 [PR107635]
authorAndre Vehreschild <vehre@gcc.gnu.org>
Mon, 23 Dec 2024 14:01:30 +0000 (15:01 +0100)
committerAndre Vehreschild <vehre@gcc.gnu.org>
Mon, 23 Dec 2024 16:52:10 +0000 (17:52 +0100)
gcc/testsuite/ChangeLog:

PR fortran/107635

* gfortran.dg/coarray_lib_comm_1.f90: Use less complicated
pattern, because all we need is the right count.

gcc/testsuite/gfortran.dg/coarray_lib_comm_1.f90

index 68aa47ecd32543f94042ff3851697fc9e8f2cdee..609f3c10cefa1bbf4a06faade9a0000539801b4a 100644 (file)
@@ -38,6 +38,6 @@ B(1:5) = B(3:7)
 if (any (A-B /= 0)) STOP 4
 end
 
-! { dg-final { scan-tree-dump-times "_gfortran_caf_get_by_ct \\\(caf_token.., 0B, 0B, 1, \\\(unsigned long\\\) atmp.\[0-9\]+.span" 4 "original" } }
+! { dg-final { scan-tree-dump-times "_gfortran_caf_get_by_ct" 4 "original" } }
 ! { dg-final { scan-tree-dump-times "_gfortran_caf_sendget \\\(caf_token.., \\\(integer\\\(kind=\[48\]\\\)\\\) parm.\[0-9\]+.data - \\\(integer\\\(kind=\[48\]\\\)\\\) a, 1, &parm.\[0-9\]+, 0B, caf_token.., \\\(integer\\\(kind=\[48\]\\\)\\\) parm.\[0-9\]+.data - \\\(integer\\\(kind=\[48\]\\\)\\\) a, 1, &parm.\[0-9\]+, 0B, 4, 4, 1, 0B\\\);" 1 "original" } }