PR ada/69488

* gnat.dg/sso/*.adb: Robustify dg-output directives. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@232883 138bc75d-0d04-0410-961f-82ee72b054a4
author: ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4> 2016-01-27 16:53:27 +0000
committer: ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4> 2016-01-27 16:53:27 +0000
commit: d46a16d4f031ec7748d6c984b3ac25422c863809 (patch)
tree: ab2bacceed8ed43c8450ed1ca1692f61e07ecef0
parent: 6a9b35efb9d45ffc8415e4d05876ced0a171e70e (diff)
download: gcc-d46a16d4f031ec7748d6c984b3ac25422c863809.tar.gz
58 files changed, 354 insertions, 349 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 40aa9c33917..94659a28fe5 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2016-01-27  Rainer Emrich  <rainer@emrich-ebersheim.de>
+
+	PR ada/69488
+	* gnat.dg/sso/*.adb: Robustify dg-output directives.
+
 2016-01-27  Marek Polacek  <polacek@redhat.com>
 
 	PR c++/69379
diff --git a/gcc/testsuite/gnat.dg/sso/conv1.adb b/gcc/testsuite/gnat.dg/sso/conv1.adb
index 8cdb612d0a3..6c9ba949dbd 100644
--- a/gcc/testsuite/gnat.dg/sso/conv1.adb
+++ b/gcc/testsuite/gnat.dg/sso/conv1.adb
@@ -36,15 +36,15 @@ begin
    X_L.S := 12345;
    X_L.C := 'a';
    Dump ("X_L", X_L.S, X_L.C);
-   -- { dg-output "X_L = \\(S => 12345, C => 'a'\\)\n" }
+   -- { dg-output "X_L = \\(S => 12345, C => 'a'\\).*\n" }
 
    X_H.S := 23456;
    X_H.C := 'b';
    Dump ("X_H", X_H.S, X_H.C);
-   -- { dg-output "X_H = \\(S => 23456, C => 'b'\\)\n" }
+   -- { dg-output "X_H = \\(S => 23456, C => 'b'\\).*\n" }
 
    X_H := R_H (X_L);
    Dump ("X_H", X_H.S, X_H.C);
-   -- { dg-output "X_H = \\(S => 12345, C => 'a'\\)\n" }
+   -- { dg-output "X_H = \\(S => 12345, C => 'a'\\).*\n" }
 
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/p1.adb b/gcc/testsuite/gnat.dg/sso/p1.adb
index 514fa7eeda3..af5030171fa 100644
--- a/gcc/testsuite/gnat.dg/sso/p1.adb
+++ b/gcc/testsuite/gnat.dg/sso/p1.adb
@@ -13,50 +13,50 @@ begin
   Put ("My_R1    :");
   Dump (My_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R1    : 78 56 34 12\n" }
+  -- { dg-output "My_R1    : 78 56 34 12.*\n" }
 
   Put ("My_R2    :");
   Dump (My_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R2    : 12 34 56 78\n" }
+  -- { dg-output "My_R2    : 12 34 56 78.*\n" }
 
   Local_R1 := My_R1;
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12.*\n" }
 
   Local_R2 := My_R2;
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78.*\n" }
 
   Local_R1.I := 16#12345678#;
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12.*\n" }
 
   Local_R2.I := 16#12345678#;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78.*\n" }
 
   Local_R1.I := Local_R2.I;
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12.*\n" }
 
   Local_R2.I := Local_R1.I;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/p10.adb b/gcc/testsuite/gnat.dg/sso/p10.adb
index 067a57ece31..bdda767ece7 100644
--- a/gcc/testsuite/gnat.dg/sso/p10.adb
+++ b/gcc/testsuite/gnat.dg/sso/p10.adb
@@ -14,50 +14,50 @@ begin
   Put ("My_R1    :");
   Dump (My_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R1    : 78 56 34 12\n" }
+  -- { dg-output "My_R1    : 78 56 34 12.*\n" }
 
   Put ("My_R2    :");
   Dump (My_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R2    : 12 34 56 78\n" }
+  -- { dg-output "My_R2    : 12 34 56 78.*\n" }
 
   Local_R1 := My_R1;
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12.*\n" }
 
   Local_R2 := My_R2;
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78.*\n" }
 
   Local_R1.I := 16#12345678#;
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12.*\n" }
 
   Local_R2.I := 16#12345678#;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78.*\n" }
 
   Local_R1.I := Local_R2.I;
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12.*\n" }
 
   Local_R2.I := Local_R1.I;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/p11.adb b/gcc/testsuite/gnat.dg/sso/p11.adb
index c6f6166473e..9d1abff6910 100644
--- a/gcc/testsuite/gnat.dg/sso/p11.adb
+++ b/gcc/testsuite/gnat.dg/sso/p11.adb
@@ -13,38 +13,38 @@ begin
   Put ("My_R1    :");
   Dump (My_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R1    : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "My_R1    : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Put ("My_R2    :");
   Dump (My_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R2    : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "My_R2    : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Local_R1 := My_R1;
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Local_R2 := My_R2;
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Local_R1 := (I => 16#12345678#,
                A => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Local_R2 := (I => 16#12345678#,
                A => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Local_R1.I    := Local_R2.I;
   Local_R1.A(1) := Local_R2.A(1);
@@ -54,7 +54,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Local_R2.I    := Local_R1.I;
   Local_R2.A(1) := Local_R1.A(1);
@@ -64,5 +64,5 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/p12.adb b/gcc/testsuite/gnat.dg/sso/p12.adb
index 03e5e65e9f6..1e94befc0db 100644
--- a/gcc/testsuite/gnat.dg/sso/p12.adb
+++ b/gcc/testsuite/gnat.dg/sso/p12.adb
@@ -15,72 +15,72 @@ begin
   Put ("My_A1     :");
   Dump (My_A1'Address, Arr1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_A1     : 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "My_A1     : 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Put ("My_A11    :");
   Dump (My_A11'Address, Arr11'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_A11    : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00\n" }
+  -- { dg-output "My_A11    : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00.*\n" }
 
   Put ("My_A2     :");
   Dump (My_A2'Address, Arr2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_A2     : 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "My_A2     : 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Put ("My_A22    :");
   Dump (My_A22'Address, Arr22'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_A22    : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34\n" }
+  -- { dg-output "My_A22    : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34.*\n" }
 
   Local_A1 := My_A1;
   Put ("Local_A1  :");
   Dump (Local_A1'Address, Arr1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A1  : 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_A1  : 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Local_A11 := My_A11;
   Put ("Local_A11 :");
   Dump (Local_A11'Address, Arr11'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A11 : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00\n" }
+  -- { dg-output "Local_A11 : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00.*\n" }
 
   Local_A2 := My_A2;
   Put ("Local_A2  :");
   Dump (Local_A2'Address, Arr2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A2  : 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_A2  : 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Local_A22 := My_A22;
   Put ("Local_A22 :");
   Dump (Local_A22'Address, Arr22'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A22 : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34\n" }
+  -- { dg-output "Local_A22 : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34.*\n" }
 
   Local_A1 := (16#AB0012#, 16#CD0034#, 16#EF0056#);
   Put ("Local_A1  :");
   Dump (Local_A1'Address, Arr1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A1  : 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_A1  : 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Local_A11 := (1 => (16#AB0012#, 16#CD0034#),
                 2 => (16#AB0012#, 16#CD0034#));
   Put ("Local_A11 :");
   Dump (Local_A11'Address, Arr11'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A11 : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00\n" }
+  -- { dg-output "Local_A11 : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00.*\n" }
 
   Local_A2 := (16#AB0012#, 16#CD0034#, 16#EF0056#);
   Put ("Local_A2  :");
   Dump (Local_A2'Address, Arr2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A2  : 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_A2  : 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Local_A22 := (1 => (16#AB0012#, 16#CD0034#),
                 2 => (16#AB0012#, 16#CD0034#));
   Put ("Local_A22 :");
   Dump (Local_A22'Address, Arr22'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A22 : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34\n" }
+  -- { dg-output "Local_A22 : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34.*\n" }
 
   Local_A1(1) := Local_A2(1);
   Local_A1(2) := Local_A2(2);
@@ -89,7 +89,7 @@ begin
   Put ("Local_A1  :");
   Dump (Local_A1'Address, Arr1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A1  : 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_A1  : 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Local_A11(1,1) := Local_A22(1,1);
   Local_A11(1,2) := Local_A22(1,2);
@@ -99,7 +99,7 @@ begin
   Put ("Local_A11 :");
   Dump (Local_A11'Address, Arr11'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A11 : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00\n" }
+  -- { dg-output "Local_A11 : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00.*\n" }
 
   Local_A2(1) := Local_A1(1);
   Local_A2(2) := Local_A1(2);
@@ -108,7 +108,7 @@ begin
   Put ("Local_A2  :");
   Dump (Local_A2'Address, Arr2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A2  : 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_A2  : 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Local_A22(1,1) := Local_A11(1,1);
   Local_A22(1,2) := Local_A11(1,2);
@@ -118,5 +118,5 @@ begin
   Put ("Local_A22 :");
   Dump (Local_A22'Address, Arr22'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A22 : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34\n" }
+  -- { dg-output "Local_A22 : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/p13.adb b/gcc/testsuite/gnat.dg/sso/p13.adb
index 49db1114c68..b84a42c8f10 100644
--- a/gcc/testsuite/gnat.dg/sso/p13.adb
+++ b/gcc/testsuite/gnat.dg/sso/p13.adb
@@ -14,50 +14,50 @@ begin
   Put ("My_R1    :");
   Dump (My_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R1    : db 0f 49 40 db 0f 49 c0\n" }
+  -- { dg-output "My_R1    : db 0f 49 40 db 0f 49 c0.*\n" }
 
   Put ("My_R2    :");
   Dump (My_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R2    : 40 49 0f db c0 49 0f db\n" }
+  -- { dg-output "My_R2    : 40 49 0f db c0 49 0f db.*\n" }
 
   Local_R1 := My_R1;
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : db 0f 49 40 db 0f 49 c0\n" }
+  -- { dg-output "Local_R1 : db 0f 49 40 db 0f 49 c0.*\n" }
 
   Local_R2 := My_R2;
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 49 0f db c0 49 0f db\n" }
+  -- { dg-output "Local_R2 : 40 49 0f db c0 49 0f db.*\n" }
 
   Local_R1.F := (Pi, -Pi);
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : db 0f 49 40 db 0f 49 c0\n" }
+  -- { dg-output "Local_R1 : db 0f 49 40 db 0f 49 c0.*\n" }
 
   Local_R2.F := (Pi, -Pi);
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 49 0f db c0 49 0f db\n" }
+  -- { dg-output "Local_R2 : 40 49 0f db c0 49 0f db.*\n" }
 
   Local_R1.F := Local_R2.F;
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : db 0f 49 40 db 0f 49 c0\n" }
+  -- { dg-output "Local_R1 : db 0f 49 40 db 0f 49 c0.*\n" }
 
   Local_R2.F := Local_R1.F;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 49 0f db c0 49 0f db\n" }
+  -- { dg-output "Local_R2 : 40 49 0f db c0 49 0f db.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/p2.adb b/gcc/testsuite/gnat.dg/sso/p2.adb
index 5312e0aac34..8ed69bfe669 100644
--- a/gcc/testsuite/gnat.dg/sso/p2.adb
+++ b/gcc/testsuite/gnat.dg/sso/p2.adb
@@ -13,24 +13,24 @@ begin
   Put ("My_R1    :");
   Dump (My_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R1    : e2 59 d1 48 b4 aa d9 bb\n" }
+  -- { dg-output "My_R1    : e2 59 d1 48 b4 aa d9 bb.*\n" }
 
   Put ("My_R2    :");
   Dump (My_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R2    : 84 8d 15 9e 15 5b 35 df\n" }
+  -- { dg-output "My_R2    : 84 8d 15 9e 15 5b 35 df.*\n" }
 
   Local_R1 := My_R1;
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : e2 59 d1 48 b4 aa d9 bb\n" }
+  -- { dg-output "Local_R1 : e2 59 d1 48 b4 aa d9 bb.*\n" }
 
   Local_R2 := My_R2;
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 84 8d 15 9e 15 5b 35 df\n" }
+  -- { dg-output "Local_R2 : 84 8d 15 9e 15 5b 35 df.*\n" }
 
   Local_R1 := (S1 => 2,
                I  => 16#12345678#,
@@ -40,7 +40,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : e2 59 d1 48 b4 aa d9 bb\n" }
+  -- { dg-output "Local_R1 : e2 59 d1 48 b4 aa d9 bb.*\n" }
 
   Local_R2 := (S1 => 2,
                I  => 16#12345678#,
@@ -50,7 +50,7 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 84 8d 15 9e 15 5b 35 df\n" }
+  -- { dg-output "Local_R2 : 84 8d 15 9e 15 5b 35 df.*\n" }
 
   Local_R1.S1   := Local_R2.S1;
   Local_R1.I    := Local_R2.I;
@@ -63,7 +63,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : e2 59 d1 48 b4 aa d9 bb\n" }
+  -- { dg-output "Local_R1 : e2 59 d1 48 b4 aa d9 bb.*\n" }
 
   Local_R2.S1   := Local_R1.S1;
   Local_R2.I    := Local_R1.I;
@@ -76,5 +76,5 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 84 8d 15 9e 15 5b 35 df\n" }
+  -- { dg-output "Local_R2 : 84 8d 15 9e 15 5b 35 df.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/p3.adb b/gcc/testsuite/gnat.dg/sso/p3.adb
index c138f2416d9..c3bb6992b08 100644
--- a/gcc/testsuite/gnat.dg/sso/p3.adb
+++ b/gcc/testsuite/gnat.dg/sso/p3.adb
@@ -13,24 +13,24 @@ begin
   Put ("My_R1    :");
   Dump (My_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R1    : e2 59 d1 48 b4 aa d9 bb\n" }
+  -- { dg-output "My_R1    : e2 59 d1 48 b4 aa d9 bb.*\n" }
 
   Put ("My_R2    :");
   Dump (My_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R2    : 84 8d 15 9e 15 5b 35 df\n" }
+  -- { dg-output "My_R2    : 84 8d 15 9e 15 5b 35 df.*\n" }
 
   Local_R1 := My_R1;
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : e2 59 d1 48 b4 aa d9 bb\n" }
+  -- { dg-output "Local_R1 : e2 59 d1 48 b4 aa d9 bb.*\n" }
 
   Local_R2 := My_R2;
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 84 8d 15 9e 15 5b 35 df\n" }
+  -- { dg-output "Local_R2 : 84 8d 15 9e 15 5b 35 df.*\n" }
 
   Local_R1 := (S1 => 2,
                I  => 16#12345678#,
@@ -40,7 +40,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : e2 59 d1 48 b4 aa d9 bb\n" }
+  -- { dg-output "Local_R1 : e2 59 d1 48 b4 aa d9 bb.*\n" }
 
   Local_R2 := (S1 => 2,
                I  => 16#12345678#,
@@ -50,7 +50,7 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 84 8d 15 9e 15 5b 35 df\n" }
+  -- { dg-output "Local_R2 : 84 8d 15 9e 15 5b 35 df.*\n" }
 
   Local_R1.S1   := Local_R2.S1;
   Local_R1.I    := Local_R2.I;
@@ -63,7 +63,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : e2 59 d1 48 b4 aa d9 bb\n" }
+  -- { dg-output "Local_R1 : e2 59 d1 48 b4 aa d9 bb.*\n" }
 
   Local_R2.S1   := Local_R1.S1;
   Local_R2.I    := Local_R1.I;
@@ -76,5 +76,5 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 84 8d 15 9e 15 5b 35 df\n" }
+  -- { dg-output "Local_R2 : 84 8d 15 9e 15 5b 35 df.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/p4.adb b/gcc/testsuite/gnat.dg/sso/p4.adb
index a22c0449e08..b710191c676 100644
--- a/gcc/testsuite/gnat.dg/sso/p4.adb
+++ b/gcc/testsuite/gnat.dg/sso/p4.adb
@@ -14,50 +14,50 @@ begin
   Put ("My_R1    :");
   Dump (My_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R1    : db 0f 49 40\n" }
+  -- { dg-output "My_R1    : db 0f 49 40.*\n" }
 
   Put ("My_R2    :");
   Dump (My_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R2    : 40 49 0f db\n" }
+  -- { dg-output "My_R2    : 40 49 0f db.*\n" }
 
   Local_R1 := My_R1;
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : db 0f 49 40\n" }
+  -- { dg-output "Local_R1 : db 0f 49 40.*\n" }
 
   Local_R2 := My_R2;
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 49 0f db\n" }
+  -- { dg-output "Local_R2 : 40 49 0f db.*\n" }
 
   Local_R1.F := Pi;
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : db 0f 49 40\n" }
+  -- { dg-output "Local_R1 : db 0f 49 40.*\n" }
 
   Local_R2.F := Pi;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 49 0f db\n" }
+  -- { dg-output "Local_R2 : 40 49 0f db.*\n" }
 
   Local_R1.F := Local_R2.F;
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : db 0f 49 40\n" }
+  -- { dg-output "Local_R1 : db 0f 49 40.*\n" }
 
   Local_R2.F := Local_R1.F;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 49 0f db\n" }
+  -- { dg-output "Local_R2 : 40 49 0f db.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/p5.adb b/gcc/testsuite/gnat.dg/sso/p5.adb
index 6a692ae5364..a1036efb8bc 100644
--- a/gcc/testsuite/gnat.dg/sso/p5.adb
+++ b/gcc/testsuite/gnat.dg/sso/p5.adb
@@ -13,38 +13,38 @@ begin
   Put ("My_R1    :");
   Dump (My_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R1    : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "My_R1    : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Put ("My_R2    :");
   Dump (My_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R2    : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "My_R2    : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Local_R1 := My_R1;
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Local_R2 := My_R2;
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Local_R1 := (I => 16#12345678#,
                A => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Local_R2 := (I => 16#12345678#,
                A => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Local_R1.I    := Local_R2.I;
   Local_R1.A(1) := Local_R2.A(1);
@@ -54,7 +54,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Local_R2.I    := Local_R1.I;
   Local_R2.A(1) := Local_R1.A(1);
@@ -64,5 +64,5 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/p6.adb b/gcc/testsuite/gnat.dg/sso/p6.adb
index 35c1b1a201e..9a0fedaed86 100644
--- a/gcc/testsuite/gnat.dg/sso/p6.adb
+++ b/gcc/testsuite/gnat.dg/sso/p6.adb
@@ -13,33 +13,33 @@ begin
   Put ("My_R1    :");
   Dump (My_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R1    : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "My_R1    : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
   Put ("My_R2    :");
   Dump (My_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R2    : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "My_R2    : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
   Local_R1 := My_R1;
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
   Local_R2 := My_R2;
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
   Local_R1 := (I => 16#12345678#,
                A => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
   Local_R2 := (I => 16#12345678#,
                A => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
   Local_R1.I    := Local_R2.I;
   Local_R1.A(1) := Local_R2.A(1);
   Local_R1.A(2) := Local_R2.A(2);
@@ -48,7 +48,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
   Local_R2.I    := Local_R1.I;
   Local_R2.A(1) := Local_R1.A(1);
   Local_R2.A(2) := Local_R1.A(2);
@@ -57,5 +57,5 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/p7.adb b/gcc/testsuite/gnat.dg/sso/p7.adb
index 01354befbab..5e9a6405769 100644
--- a/gcc/testsuite/gnat.dg/sso/p7.adb
+++ b/gcc/testsuite/gnat.dg/sso/p7.adb
@@ -13,33 +13,33 @@ begin
   Put ("My_R1    :");
   Dump (My_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R1    : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "My_R1    : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
   Put ("My_R2    :");
   Dump (My_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R2    : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "My_R2    : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
   Local_R1 := My_R1;
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
   Local_R2 := My_R2;
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
   Local_R1 := (I => 16#12345678#,
                N => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
   Local_R2 := (I => 16#12345678#,
                N => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
   Local_R1.I    := Local_R2.I;
   Local_R1.N.C1 := Local_R2.N.C1;
   Local_R1.N.C2 := Local_R2.N.C2;
@@ -48,7 +48,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
   Local_R2.I    := Local_R1.I;
   Local_R2.N.C1 := Local_R1.N.C1;
   Local_R2.N.C2 := Local_R1.N.C2;
@@ -57,5 +57,5 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/p8.adb b/gcc/testsuite/gnat.dg/sso/p8.adb
index e6f80e4029c..251e43f422f 100644
--- a/gcc/testsuite/gnat.dg/sso/p8.adb
+++ b/gcc/testsuite/gnat.dg/sso/p8.adb
@@ -13,33 +13,33 @@ begin
   Put ("My_R1    :");
   Dump (My_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R1    : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "My_R1    : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
   Put ("My_R2    :");
   Dump (My_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R2    : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "My_R2    : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
   Local_R1 := My_R1;
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
   Local_R2 := My_R2;
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
   Local_R1 := (I => 16#12345678#,
                N => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
   Local_R2 := (I => 16#12345678#,
                N => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
   Local_R1.I    := Local_R2.I;
   Local_R1.N.C1 := Local_R2.N.C1;
   Local_R1.N.C2 := Local_R2.N.C2;
@@ -48,7 +48,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
   Local_R2.I    := Local_R1.I;
   Local_R2.N.C1 := Local_R1.N.C1;
   Local_R2.N.C2 := Local_R1.N.C2;
@@ -57,5 +57,5 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/p9.adb b/gcc/testsuite/gnat.dg/sso/p9.adb
index 1aab12b604b..f826f0d9f53 100644
--- a/gcc/testsuite/gnat.dg/sso/p9.adb
+++ b/gcc/testsuite/gnat.dg/sso/p9.adb
@@ -14,50 +14,50 @@ begin
   Put ("My_R1    :");
   Dump (My_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R1    : 18 2d 44 54 fb 21 09 40\n" }
+  -- { dg-output "My_R1    : 18 2d 44 54 fb 21 09 40.*\n" }
 
   Put ("My_R2    :");
   Dump (My_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "My_R2    : 40 09 21 fb 54 44 2d 18\n" }
+  -- { dg-output "My_R2    : 40 09 21 fb 54 44 2d 18.*\n" }
 
   Local_R1 := My_R1;
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 18 2d 44 54 fb 21 09 40\n" }
+  -- { dg-output "Local_R1 : 18 2d 44 54 fb 21 09 40.*\n" }
 
   Local_R2 := My_R2;
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 09 21 fb 54 44 2d 18\n" }
+  -- { dg-output "Local_R2 : 40 09 21 fb 54 44 2d 18.*\n" }
 
   Local_R1.F := Pi;
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 18 2d 44 54 fb 21 09 40\n" }
+  -- { dg-output "Local_R1 : 18 2d 44 54 fb 21 09 40.*\n" }
 
   Local_R2.F := Pi;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 09 21 fb 54 44 2d 18\n" }
+  -- { dg-output "Local_R2 : 40 09 21 fb 54 44 2d 18.*\n" }
 
   Local_R1.F := Local_R2.F;
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 18 2d 44 54 fb 21 09 40\n" }
+  -- { dg-output "Local_R1 : 18 2d 44 54 fb 21 09 40.*\n" }
 
   Local_R2.F := Local_R1.F;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 09 21 fb 54 44 2d 18\n" }
+  -- { dg-output "Local_R2 : 40 09 21 fb 54 44 2d 18.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/q1.adb b/gcc/testsuite/gnat.dg/sso/q1.adb
index 6c8303cf981..38fc06a252e 100644
--- a/gcc/testsuite/gnat.dg/sso/q1.adb
+++ b/gcc/testsuite/gnat.dg/sso/q1.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\n" }
+  -- { dg-output "A1 : 78 56 34 12.*\n" }
 
   Put ("B1 :");
   Dump (B1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B1 : 78 56 34 12\n" }
+  -- { dg-output "B1 : 78 56 34 12.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 12 34 56 78\n" }
+  -- { dg-output "A2 : 12 34 56 78.*\n" }
 
   Put ("B2 :");
   Dump (B2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B2 : 12 34 56 78\n" }
+  -- { dg-output "B2 : 12 34 56 78.*\n" }
 
   if A1.I /= B1.I then
     raise Program_Error;
diff --git a/gcc/testsuite/gnat.dg/sso/q10.adb b/gcc/testsuite/gnat.dg/sso/q10.adb
index 94d21522d0d..a93d1f68cb8 100644
--- a/gcc/testsuite/gnat.dg/sso/q10.adb
+++ b/gcc/testsuite/gnat.dg/sso/q10.adb
@@ -17,22 +17,22 @@ begin
   Put ("A1 :");
   Dump (A1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A1 : 78 56 34 12\n" }
+  -- { dg-output "A1 : 78 56 34 12.*\n" }
 
   Put ("B1 :");
   Dump (B1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B1 : 78 56 34 12\n" }
+  -- { dg-output "B1 : 78 56 34 12.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 12 34 56 78\n" }
+  -- { dg-output "A2 : 12 34 56 78.*\n" }
 
   Put ("B2 :");
   Dump (B2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B2 : 12 34 56 78\n" }
+  -- { dg-output "B2 : 12 34 56 78.*\n" }
 
   if A1.I /= B1.I then
     raise Program_Error;
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;
diff --git a/gcc/testsuite/gnat.dg/sso/q12.adb b/gcc/testsuite/gnat.dg/sso/q12.adb
index 2018582607f..2a07da9d5f8 100644
--- a/gcc/testsuite/gnat.dg/sso/q12.adb
+++ b/gcc/testsuite/gnat.dg/sso/q12.adb
@@ -16,22 +16,22 @@ begin
   Put ("A1  :");
   Dump (A1'Address, Arr1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A1  : 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "A1  : 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Put ("A11 :");
   Dump (A11'Address, Arr11'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A11 : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00\n" }
+  -- { dg-output "A11 : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00.*\n" }
 
   Put ("A2  :");
   Dump (A2'Address, Arr2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2  : 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "A2  : 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Put ("A22 :");
   Dump (A22'Address, Arr22'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A22 : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34\n" }
+  -- { dg-output "A22 : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34.*\n" }
 
   if A1(1) /= A11(1,1) then
     raise Program_Error;
diff --git a/gcc/testsuite/gnat.dg/sso/q13.adb b/gcc/testsuite/gnat.dg/sso/q13.adb
index e07530fb2aa..05b8e56ee14 100644
--- a/gcc/testsuite/gnat.dg/sso/q13.adb
+++ b/gcc/testsuite/gnat.dg/sso/q13.adb
@@ -17,22 +17,22 @@ begin
   Put ("A1 :");
   Dump (A1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A1 : db 0f 49 40 db 0f 49 c0\n" }
+  -- { dg-output "A1 : db 0f 49 40 db 0f 49 c0.*\n" }
 
   Put ("B1 :");
   Dump (B1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B1 : db 0f 49 40 db 0f 49 c0\n" }
+  -- { dg-output "B1 : db 0f 49 40 db 0f 49 c0.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 40 49 0f db c0 49 0f db\n" }
+  -- { dg-output "A2 : 40 49 0f db c0 49 0f db.*\n" }
 
   Put ("B2 :");
   Dump (B2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B2 : 40 49 0f db c0 49 0f db\n" }
+  -- { dg-output "B2 : 40 49 0f db c0 49 0f db.*\n" }
 
   if A1.F /= B1.F then
     raise Program_Error;
diff --git a/gcc/testsuite/gnat.dg/sso/q2.adb b/gcc/testsuite/gnat.dg/sso/q2.adb
index be11fe15294..1147f1a6725 100644
--- a/gcc/testsuite/gnat.dg/sso/q2.adb
+++ b/gcc/testsuite/gnat.dg/sso/q2.adb
@@ -16,22 +16,22 @@ begin
   Put ("A1 :");
   Dump (A1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A1 : e2 59 d1 48 b4 aa d9 bb\n" }
+  -- { dg-output "A1 : e2 59 d1 48 b4 aa d9 bb.*\n" }
 
   Put ("B1 :");
   Dump (B1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B1 : e2 59 d1 48 b4 aa d9 bb\n" }
+  -- { dg-output "B1 : e2 59 d1 48 b4 aa d9 bb.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 84 8d 15 9e 15 5b 35 df\n" }
+  -- { dg-output "A2 : 84 8d 15 9e 15 5b 35 df.*\n" }
 
   Put ("B2 :");
   Dump (B2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B2 : 84 8d 15 9e 15 5b 35 df\n" }
+  -- { dg-output "B2 : 84 8d 15 9e 15 5b 35 df.*\n" }
 
   if A1.S1 /= B1.S1 then
     raise Program_Error;
diff --git a/gcc/testsuite/gnat.dg/sso/q3.adb b/gcc/testsuite/gnat.dg/sso/q3.adb
index 383a88b6125..df7dfc10290 100644
--- a/gcc/testsuite/gnat.dg/sso/q3.adb
+++ b/gcc/testsuite/gnat.dg/sso/q3.adb
@@ -16,22 +16,22 @@ begin
   Put ("A1 :");
   Dump (A1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A1 : e2 59 d1 48 b4 aa d9 bb\n" }
+  -- { dg-output "A1 : e2 59 d1 48 b4 aa d9 bb.*\n" }
 
   Put ("B1 :");
   Dump (B1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B1 : e2 59 d1 48 b4 aa d9 bb\n" }
+  -- { dg-output "B1 : e2 59 d1 48 b4 aa d9 bb.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 84 8d 15 9e 15 5b 35 df\n" }
+  -- { dg-output "A2 : 84 8d 15 9e 15 5b 35 df.*\n" }
 
   Put ("B2 :");
   Dump (B2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B2 : 84 8d 15 9e 15 5b 35 df\n" }
+  -- { dg-output "B2 : 84 8d 15 9e 15 5b 35 df.*\n" }
 
   if A1.S1 /= B1.S1 then
     raise Program_Error;
diff --git a/gcc/testsuite/gnat.dg/sso/q4.adb b/gcc/testsuite/gnat.dg/sso/q4.adb
index 0cef27de219..4c2102ff6a8 100644
--- a/gcc/testsuite/gnat.dg/sso/q4.adb
+++ b/gcc/testsuite/gnat.dg/sso/q4.adb
@@ -17,22 +17,22 @@ begin
   Put ("A1 :");
   Dump (A1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A1 : db 0f 49 40\n" }
+  -- { dg-output "A1 : db 0f 49 40.*\n" }
 
   Put ("B1 :");
   Dump (B1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B1 : db 0f 49 40\n" }
+  -- { dg-output "B1 : db 0f 49 40.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 40 49 0f db\n" }
+  -- { dg-output "A2 : 40 49 0f db.*\n" }
 
   Put ("B2 :");
   Dump (B2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B2 : 40 49 0f db\n" }
+  -- { dg-output "B2 : 40 49 0f db.*\n" }
 
   if A1.F /= B1.F then
     raise Program_Error;
diff --git a/gcc/testsuite/gnat.dg/sso/q5.adb b/gcc/testsuite/gnat.dg/sso/q5.adb
index 965d145f680..0cb2df79984 100644
--- a/gcc/testsuite/gnat.dg/sso/q5.adb
+++ b/gcc/testsuite/gnat.dg/sso/q5.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;
diff --git a/gcc/testsuite/gnat.dg/sso/q6.adb b/gcc/testsuite/gnat.dg/sso/q6.adb
index f90b32f623d..85c22a1c2e8 100644
--- a/gcc/testsuite/gnat.dg/sso/q6.adb
+++ b/gcc/testsuite/gnat.dg/sso/q6.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 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "A1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Put ("B1 :");
   Dump (B1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "B1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "A2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Put ("B2 :");
   Dump (B2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "B2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   if A1.I /= B1.I or A1.A(1) /= B1.A(1) then
     raise Program_Error;
diff --git a/gcc/testsuite/gnat.dg/sso/q7.adb b/gcc/testsuite/gnat.dg/sso/q7.adb
index 72ab6106ad5..9eaaa5da2de 100644
--- a/gcc/testsuite/gnat.dg/sso/q7.adb
+++ b/gcc/testsuite/gnat.dg/sso/q7.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.N.C1 /= B1.N.C1 then
     raise Program_Error;
diff --git a/gcc/testsuite/gnat.dg/sso/q8.adb b/gcc/testsuite/gnat.dg/sso/q8.adb
index 7931179d6f1..3413bde4e37 100644
--- a/gcc/testsuite/gnat.dg/sso/q8.adb
+++ b/gcc/testsuite/gnat.dg/sso/q8.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 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "A1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Put ("B1 :");
   Dump (B1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "B1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "A2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Put ("B2 :");
   Dump (B2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "B2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   if A1.I /= B1.I or A1.N.C1 /= B1.N.C1 then
     raise Program_Error;
diff --git a/gcc/testsuite/gnat.dg/sso/q9.adb b/gcc/testsuite/gnat.dg/sso/q9.adb
index f5d4a559a42..a71d0e1d928 100644
--- a/gcc/testsuite/gnat.dg/sso/q9.adb
+++ b/gcc/testsuite/gnat.dg/sso/q9.adb
@@ -17,22 +17,22 @@ begin
   Put ("A1 :");
   Dump (A1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A1 : 18 2d 44 54 fb 21 09 40\n" }
+  -- { dg-output "A1 : 18 2d 44 54 fb 21 09 40.*\n" }
 
   Put ("B1 :");
   Dump (B1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B1 : 18 2d 44 54 fb 21 09 40\n" }
+  -- { dg-output "B1 : 18 2d 44 54 fb 21 09 40.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 40 09 21 fb 54 44 2d 18\n" }
+  -- { dg-output "A2 : 40 09 21 fb 54 44 2d 18.*\n" }
 
   Put ("B2 :");
   Dump (B2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "B2 : 40 09 21 fb 54 44 2d 18\n" }
+  -- { dg-output "B2 : 40 09 21 fb 54 44 2d 18.*\n" }
 
   if A1.F /= B1.F then
     raise Program_Error;
diff --git a/gcc/testsuite/gnat.dg/sso/r11.adb b/gcc/testsuite/gnat.dg/sso/r11.adb
index e472078c5c6..ad8226ee569 100644
--- a/gcc/testsuite/gnat.dg/sso/r11.adb
+++ b/gcc/testsuite/gnat.dg/sso/r11.adb
@@ -40,12 +40,12 @@ 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 ("A2 :");
   Dump (A2'Address, R1'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" }
 
   if Get_Elem (A1) /= 16#AB0012# then
     raise Program_Error;
diff --git a/gcc/testsuite/gnat.dg/sso/r12.adb b/gcc/testsuite/gnat.dg/sso/r12.adb
index b6e2cf76189..e555bc42a20 100644
--- a/gcc/testsuite/gnat.dg/sso/r12.adb
+++ b/gcc/testsuite/gnat.dg/sso/r12.adb
@@ -68,22 +68,22 @@ begin
   Put ("A1  :");
   Dump (A1'Address, Arr1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A1  : 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "A1  : 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Put ("A11 :");
   Dump (A11'Address, Arr11'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A11 : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00\n" }
+  -- { dg-output "A11 : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00.*\n" }
 
   Put ("A2  :");
   Dump (A2'Address, Arr2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2  : 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "A2  : 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Put ("A22 :");
   Dump (A22'Address, Arr22'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A22 : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34\n" }
+  -- { dg-output "A22 : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34.*\n" }
 
   if Get_Elem (A1) /= 16#AB0012# then
     raise Program_Error;
diff --git a/gcc/testsuite/gnat.dg/sso/r3.adb b/gcc/testsuite/gnat.dg/sso/r3.adb
index 746109688c9..a0db79bd439 100644
--- a/gcc/testsuite/gnat.dg/sso/r3.adb
+++ b/gcc/testsuite/gnat.dg/sso/r3.adb
@@ -40,12 +40,12 @@ begin
   Put ("A1 :");
   Dump (A1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  --  { dg-output "A1 : e2 59 d1 48 b4 aa d9 bb\n" }
+  -- { dg-output "A1 : e2 59 d1 48 b4 aa d9 bb.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 84 8d 15 9e 15 5b 35 df\n" }
+  -- { dg-output "A2 : 84 8d 15 9e 15 5b 35 df.*\n" }
 
   if Get_Elem (A1) /= 16#12345678# then
     raise Program_Error;
diff --git a/gcc/testsuite/gnat.dg/sso/r5.adb b/gcc/testsuite/gnat.dg/sso/r5.adb
index 6dcb87f8b6e..b77aa622f2d 100644
--- a/gcc/testsuite/gnat.dg/sso/r5.adb
+++ b/gcc/testsuite/gnat.dg/sso/r5.adb
@@ -40,12 +40,12 @@ 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 ("A2 :");
   Dump (A2'Address, R1'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" }
 
   if Get_Elem (A1) /= 16#AB0012# then
     raise Program_Error;
diff --git a/gcc/testsuite/gnat.dg/sso/r6.adb b/gcc/testsuite/gnat.dg/sso/r6.adb
index 5ef59893552..a1e85b3badd 100644
--- a/gcc/testsuite/gnat.dg/sso/r6.adb
+++ b/gcc/testsuite/gnat.dg/sso/r6.adb
@@ -40,12 +40,12 @@ begin
   Put ("A1 :");
   Dump (A1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "A1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "A2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   if Get_Elem (A1) /= 16#AB0012# then
     raise Program_Error;
diff --git a/gcc/testsuite/gnat.dg/sso/r7.adb b/gcc/testsuite/gnat.dg/sso/r7.adb
index 58a015beb15..e9d21af5afe 100644
--- a/gcc/testsuite/gnat.dg/sso/r7.adb
+++ b/gcc/testsuite/gnat.dg/sso/r7.adb
@@ -40,12 +40,12 @@ 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 ("A2 :");
   Dump (A2'Address, R1'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" }
 
   if Get_Elem (A1) /= 16#AB0012# then
     raise Program_Error;
diff --git a/gcc/testsuite/gnat.dg/sso/r8.adb b/gcc/testsuite/gnat.dg/sso/r8.adb
index cbb1d5b617d..9c7f474e700 100644
--- a/gcc/testsuite/gnat.dg/sso/r8.adb
+++ b/gcc/testsuite/gnat.dg/sso/r8.adb
@@ -40,12 +40,12 @@ begin
   Put ("A1 :");
   Dump (A1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "A1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "A2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   if Get_Elem (A1) /= 16#AB0012# then
     raise Program_Error;
diff --git a/gcc/testsuite/gnat.dg/sso/s11.adb b/gcc/testsuite/gnat.dg/sso/s11.adb
index 6fb715f8a01..308afc66992 100644
--- a/gcc/testsuite/gnat.dg/sso/s11.adb
+++ b/gcc/testsuite/gnat.dg/sso/s11.adb
@@ -21,12 +21,12 @@ 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 ("A2 :");
   Dump (A2'Address, R1'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" }
 
   AA1 := A1.A;
   C1 := AA1(1);
@@ -34,13 +34,13 @@ begin
   C3 := AA1(3);
 
   Put_Line("C1 :" & C1'Img);
-  -- { dg-output "C1 : 11206674\n" }
+  -- { dg-output "C1 : 11206674.*\n" }
 
   Put_Line("C2 :" & C2'Img);
-  -- { dg-output "C2 : 13434932\n" }
+  -- { dg-output "C2 : 13434932.*\n" }
 
   Put_Line("C3 :" & C3'Img);
-  -- { dg-output "C3 : 15663190\n" }
+  -- { dg-output "C3 : 15663190.*\n" }
 
   AA1(1) := C1;
   AA1(2) := C2;
@@ -53,13 +53,13 @@ begin
   C3 := AA2(3);
 
   Put_Line("C1 :" & C1'Img);
-  -- { dg-output "C1 : 11206674\n" }
+  -- { dg-output "C1 : 11206674.*\n" }
 
   Put_Line("C2 :" & C2'Img);
-  -- { dg-output "C2 : 13434932\n" }
+  -- { dg-output "C2 : 13434932.*\n" }
 
   Put_Line("C3 :" & C3'Img);
-  -- { dg-output "C3 : 15663190\n" }
+  -- { dg-output "C3 : 15663190.*\n" }
 
   AA2(1) := C1;
   AA2(2) := C2;
@@ -69,10 +69,10 @@ 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 ("A2 :");
   Dump (A2'Address, R1'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" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/s12.adb b/gcc/testsuite/gnat.dg/sso/s12.adb
index 1bc624e3468..f9c4adeb71b 100644
--- a/gcc/testsuite/gnat.dg/sso/s12.adb
+++ b/gcc/testsuite/gnat.dg/sso/s12.adb
@@ -20,12 +20,12 @@ begin
   Put ("A11 :");
   Dump (A11'Address, Arr11'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A11 : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00\n" }
+  -- { dg-output "A11 : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00.*\n" }
 
   Put ("A22 :");
   Dump (A22'Address, Arr22'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A22 : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34\n" }
+  -- { dg-output "A22 : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34.*\n" }
 
   A1 := (A11(1,1), A11(1,2), A11(2,1));
   C1 := A1(1);
@@ -33,13 +33,13 @@ begin
   C3 := A1(3);
 
   Put_Line("C1 :" & C1'Img);
-  -- { dg-output "C1 : 11206674\n" }
+  -- { dg-output "C1 : 11206674.*\n" }
 
   Put_Line("C2 :" & C2'Img);
-  -- { dg-output "C2 : 13434932\n" }
+  -- { dg-output "C2 : 13434932.*\n" }
 
   Put_Line("C3 :" & C3'Img);
-  -- { dg-output "C3 : 11206674\n" }
+  -- { dg-output "C3 : 11206674.*\n" }
 
   A1(1) := C1;
   A1(2) := C2;
@@ -52,13 +52,13 @@ begin
   C3 := A2(3);
 
   Put_Line("C1 :" & C1'Img);
-  -- { dg-output "C1 : 11206674\n" }
+  -- { dg-output "C1 : 11206674.*\n" }
 
   Put_Line("C2 :" & C2'Img);
-  -- { dg-output "C2 : 13434932\n" }
+  -- { dg-output "C2 : 13434932.*\n" }
 
   Put_Line("C3 :" & C3'Img);
-  -- { dg-output "C3 : 11206674\n" }
+  -- { dg-output "C3 : 11206674.*\n" }
 
   A2(1) := C1;
   A2(2) := C2;
@@ -68,10 +68,10 @@ begin
   Put ("A11 :");
   Dump (A11'Address, Arr11'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A11 : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00\n" }
+  -- { dg-output "A11 : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00.*\n" }
 
   Put ("A22 :");
   Dump (A22'Address, Arr22'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A22 : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34\n" }
+  -- { dg-output "A22 : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/s3.adb b/gcc/testsuite/gnat.dg/sso/s3.adb
index 833525d333e..4a934f5881c 100644
--- a/gcc/testsuite/gnat.dg/sso/s3.adb
+++ b/gcc/testsuite/gnat.dg/sso/s3.adb
@@ -21,12 +21,12 @@ begin
   Put ("A1 :");
   Dump (A1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A1 : e2 59 d1 48 b4 aa d9 bb\n" }
+  -- { dg-output "A1 : e2 59 d1 48 b4 aa d9 bb.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 84 8d 15 9e 15 5b 35 df\n" }
+  -- { dg-output "A2 : 84 8d 15 9e 15 5b 35 df.*\n" }
 
   N1 := A1.N;
   C1 := N1.C1;
@@ -34,13 +34,13 @@ begin
   C3 := N1.C3;
 
   Put_Line("C1 :" & C1'Img);
-  -- { dg-output "C1 : 171\n" }
+  -- { dg-output "C1 : 171.*\n" }
 
   Put_Line("C2 :" & C2'Img);
-  -- { dg-output "C2 : 205\n" }
+  -- { dg-output "C2 : 205.*\n" }
 
   Put_Line("C3 :" & C3'Img);
-  -- { dg-output "C3 : 239\n" }
+  -- { dg-output "C3 : 239.*\n" }
 
   N1.C1 := C1;
   N1.C2 := C2;
@@ -53,13 +53,13 @@ begin
   C3 := N2.C3;
 
   Put_Line("C1 :" & C1'Img);
-  -- { dg-output "C1 : 171\n" }
+  -- { dg-output "C1 : 171.*\n" }
 
   Put_Line("C2 :" & C2'Img);
-  -- { dg-output "C2 : 205\n" }
+  -- { dg-output "C2 : 205.*\n" }
 
   Put_Line("C3 :" & C3'Img);
-  -- { dg-output "C3 : 239\n" }
+  -- { dg-output "C3 : 239.*\n" }
 
   N2.C1 := C1;
   N2.C2 := C2;
@@ -69,11 +69,11 @@ begin
   Put ("A1 :");
   Dump (A1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A1 : e2 59 d1 48 b4 aa d9 bb\n" }
+  -- { dg-output "A1 : e2 59 d1 48 b4 aa d9 bb.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 84 8d 15 9e 15 5b 35 df\n" }
+  -- { dg-output "A2 : 84 8d 15 9e 15 5b 35 df.*\n" }
 
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/s5.adb b/gcc/testsuite/gnat.dg/sso/s5.adb
index dc3b3011537..b17b4db9b41 100644
--- a/gcc/testsuite/gnat.dg/sso/s5.adb
+++ b/gcc/testsuite/gnat.dg/sso/s5.adb
@@ -21,12 +21,12 @@ 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 ("A2 :");
   Dump (A2'Address, R1'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" }
 
   AA1 := A1.A;
   C1 := AA1(1);
@@ -34,13 +34,13 @@ begin
   C3 := AA1(3);
 
   Put_Line("C1 :" & C1'Img);
-  -- { dg-output "C1 : 11206674\n" }
+  -- { dg-output "C1 : 11206674.*\n" }
 
   Put_Line("C2 :" & C2'Img);
-  -- { dg-output "C2 : 13434932\n" }
+  -- { dg-output "C2 : 13434932.*\n" }
 
   Put_Line("C3 :" & C3'Img);
-  -- { dg-output "C3 : 15663190\n" }
+  -- { dg-output "C3 : 15663190.*\n" }
 
   AA1(1) := C1;
   AA1(2) := C2;
@@ -53,13 +53,13 @@ begin
   C3 := AA2(3);
 
   Put_Line("C1 :" & C1'Img);
-  -- { dg-output "C1 : 11206674\n" }
+  -- { dg-output "C1 : 11206674.*\n" }
 
   Put_Line("C2 :" & C2'Img);
-  -- { dg-output "C2 : 13434932\n" }
+  -- { dg-output "C2 : 13434932.*\n" }
 
   Put_Line("C3 :" & C3'Img);
-  -- { dg-output "C3 : 15663190\n" }
+  -- { dg-output "C3 : 15663190.*\n" }
 
   AA2(1) := C1;
   AA2(2) := C2;
@@ -69,10 +69,10 @@ 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 ("A2 :");
   Dump (A2'Address, R1'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" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/s6.adb b/gcc/testsuite/gnat.dg/sso/s6.adb
index 48d769b1795..19db4a6c4b1 100644
--- a/gcc/testsuite/gnat.dg/sso/s6.adb
+++ b/gcc/testsuite/gnat.dg/sso/s6.adb
@@ -21,12 +21,12 @@ begin
   Put ("A1 :");
   Dump (A1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "A1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "A2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   AA1 := A1.A;
   C1 := AA1(1);
@@ -34,13 +34,13 @@ begin
   C3 := AA1(3);
 
   Put_Line("C1 :" & C1'Img);
-  -- { dg-output "C1 : 11206674\n" }
+  -- { dg-output "C1 : 11206674.*\n" }
 
   Put_Line("C2 :" & C2'Img);
-  -- { dg-output "C2 : 13434932\n" }
+  -- { dg-output "C2 : 13434932.*\n" }
 
   Put_Line("C3 :" & C3'Img);
-  -- { dg-output "C3 : 15663190\n" }
+  -- { dg-output "C3 : 15663190.*\n" }
 
   AA1(1) := C1;
   AA1(2) := C2;
@@ -53,13 +53,13 @@ begin
   C3 := AA2(3);
 
   Put_Line("C1 :" & C1'Img);
-  -- { dg-output "C1 : 11206674\n" }
+  -- { dg-output "C1 : 11206674.*\n" }
 
   Put_Line("C2 :" & C2'Img);
-  -- { dg-output "C2 : 13434932\n" }
+  -- { dg-output "C2 : 13434932.*\n" }
 
   Put_Line("C3 :" & C3'Img);
-  -- { dg-output "C3 : 15663190\n" }
+  -- { dg-output "C3 : 15663190.*\n" }
 
   AA2(1) := C1;
   AA2(2) := C2;
@@ -69,11 +69,11 @@ begin
   Put ("A1 :");
   Dump (A1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "A1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "A2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/s7.adb b/gcc/testsuite/gnat.dg/sso/s7.adb
index f4725d78c93..398a12bd9b4 100644
--- a/gcc/testsuite/gnat.dg/sso/s7.adb
+++ b/gcc/testsuite/gnat.dg/sso/s7.adb
@@ -21,12 +21,12 @@ 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 ("A2 :");
   Dump (A2'Address, R1'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" }
 
   N1 := A1.N;
   C1 := N1.C1;
@@ -34,13 +34,13 @@ begin
   C3 := N1.C3;
 
   Put_Line("C1 :" & C1'Img);
-  -- { dg-output "C1 : 11206674\n" }
+  -- { dg-output "C1 : 11206674.*\n" }
 
   Put_Line("C2 :" & C2'Img);
-  -- { dg-output "C2 : 13434932\n" }
+  -- { dg-output "C2 : 13434932.*\n" }
 
   Put_Line("C3 :" & C3'Img);
-  -- { dg-output "C3 : 15663190\n" }
+  -- { dg-output "C3 : 15663190.*\n" }
 
   N1.C1 := C1;
   N1.C2 := C2;
@@ -53,13 +53,13 @@ begin
   C3 := N2.C3;
 
   Put_Line("C1 :" & C1'Img);
-  -- { dg-output "C1 : 11206674\n" }
+  -- { dg-output "C1 : 11206674.*\n" }
 
   Put_Line("C2 :" & C2'Img);
-  -- { dg-output "C2 : 13434932\n" }
+  -- { dg-output "C2 : 13434932.*\n" }
 
   Put_Line("C3 :" & C3'Img);
-  -- { dg-output "C3 : 15663190\n" }
+  -- { dg-output "C3 : 15663190.*\n" }
 
   N2.C1 := C1;
   N2.C2 := C2;
@@ -69,11 +69,11 @@ 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 ("A2 :");
   Dump (A2'Address, R1'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" }
 
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/s8.adb b/gcc/testsuite/gnat.dg/sso/s8.adb
index 0545932f4e1..abb81d9cdac 100644
--- a/gcc/testsuite/gnat.dg/sso/s8.adb
+++ b/gcc/testsuite/gnat.dg/sso/s8.adb
@@ -21,12 +21,12 @@ begin
   Put ("A1 :");
   Dump (A1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "A1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "A2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   N1 := A1.N;
   C1 := N1.C1;
@@ -34,13 +34,13 @@ begin
   C3 := N1.C3;
 
   Put_Line("C1 :" & C1'Img);
-  -- { dg-output "C1 : 11206674\n" }
+  -- { dg-output "C1 : 11206674.*\n" }
 
   Put_Line("C2 :" & C2'Img);
-  -- { dg-output "C2 : 13434932\n" }
+  -- { dg-output "C2 : 13434932.*\n" }
 
   Put_Line("C3 :" & C3'Img);
-  -- { dg-output "C3 : 15663190\n" }
+  -- { dg-output "C3 : 15663190.*\n" }
 
   N1.C1 := C1;
   N1.C2 := C2;
@@ -53,13 +53,13 @@ begin
   C3 := N2.C3;
 
   Put_Line("C1 :" & C1'Img);
-  -- { dg-output "C1 : 11206674\n" }
+  -- { dg-output "C1 : 11206674.*\n" }
 
   Put_Line("C2 :" & C2'Img);
-  -- { dg-output "C2 : 13434932\n" }
+  -- { dg-output "C2 : 13434932.*\n" }
 
   Put_Line("C3 :" & C3'Img);
-  -- { dg-output "C3 : 15663190\n" }
+  -- { dg-output "C3 : 15663190.*\n" }
 
   N2.C1 := C1;
   N2.C2 := C2;
@@ -69,11 +69,11 @@ begin
   Put ("A1 :");
   Dump (A1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "A1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Put ("A2 :");
   Dump (A2'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "A2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "A2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/t1.adb b/gcc/testsuite/gnat.dg/sso/t1.adb
index dd289476363..894c1bf0a96 100644
--- a/gcc/testsuite/gnat.dg/sso/t1.adb
+++ b/gcc/testsuite/gnat.dg/sso/t1.adb
@@ -15,41 +15,41 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 79 56 34 12\n" }
+  -- { dg-output "Local_R1 : 79 56 34 12.*\n" }
 
   Local_R2.I := My_R2.I + 1;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 79\n" }
+  -- { dg-output "Local_R2 : 12 34 56 79.*\n" }
 
   Local_R1.I := 16#12345678#;
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12.*\n" }
 
   Local_R2.I := 16#12345678#;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78.*\n" }
 
   Local_R1.I := Local_R1.I + 1;
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 79 56 34 12\n" }
+  -- { dg-output "Local_R1 : 79 56 34 12.*\n" }
 
   Local_R2.I := Local_R2.I + 1;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 79\n" }
+  -- { dg-output "Local_R2 : 12 34 56 79.*\n" }
 
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/t10.adb b/gcc/testsuite/gnat.dg/sso/t10.adb
index 152268a6edc..9c0de767764 100644
--- a/gcc/testsuite/gnat.dg/sso/t10.adb
+++ b/gcc/testsuite/gnat.dg/sso/t10.adb
@@ -16,41 +16,41 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 79 56 34 12\n" }
+  -- { dg-output "Local_R1 : 79 56 34 12.*\n" }
 
   Local_R2.I := My_R2.I + 1;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 79\n" }
+  -- { dg-output "Local_R2 : 12 34 56 79.*\n" }
 
   Local_R1.I := 16#12345678#;
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12.*\n" }
 
   Local_R2.I := 16#12345678#;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78.*\n" }
 
   Local_R1.I := Local_R1.I + 1;
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 79 56 34 12\n" }
+  -- { dg-output "Local_R1 : 79 56 34 12.*\n" }
 
   Local_R2.I := Local_R2.I + 1;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 79\n" }
+  -- { dg-output "Local_R2 : 12 34 56 79.*\n" }
 
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/t11.adb b/gcc/testsuite/gnat.dg/sso/t11.adb
index b0c3ff4dfa4..7482eb9f9ce 100644
--- a/gcc/testsuite/gnat.dg/sso/t11.adb
+++ b/gcc/testsuite/gnat.dg/sso/t11.adb
@@ -18,7 +18,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 79 56 34 12 13 00 ab 00 35 00 cd 00 57 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 79 56 34 12 13 00 ab 00 35 00 cd 00 57 00 ef 00.*\n" }
 
   Local_R2.I    := My_R2.I + 1;
   Local_R2.A(1) := My_R2.A(1) + 1;
@@ -28,21 +28,21 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 79 00 ab 00 13 00 cd 00 35 00 ef 00 57\n" }
+  -- { dg-output "Local_R2 : 12 34 56 79 00 ab 00 13 00 cd 00 35 00 ef 00 57.*\n" }
 
   Local_R1 := (I => 16#12345678#,
                A => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Local_R2 := (I => 16#12345678#,
                A => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Local_R1.I    := Local_R1.I + 1;
   Local_R1.A(1) := Local_R1.A(1) + 1;
@@ -52,7 +52,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 79 56 34 12 13 00 ab 00 35 00 cd 00 57 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 79 56 34 12 13 00 ab 00 35 00 cd 00 57 00 ef 00.*\n" }
 
   Local_R2.I    := Local_R2.I + 1;
   Local_R2.A(1) := Local_R2.A(1) + 1;
@@ -62,6 +62,6 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 79 00 ab 00 13 00 cd 00 35 00 ef 00 57\n" }
+  -- { dg-output "Local_R2 : 12 34 56 79 00 ab 00 13 00 cd 00 35 00 ef 00 57.*\n" }
 
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/t12.adb b/gcc/testsuite/gnat.dg/sso/t12.adb
index b62046053dd..236d187bdef 100644
--- a/gcc/testsuite/gnat.dg/sso/t12.adb
+++ b/gcc/testsuite/gnat.dg/sso/t12.adb
@@ -18,7 +18,7 @@ begin
   Put ("Local_A11 :");
   Dump (Local_A11'Address, Arr11'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A11 : 13 00 ab 00 35 00 cd 00 13 00 ab 00 35 00 cd 00\n" }
+  -- { dg-output "Local_A11 : 13 00 ab 00 35 00 cd 00 13 00 ab 00 35 00 cd 00.*\n" }
 
   Local_A22(1,1) := My_A22(1,1) + 1;
   Local_A22(1,2) := My_A22(1,2) + 1;
@@ -28,21 +28,21 @@ begin
   Put ("Local_A22 :");
   Dump (Local_A22'Address, Arr22'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A22 : 00 ab 00 13 00 cd 00 35 00 ab 00 13 00 cd 00 35\n" }
+  -- { dg-output "Local_A22 : 00 ab 00 13 00 cd 00 35 00 ab 00 13 00 cd 00 35.*\n" }
 
   Local_A11 := (1 => (16#AB0012#, 16#CD0034#),
                 2 => (16#AB0012#, 16#CD0034#));
   Put ("Local_A11 :");
   Dump (Local_A11'Address, Arr11'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A11 : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00\\n" }
+  -- { dg-output "Local_A11 : 12 00 ab 00 34 00 cd 00 12 00 ab 00 34 00 cd 00.*\n" }
 
   Local_A22 := (1 => (16#AB0012#, 16#CD0034#),
                 2 => (16#AB0012#, 16#CD0034#));
   Put ("Local_A22 :");
   Dump (Local_A22'Address, Arr22'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A22 : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34\n" }
+  -- { dg-output "Local_A22 : 00 ab 00 12 00 cd 00 34 00 ab 00 12 00 cd 00 34.*\n" }
 
   Local_A11(1,1) := Local_A11(1,1) + 1;
   Local_A11(1,2) := Local_A11(1,2) + 1;
@@ -52,7 +52,7 @@ begin
   Put ("Local_A11 :");
   Dump (Local_A11'Address, Arr11'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A11 : 13 00 ab 00 35 00 cd 00 13 00 ab 00 35 00 cd 00\n" }
+  -- { dg-output "Local_A11 : 13 00 ab 00 35 00 cd 00 13 00 ab 00 35 00 cd 00.*\n" }
 
   Local_A22(1,1) := Local_A22(1,1) + 1;
   Local_A22(1,2) := Local_A22(1,2) + 1;
@@ -62,5 +62,5 @@ begin
   Put ("Local_A22 :");
   Dump (Local_A22'Address, Arr22'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_A22 : 00 ab 00 13 00 cd 00 35 00 ab 00 13 00 cd 00 35\n" }
+  -- { dg-output "Local_A22 : 00 ab 00 13 00 cd 00 35 00 ab 00 13 00 cd 00 35.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/t13.adb b/gcc/testsuite/gnat.dg/sso/t13.adb
index e00371f7520..2e488d89321 100644
--- a/gcc/testsuite/gnat.dg/sso/t13.adb
+++ b/gcc/testsuite/gnat.dg/sso/t13.adb
@@ -16,41 +16,41 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : ee 87 84 40 db 0f 09 c0\n" }
+  -- { dg-output "Local_R1 : ee 87 84 40 db 0f 09 c0.*\n" }
 
   Local_R2.F := (My_R2.F.R + 1.0, My_R2.F.I + 1.0);
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 84 87 ee c0 09 0f db\n" }
+  -- { dg-output "Local_R2 : 40 84 87 ee c0 09 0f db.*\n" }
 
   Local_R1.F := (Pi, -Pi);
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : db 0f 49 40 db 0f 49 c0\n" }
+  -- { dg-output "Local_R1 : db 0f 49 40 db 0f 49 c0.*\n" }
 
   Local_R2.F := (Pi, -Pi);
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 49 0f db c0 49 0f db\n" }
+  -- { dg-output "Local_R2 : 40 49 0f db c0 49 0f db.*\n" }
 
   Local_R1.F := (Local_R1.F.R + 1.0, Local_R1.F.I + 1.0);
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : ee 87 84 40 db 0f 09 c0\n" }
+  -- { dg-output "Local_R1 : ee 87 84 40 db 0f 09 c0.*\n" }
 
   Local_R2.F := (Local_R2.F.R + 1.0, Local_R2.F.I + 1.0);
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 84 87 ee c0 09 0f db\n" }
+  -- { dg-output "Local_R2 : 40 84 87 ee c0 09 0f db.*\n" }
 
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/t2.adb b/gcc/testsuite/gnat.dg/sso/t2.adb
index 04ce7752133..df14ae5a11e 100644
--- a/gcc/testsuite/gnat.dg/sso/t2.adb
+++ b/gcc/testsuite/gnat.dg/sso/t2.adb
@@ -21,7 +21,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : e5 59 d1 48 b0 a0 c1 03\n" }
+  -- { dg-output "Local_R1 : e5 59 d1 48 b0 a0 c1 03.*\n" }
 
   Local_R2.S1 := My_R2.S1 - 1;
   Local_R2.I := My_R2.I + 1;
@@ -34,7 +34,7 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 44 8d 15 9e 40 58 34 1e\n" }
+  -- { dg-output "Local_R2 : 44 8d 15 9e 40 58 34 1e.*\n" }
 
   Local_R1 := (S1 => 2,
                I  => 16#12345678#,
@@ -44,7 +44,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : e2 59 d1 48 b4 aa d9 bb\n" }
+  -- { dg-output "Local_R1 : e2 59 d1 48 b4 aa d9 bb.*\n" }
 
   Local_R2 := (S1 => 2,
                I  => 16#12345678#,
@@ -54,7 +54,7 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 84 8d 15 9e 15 5b 35 df\n" }
+  -- { dg-output "Local_R2 : 84 8d 15 9e 15 5b 35 df.*\n" }
 
   Local_R1.S1   := Local_R1.S1 - 1;
   Local_R1.I    := Local_R1.I + 1;
@@ -67,7 +67,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : e5 59 d1 48 b0 a0 c1 03\n" }
+  -- { dg-output "Local_R1 : e5 59 d1 48 b0 a0 c1 03.*\n" }
 
   Local_R2.S1   := Local_R2.S1 - 1;
   Local_R2.I    := Local_R2.I + 1;
@@ -80,5 +80,5 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 44 8d 15 9e 40 58 34 1e\n" }
+  -- { dg-output "Local_R2 : 44 8d 15 9e 40 58 34 1e.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/t3.adb b/gcc/testsuite/gnat.dg/sso/t3.adb
index 3ecbf6893b2..a53e9cc03a8 100644
--- a/gcc/testsuite/gnat.dg/sso/t3.adb
+++ b/gcc/testsuite/gnat.dg/sso/t3.adb
@@ -21,7 +21,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : e5 59 d1 48 b0 a0 c1 03\n" }
+  -- { dg-output "Local_R1 : e5 59 d1 48 b0 a0 c1 03.*\n" }
 
   Local_R2.S1   := My_R2.S1 - 1;
   Local_R2.I    := My_R2.I + 1;
@@ -34,7 +34,7 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 44 8d 15 9e 40 58 34 1e\n" }
+  -- { dg-output "Local_R2 : 44 8d 15 9e 40 58 34 1e.*\n" }
 
   Local_R1 := (S1 => 2,
                I  => 16#12345678#,
@@ -44,7 +44,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : e2 59 d1 48 b4 aa d9 bb\n" }
+  -- { dg-output "Local_R1 : e2 59 d1 48 b4 aa d9 bb.*\n" }
 
   Local_R2 := (S1 => 2,
                I  => 16#12345678#,
@@ -54,7 +54,7 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 84 8d 15 9e 15 5b 35 df\n" }
+  -- { dg-output "Local_R2 : 84 8d 15 9e 15 5b 35 df.*\n" }
 
   Local_R1.S1   := Local_R1.S1 - 1;
   Local_R1.I    := Local_R1.I + 1;
@@ -67,7 +67,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : e5 59 d1 48 b0 a0 c1 03\n" }
+  -- { dg-output "Local_R1 : e5 59 d1 48 b0 a0 c1 03.*\n" }
 
   Local_R2.S1   := Local_R2.S1 - 1;
   Local_R2.I    := Local_R2.I + 1;
@@ -80,5 +80,5 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 44 8d 15 9e 40 58 34 1e\n" }
+  -- { dg-output "Local_R2 : 44 8d 15 9e 40 58 34 1e.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/t4.adb b/gcc/testsuite/gnat.dg/sso/t4.adb
index ecaee90b28e..734b6a6823b 100644
--- a/gcc/testsuite/gnat.dg/sso/t4.adb
+++ b/gcc/testsuite/gnat.dg/sso/t4.adb
@@ -16,41 +16,41 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : ee 87 84 40\n" }
+  -- { dg-output "Local_R1 : ee 87 84 40.*\n" }
 
   Local_R2.F := My_R2.F + 1.0;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 84 87 ee\n" }
+  -- { dg-output "Local_R2 : 40 84 87 ee.*\n" }
 
   Local_R1.F := Pi;
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : db 0f 49 40\n" }
+  -- { dg-output "Local_R1 : db 0f 49 40.*\n" }
 
   Local_R2.F := Pi;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 49 0f db\n" }
+  -- { dg-output "Local_R2 : 40 49 0f db.*\n" }
 
   Local_R1.F := Local_R1.F + 1.0;
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : ee 87 84 40\n" }
+  -- { dg-output "Local_R1 : ee 87 84 40.*\n" }
 
   Local_R2.F := Local_R2.F + 1.0;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 84 87 ee\n" }
+  -- { dg-output "Local_R2 : 40 84 87 ee.*\n" }
 
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/t5.adb b/gcc/testsuite/gnat.dg/sso/t5.adb
index c737bf3a50a..605bd71f2d9 100644
--- a/gcc/testsuite/gnat.dg/sso/t5.adb
+++ b/gcc/testsuite/gnat.dg/sso/t5.adb
@@ -18,7 +18,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 79 56 34 12 13 00 ab 00 35 00 cd 00 57 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 79 56 34 12 13 00 ab 00 35 00 cd 00 57 00 ef 00.*\n" }
 
   Local_R2.I    := My_R2.I + 1;
   Local_R2.A(1) := My_R2.A(1) + 1;
@@ -28,21 +28,21 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 79 00 ab 00 13 00 cd 00 35 00 ef 00 57\n" }
+  -- { dg-output "Local_R2 : 12 34 56 79 00 ab 00 13 00 cd 00 35 00 ef 00 57.*\n" }
 
   Local_R1 := (I => 16#12345678#,
                A => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Local_R2 := (I => 16#12345678#,
                A => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Local_R1.I    := Local_R1.I + 1;
   Local_R1.A(1) := Local_R1.A(1) + 1;
@@ -52,7 +52,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 79 56 34 12 13 00 ab 00 35 00 cd 00 57 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 79 56 34 12 13 00 ab 00 35 00 cd 00 57 00 ef 00.*\n" }
 
   Local_R2.I    := Local_R2.I + 1;
   Local_R2.A(1) := Local_R2.A(1) + 1;
@@ -62,6 +62,6 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 79 00 ab 00 13 00 cd 00 35 00 ef 00 57\n" }
+  -- { dg-output "Local_R2 : 12 34 56 79 00 ab 00 13 00 cd 00 35 00 ef 00 57.*\n" }
 
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/t6.adb b/gcc/testsuite/gnat.dg/sso/t6.adb
index 49661cb1215..fa70b100404 100644
--- a/gcc/testsuite/gnat.dg/sso/t6.adb
+++ b/gcc/testsuite/gnat.dg/sso/t6.adb
@@ -18,7 +18,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 79 56 34 12 00 ab 00 13 00 cd 00 35 00 ef 00 57\n" }
+  -- { dg-output "Local_R1 : 79 56 34 12 00 ab 00 13 00 cd 00 35 00 ef 00 57.*\n" }
 
   Local_R2.I    := My_R2.I + 1;
   Local_R2.A(1) := My_R2.A(1) + 1;
@@ -28,21 +28,21 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 79 13 00 ab 00 35 00 cd 00 57 00 ef 00\n" }
+  -- { dg-output "Local_R2 : 12 34 56 79 13 00 ab 00 35 00 cd 00 57 00 ef 00.*\n" }
 
   Local_R1 := (I => 16#12345678#,
                A => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Local_R2 := (I => 16#12345678#,
                A => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Local_R1.I    := Local_R1.I + 1;
   Local_R1.A(1) := Local_R1.A(1) + 1;
@@ -52,7 +52,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 79 56 34 12 00 ab 00 13 00 cd 00 35 00 ef 00 57\n" }
+  -- { dg-output "Local_R1 : 79 56 34 12 00 ab 00 13 00 cd 00 35 00 ef 00 57.*\n" }
 
   Local_R2.I    := Local_R2.I + 1;
   Local_R2.A(1) := Local_R2.A(1) + 1;
@@ -62,6 +62,6 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 79 13 00 ab 00 35 00 cd 00 57 00 ef 00\n" }
+  -- { dg-output "Local_R2 : 12 34 56 79 13 00 ab 00 35 00 cd 00 57 00 ef 00.*\n" }
 
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/t7.adb b/gcc/testsuite/gnat.dg/sso/t7.adb
index da51bd535b4..4ad8d4144a2 100644
--- a/gcc/testsuite/gnat.dg/sso/t7.adb
+++ b/gcc/testsuite/gnat.dg/sso/t7.adb
@@ -19,7 +19,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 79 56 34 12 13 00 ab 00 35 00 cd 00 57 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 79 56 34 12 13 00 ab 00 35 00 cd 00 57 00 ef 00.*\n" }
 
   Local_R2.I    := My_R2.I + 1;
   Local_R2.N.C1 := My_R2.N.C1 + 1;
@@ -29,21 +29,21 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 79 00 ab 00 13 00 cd 00 35 00 ef 00 57\n" }
+  -- { dg-output "Local_R2 : 12 34 56 79 00 ab 00 13 00 cd 00 35 00 ef 00 57.*\n" }
 -- 
   Local_R1 := (I => 16#12345678#,
                N => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Local_R2 := (I => 16#12345678#,
                N => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Local_R1.I    := Local_R1.I + 1;
   Local_R1.N.C1 := Local_R1.N.C1 + 1;
@@ -53,7 +53,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 79 56 34 12 13 00 ab 00 35 00 cd 00 57 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 79 56 34 12 13 00 ab 00 35 00 cd 00 57 00 ef 00.*\n" }
 
   Local_R2.I    := Local_R2.I + 1;
   Local_R2.N.C1 := Local_R2.N.C1 + 1;
@@ -63,6 +63,6 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 79 00 ab 00 13 00 cd 00 35 00 ef 00 57\n" }
+  -- { dg-output "Local_R2 : 12 34 56 79 00 ab 00 13 00 cd 00 35 00 ef 00 57.*\n" }
 
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/t8.adb b/gcc/testsuite/gnat.dg/sso/t8.adb
index a9976a6e69e..82d8acdf21c 100644
--- a/gcc/testsuite/gnat.dg/sso/t8.adb
+++ b/gcc/testsuite/gnat.dg/sso/t8.adb
@@ -19,7 +19,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 79 56 34 12 00 ab 00 13 00 cd 00 35 00 ef 00 57\n" }
+  -- { dg-output "Local_R1 : 79 56 34 12 00 ab 00 13 00 cd 00 35 00 ef 00 57.*\n" }
 
   Local_R2.I    := My_R2.I + 1;
   Local_R2.N.C1 := My_R2.N.C1 + 1;
@@ -29,21 +29,21 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 79 13 00 ab 00 35 00 cd 00 57 00 ef 00\n" }
+  -- { dg-output "Local_R2 : 12 34 56 79 13 00 ab 00 35 00 cd 00 57 00 ef 00.*\n" }
 
   Local_R1 := (I => 16#12345678#,
                N => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R1 : 78 56 34 12 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Local_R2 := (I => 16#12345678#,
                N => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R2 : 12 34 56 78 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Local_R1.I    := Local_R1.I + 1;
   Local_R1.N.C1 := Local_R1.N.C1 + 1;
@@ -53,7 +53,7 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 79 56 34 12 00 ab 00 13 00 cd 00 35 00 ef 00 57\n" }
+  -- { dg-output "Local_R1 : 79 56 34 12 00 ab 00 13 00 cd 00 35 00 ef 00 57.*\n" }
 
   Local_R2.I    := Local_R2.I + 1;
   Local_R2.N.C1 := Local_R2.N.C1 + 1;
@@ -63,6 +63,6 @@ begin
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 12 34 56 79 13 00 ab 00 35 00 cd 00 57 00 ef 00\n" }
+  -- { dg-output "Local_R2 : 12 34 56 79 13 00 ab 00 35 00 cd 00 57 00 ef 00.*\n" }
 
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/t9.adb b/gcc/testsuite/gnat.dg/sso/t9.adb
index e38cabc21d8..f55df6eadc0 100644
--- a/gcc/testsuite/gnat.dg/sso/t9.adb
+++ b/gcc/testsuite/gnat.dg/sso/t9.adb
@@ -16,41 +16,41 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 8c 16 22 aa fd 90 10 40\n" }
+  -- { dg-output "Local_R1 : 8c 16 22 aa fd 90 10 40.*\n" }
 
   Local_R2.F := My_R2.F + 1.0;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 10 90 fd aa 22 16 8c\n" }
+  -- { dg-output "Local_R2 : 40 10 90 fd aa 22 16 8c.*\n" }
 
   Local_R1.F := Pi;
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 18 2d 44 54 fb 21 09 40\n" }
+  -- { dg-output "Local_R1 : 18 2d 44 54 fb 21 09 40.*\n" }
 
   Local_R2.F := Pi;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 09 21 fb 54 44 2d 18\n" }
+  -- { dg-output "Local_R2 : 40 09 21 fb 54 44 2d 18.*\n" }
 
   Local_R1.F := Local_R1.F + 1.0;
 
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 8c 16 22 aa fd 90 10 40\n" }
+  -- { dg-output "Local_R1 : 8c 16 22 aa fd 90 10 40.*\n" }
 
   Local_R2.F := Local_R2.F + 1.0;
 
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 40 10 90 fd aa 22 16 8c\n" }
+  -- { dg-output "Local_R2 : 40 10 90 fd aa 22 16 8c.*\n" }
 
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/u11.adb b/gcc/testsuite/gnat.dg/sso/u11.adb
index 9f7c770951d..e8a05a96f52 100644
--- a/gcc/testsuite/gnat.dg/sso/u11.adb
+++ b/gcc/testsuite/gnat.dg/sso/u11.adb
@@ -16,29 +16,29 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 01 00 00 00 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 01 00 00 00 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Local_R2 := (I => 1, A => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 00 00 00 01 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R2 : 00 00 00 01 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   C1 := Local_R1.A (Integer(Local_R1.I));
   Put_Line ("C1 :" & C1'Img);
-  -- { dg-output "C1 : 11206674\n" }
+  -- { dg-output "C1 : 11206674.*\n" }
 
   Local_R1.I := Local_R1.I + 1;  
   C1 := Local_R1.A (Integer(Local_R1.I));
   Put_Line ("C1 :" & C1'Img);
-  -- { dg-output "C1 : 13434932\n" }
+  -- { dg-output "C1 : 13434932.*\n" }
 
   C2 := Local_R2.A (Integer(Local_R2.I));
   Put_Line ("C2 :" & C2'Img);
-  -- { dg-output "C2 : 11206674\n" }
+  -- { dg-output "C2 : 11206674.*\n" }
 
   Local_R2.I := Local_R2.I + 1;  
   C2 := Local_R2.A (Integer(Local_R2.I));
   Put_Line ("C2 :" & C2'Img);
-  -- { dg-output "C2 : 13434932\n" }
+  -- { dg-output "C2 : 13434932.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/u5.adb b/gcc/testsuite/gnat.dg/sso/u5.adb
index 5d9d4ccbceb..d2aef4b5c86 100644
--- a/gcc/testsuite/gnat.dg/sso/u5.adb
+++ b/gcc/testsuite/gnat.dg/sso/u5.adb
@@ -16,29 +16,29 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 01 00 00 00 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R1 : 01 00 00 00 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   Local_R2 := (I => 1, A => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 00 00 00 01 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R2 : 00 00 00 01 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   C1 := Local_R1.A (Local_R1.I);
   Put_Line ("C1 :" & C1'Img);
-  -- { dg-output "C1 : 11206674\n" }
+  -- { dg-output "C1 : 11206674.*\n" }
 
   Local_R1.I := Local_R1.I + 1;  
   C1 := Local_R1.A (Local_R1.I);
   Put_Line ("C1 :" & C1'Img);
-  -- { dg-output "C1 : 13434932\n" }
+  -- { dg-output "C1 : 13434932.*\n" }
 
   C2 := Local_R2.A (Local_R2.I);
   Put_Line ("C2 :" & C2'Img);
-  -- { dg-output "C2 : 11206674\n" }
+  -- { dg-output "C2 : 11206674.*\n" }
 
   Local_R2.I := Local_R2.I + 1;  
   C2 := Local_R2.A (Local_R2.I);
   Put_Line ("C2 :" & C2'Img);
-  -- { dg-output "C2 : 13434932\n" }
+  -- { dg-output "C2 : 13434932.*\n" }
 end;
diff --git a/gcc/testsuite/gnat.dg/sso/u6.adb b/gcc/testsuite/gnat.dg/sso/u6.adb
index ca8a0d4ff5f..b452dedfdca 100644
--- a/gcc/testsuite/gnat.dg/sso/u6.adb
+++ b/gcc/testsuite/gnat.dg/sso/u6.adb
@@ -16,29 +16,29 @@ begin
   Put ("Local_R1 :");
   Dump (Local_R1'Address, R1'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R1 : 01 00 00 00 00 ab 00 12 00 cd 00 34 00 ef 00 56\n" }
+  -- { dg-output "Local_R1 : 01 00 00 00 00 ab 00 12 00 cd 00 34 00 ef 00 56.*\n" }
 
   Local_R2 := (I => 1, A => (16#AB0012#, 16#CD0034#, 16#EF0056#));
   Put ("Local_R2 :");
   Dump (Local_R2'Address, R2'Max_Size_In_Storage_Elements);
   New_Line;
-  -- { dg-output "Local_R2 : 00 00 00 01 12 00 ab 00 34 00 cd 00 56 00 ef 00\n" }
+  -- { dg-output "Local_R2 : 00 00 00 01 12 00 ab 00 34 00 cd 00 56 00 ef 00.*\n" }
 
   C1 := Local_R1.A (Local_R1.I);
   Put_Line ("C1 :" & C1'Img);
-  -- { dg-output "C1 : 11206674\n" }
+  -- { dg-output "C1 : 11206674.*\n" }
 
   Local_R1.I := Local_R1.I + 1;  
   C1 := Local_R1.A (Local_R1.I);
   Put_Line ("C1 :" & C1'Img);
-  -- { dg-output "C1 : 13434932\n" }
+  -- { dg-output "C1 : 13434932.*\n" }
 
   C2 := Local_R2.A (Local_R2.I);
   Put_Line ("C2 :" & C2'Img);
-  -- { dg-output "C2 : 11206674\n" }
+  -- { dg-output "C2 : 11206674.*\n" }
 
   Local_R2.I := Local_R2.I + 1;  
   C2 := Local_R2.A (Local_R2.I);
   Put_Line ("C2 :" & C2'Img);
-  -- { dg-output "C2 : 13434932\n" }
+  -- { dg-output "C2 : 13434932.*\n" }
 end;
author	ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>	2016-01-27 16:53:27 +0000
committer	ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>	2016-01-27 16:53:27 +0000
commit	d46a16d4f031ec7748d6c984b3ac25422c863809 (patch)
tree	ab2bacceed8ed43c8450ed1ca1692f61e07ecef0
parent	6a9b35efb9d45ffc8415e4d05876ced0a171e70e (diff)
download	gcc-d46a16d4f031ec7748d6c984b3ac25422c863809.tar.gz