diff options
Diffstat (limited to 'gcc/testsuite/gnat.dg/sso/q11.adb')
-rw-r--r-- | gcc/testsuite/gnat.dg/sso/q11.adb | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/testsuite/gnat.dg/sso/q11.adb b/gcc/testsuite/gnat.dg/sso/q11.adb index 84951de3019..22ac5578dd7 100644 --- a/gcc/testsuite/gnat.dg/sso/q11.adb +++ b/gcc/testsuite/gnat.dg/sso/q11.adb @@ -16,22 +16,22 @@ begin Put ("A1 :"); Dump (A1'Address, R1'Max_Size_In_Storage_Elements); New_Line; - -- { dg-output "A1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" } + -- { dg-output "A1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" } Put ("B1 :"); Dump (B1'Address, R1'Max_Size_In_Storage_Elements); New_Line; - -- { dg-output "B1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" } + -- { dg-output "B1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" } Put ("A2 :"); Dump (A2'Address, R2'Max_Size_In_Storage_Elements); New_Line; - -- { dg-output "A2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" } + -- { dg-output "A2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" } Put ("B2 :"); Dump (B2'Address, R2'Max_Size_In_Storage_Elements); New_Line; - -- { dg-output "B2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56\n"} + -- { dg-output "B2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n"} if A1.I /= B1.I or A1.A(1) /= B1.A(1) then raise Program_Error; |