diff --git a/src/main/ocarina-cmd_line.adb b/src/main/ocarina-cmd_line.adb
index 0b177098f90e11a7e88062a2929323f91ff63675..a5517761c4238ec78a1f2aab5137183e4e91fbd9 100644
--- a/src/main/ocarina-cmd_line.adb
+++ b/src/main/ocarina-cmd_line.adb
@@ -152,7 +152,6 @@ package body Ocarina.Cmd_Line is
             ": invalid parameter for switch -" & Switch);
          Write_Eol;
          OS_Exit (1);
-
    end Parse_Command_Line;
 
    -----------------------------
@@ -161,12 +160,7 @@ package body Ocarina.Cmd_Line is
 
    procedure Parse_Source_Filename (S : String) is
    begin
-      if S (S'First) = '-' then
-         --  If there is a new switch, then the previous
-         --  files are discarded.
-         Sources.Init;
-
-      elsif S (S'First) = '@' then
+      if S (S'First) = '@' then
          declare
             Files : constant Ada.Command_Line.Response_File
               .Argument_List :=