2 files changed, 1 insertions, 2 deletions
diff --git a/gcc/testsuite/gnat.dg/ref_type.adb b/gcc/testsuite/gnat.dg/ref_type.adb
index 4cead9093c9..3d36b96ff96 100644
--- a/gcc/testsuite/gnat.dg/ref_type.adb
+++ b/gcc/testsuite/gnat.dg/ref_type.adb
@@ -2,7 +2,6 @@
 --  { dg-do compile }
 
 package body ref_type is
-  type T is tagged null record;
   procedure Print (X : T) is                                   
   begin                                                        
      null;
diff --git a/gcc/testsuite/gnat.dg/ref_type.ads b/gcc/testsuite/gnat.dg/ref_type.ads
index 021ca72881d..550d5892ff2 100644
--- a/gcc/testsuite/gnat.dg/ref_type.ads
+++ b/gcc/testsuite/gnat.dg/ref_type.ads
@@ -1,5 +1,5 @@
 package ref_type is
 private
-   type T is tagged;
+   type T is tagged null record;
    procedure Print (X : T);
 end ref_type;