*** gcc/ada/make.adb.orig	Thu Jun  5 08:37:34 1997
--- gcc-2.7.2.1/ada/make.adb	Thu Jun  5 11:30:57 1997
***************
*** 191,197 ****
     -- Compiler, Binder & Linker Data and Subprograms --
     ----------------------------------------------------
  
!    Gcc       : String_Access := GNAT.OS_Lib.Locate_Exec_On_Path ("gcc");
     Gnatbind  : String_Access := GNAT.OS_Lib.Locate_Exec_On_Path ("gnatbind");
     Gnatlink  : String_Access := GNAT.OS_Lib.Locate_Exec_On_Path ("gnatlink");
  
--- 191,197 ----
     -- Compiler, Binder & Linker Data and Subprograms --
     ----------------------------------------------------
  
!    Gcc       : String_Access := GNAT.OS_Lib.Locate_Exec_On_Path ("adagcc");
     Gnatbind  : String_Access := GNAT.OS_Lib.Locate_Exec_On_Path ("gnatbind");
     Gnatlink  : String_Access := GNAT.OS_Lib.Locate_Exec_On_Path ("gnatlink");
  
***************
*** 778,784 ****
           Comp_Last := Comp_Last + 1;
           Comp_Args (Comp_Last) := new String'(Name_Buffer (1 .. Name_Len));
  
!          Display ("gcc", Comp_Args (Args'First .. Comp_Last));
  
           return
             GNAT.OS_Lib.Non_Blocking_Spawn
--- 778,784 ----
           Comp_Last := Comp_Last + 1;
           Comp_Args (Comp_Last) := new String'(Name_Buffer (1 .. Name_Len));
  
!          Display ("adagcc", Comp_Args (Args'First .. Comp_Last));
  
           return
             GNAT.OS_Lib.Non_Blocking_Spawn