Adjust previous change.
authorArnaud Charlet <charlet@gcc.gnu.org>
Fri, 23 Oct 2015 10:51:06 +0000 (12:51 +0200)
committerArnaud Charlet <charlet@gcc.gnu.org>
Fri, 23 Oct 2015 10:51:06 +0000 (12:51 +0200)
From-SVN: r229232

gcc/ada/gnat1drv.adb

index ba541e4bb03f37b095108739effe097e0056605b..06f018db6c5653b3955ccea223d372864cdc8f80 100644 (file)
@@ -27,7 +27,6 @@ with Atree;    use Atree;
 with Back_End; use Back_End;
 with Checks;
 with Comperr;
-with Cprint;
 with Csets;    use Csets;
 with Debug;    use Debug;
 with Elists;
@@ -1358,13 +1357,6 @@ begin
 
       Namet.Unlock;
 
-      --  Finally generate C source code if needed. Note that this needs to
-      --  happen after calling gigi to take advantage of the back annotation.
-
-      if Generate_C_Code then
-         Cprint.Source_Dump;
-      end if;
-
       --  Generate the call-graph output of dispatching calls
 
       Exp_CG.Generate_CG_Output;