OSDN Git Service

Don't use CRLF endings.
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gnat.dg / discr35.adb
index 8b73773..16bacd6 100644 (file)
@@ -1,17 +1,17 @@
--- { dg-do compile }\r
-\r
-package body Discr35 is\r
-\r
-   procedure Proc1 is\r
-     R : Rec2 := Null_Rec2;\r
-   begin\r
-     null;\r
-   end;\r
-\r
-   procedure Proc2 is\r
-     R : Rec2;\r
-   begin\r
-     R := Null_Rec2;\r
-   end;\r
-\r
-end Discr35;\r
+-- { dg-do compile }
+
+package body Discr35 is
+
+   procedure Proc1 is
+     R : Rec2 := Null_Rec2;
+   begin
+     null;
+   end;
+
+   procedure Proc2 is
+     R : Rec2;
+   begin
+     R := Null_Rec2;
+   end;
+
+end Discr35;