with "libgnat_common";

library project Libgnat is

   for Languages use ("Ada", "C");
   for Source_Dirs use (".");
   for Source_List_File use "libgnat.lst";
   for Object_Dir use "../obj-" & Libgnat_Common.Library_Kind;

   for Library_Name use "gnat";
   for Library_Dir use "../adalib";
   for Library_Kind use Libgnat_Common.Library_Kind;

   package Compiler is

      for Switches ("C") use Libgnat_Common.C_Flags;
      for Switches ("Ada") use Libgnat_Common.Ada_Flags;

      for Switches ("s-traceb.adb") use
        Libgnat_Common.Ada_Flags & Libgnat_Common.Force_Debug &
        Libgnat_Common.No_Inline & Libgnat_Common.No_Sibling;
      --  Force no sibling call optimization on s-traceb.o so the number of
      --  stack frames to be skipped when computing a call chain is not
      --  modified by optimization. We don.t want inlining, either.

      for Switches ("a-except.adb") use
        Libgnat_Common.Ada_Flags & ("-O1") &
        Libgnat_Common.Force_Debug & Libgnat_Common.No_Inline &
        Libgnat_Common.No_Reorder;
      --  Force no function reordering because of the exclusion bounds
      --  mechanism (see the source file for more detailed information).
      --  Force debugging information so that it is always possible to set
      --  conditional breakpoints on exceptions.
      --  Use -O1 otherwise gdb isn.t able to get a full backtrace on mips
      --  targets.

      for Switches ("s-excdeb.adb") use
        Libgnat_Common.Ada_Flags & Libgnat_Common.Force_Debug &
        Libgnat_Common.No_Opt;
      --  Compile without optimization and with debug info to let the debugger
      --  set breakpoints and inspect subprogram parameters on exception
      --  related events.

      for Switches ("s-assert.adb") use
        Libgnat_Common.Ada_Flags & Libgnat_Common.Force_Debug;
      --  Force debugging information on s-assert.o so that it is always
      --  possible to set breakpoint on assert failures.

      for Switches ("a-tags.adb") use
        Libgnat_Common.Ada_Flags & Libgnat_Common.Force_Debug;
      --  Force debugging information on a-tags.o so that the debugger can find
      --  the description of Ada.Tags.Type_Specific_Data.

      for Switches ("s-memory.adb") use
        Libgnat_Common.Ada_Flags & Libgnat_Common.No_Sibling;
      --  Force no sibling call optimization on s-memory.o to avoid turning the
      --  tail recursion in Alloc into a loop that confuses branch prediction.

      for Switches ("g-debpoo.adb") use
        Libgnat_Common.Ada_Flags & Libgnat_Common.No_Reorder;
      --  Need to keep functions ordered on g-debpoo.o since labels are used to
      --  exclude subprograms from traceback computation.

      for Switches ("traceback.c") use
        Libgnat_Common.C_Flags & Libgnat_Common.No_Omit;

   end Compiler;

end Libgnat;