]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
Minor testsuite tweaks
authorEric Botcazou <ebotcazou@adacore.com>
Sat, 2 May 2026 07:28:31 +0000 (09:28 +0200)
committerEric Botcazou <ebotcazou@adacore.com>
Sat, 2 May 2026 07:31:21 +0000 (09:31 +0200)
gcc/testsuite/
* gnat.dg/valid_scalars2.adb: Remove -O0 option.
* gnat.dg/validity_check3.ads: Rename to...
* gnat.dg/valid_scalars3.ads: ...this.
* gnat.dg/validity_check3.adb: Rename to...
* gnat.dg/valid_scalars3.adb: ...this.

gcc/testsuite/gnat.dg/valid_scalars2.adb
gcc/testsuite/gnat.dg/valid_scalars3.adb [moved from gcc/testsuite/gnat.dg/validity_check3.adb with 98% similarity]
gcc/testsuite/gnat.dg/valid_scalars3.ads [moved from gcc/testsuite/gnat.dg/validity_check3.ads with 98% similarity]

index 949cb836cae3dbc89289fd3db2ba306d150326da..2e63b7becc8e0cabb6dc5bb62a22403e0b379f52 100644 (file)
@@ -1,5 +1,5 @@
 --  { dg-do run }
---  { dg-options "-O0 -gnata -gnateV" }
+--  { dg-options "-gnata -gnateV" }
 
 with Ada.Exceptions; use Ada.Exceptions;
 
similarity index 98%
rename from gcc/testsuite/gnat.dg/validity_check3.adb
rename to gcc/testsuite/gnat.dg/valid_scalars3.adb
index 925f9a6d8f2d31dfb1fa8cade866d55ef0853772..c262d03505d8e648a60bf8b52f9908caa25c79db 100644 (file)
@@ -1,7 +1,7 @@
 --  { dg-do compile }
 --  { dg-options "-gnata -gnateV" }
 
-package body Validity_Check3 is
+package body Valid_Scalars3 is
    procedure Proc_Priv_CW_1 (Param : Tag_1'Class) is begin null; end;
    procedure Proc_Priv_CW_2 (Param : Tag_2'Class) is begin null; end;
    procedure Proc_Priv_CW_3 (Param : Tag_3'Class) is begin null; end;
@@ -93,4 +93,4 @@ package body Validity_Check3 is
       Proc_Vis_Tag_5 (Obj_Tag_5);
       Proc_Vis_Tag_6 (Obj_Tag_6);
    end Call_All;
-end Validity_Check3;
+end Valid_Scalars3;
similarity index 98%
rename from gcc/testsuite/gnat.dg/validity_check3.ads
rename to gcc/testsuite/gnat.dg/valid_scalars3.ads
index 537f0ec1a9c9a4de7cc1e79147e648245713d2b3..85091c132ff3c33c24beed947b53e3609910bf55 100644 (file)
@@ -1,4 +1,4 @@
-package Validity_Check3 is
+package Valid_Scalars3 is
    procedure Call_All;
 
    type Rec_1 is private;
@@ -113,4 +113,4 @@ private
 
    procedure Proc_Priv_Tag_6 (Param : Tag_6);
    procedure Proc_Priv_CW_6  (Param : Tag_6'Class);
-end Validity_Check3;
+end Valid_Scalars3;