(3 . 22)(3 . 46)
 -- http://trilema.com/2018/euloras-communication-protocol-restated/ 

project SMG_comms is 

  type Mode_Type is ("debug", "release");
  Mode : Mode_Type := external ("mode", "release");

  for Languages use ("Ada");

  for Source_Dirs use ("src");
  for Ignore_Source_Sub_Dirs use (".svn", ".git", "@*");

  for Object_Dir use "obj";
  for Exec_Dir use ".";

  for Main use ("test_comms.adb");
  package Compiler is

    case Mode is
      when "debug" =>
        for Switches ("Ada")
          use ("-g");
      when "release" =>
        for Switches ("Ada")
          use ("-O2", "-fdump-scos", "-gnata", "-fstack-check",
               "-gnatyd", "-gnatym",
               "-fdata-sections", "-ffunction-sections", "-gnatwr", "-gnatw.d",
               "-gnatec=" & SMG_Comms'Project_Dir & "restrict.adc");
    end case;
  end Compiler;
    
  package Builder is
    for Executable ("test_comms.adb") use "test_comms";
    for Switches ("Ada")
       use ("-nostdlib");
  end Builder;

  package Compiler is
    for Default_Switches ("Ada") use ("-O2");
  end Compiler;
  
  package Binder is
    case Mode is
      when "debug" =>
        for Switches ("Ada")
          use ();
      when "release" =>
        for Switches ("Ada")
          use ("-static");
    end case;
  end Binder;

end SMG_comms;