udp_tester 1
udp_tester 2
udp_tester 3
udp_tester 4 with "../libudp/udp.gpr";
udp_tester 5 with "../libmt/mt.gpr";
udp_tester 6
udp_tester 7 project Tester is
udp_tester 8
udp_tester 9 for Object_Dir use "obj";
udp_tester 10
udp_tester 11 type Mode_Type is ("debug", "release");
udp_tester 12 Mode : Mode_Type := external ("mode", "release");
udp_tester 13
udp_tester 14 for Languages use ("Ada");
udp_tester 15 for Source_Dirs use (".");
udp_tester 16 for Exec_Dir use "bin";
udp_tester 17 for Main use ("udp_sender.adb", "udp_receiver.adb");
udp_tester 18
udp_tester 19 package Compiler is
udp_tester 20 case Mode is
udp_tester 21 when "debug" =>
udp_tester 22 for Switches ("Ada")
udp_tester 23 use ("-g");
udp_tester 24 when "release" =>
udp_tester 25 for Switches ("Ada")
udp_tester 26 use ("-O2", "-fdump-scos", "-gnata", "-fstack-check",
udp_tester 27 "-gnatyd", "-gnatym",
udp_tester 28 "-fdata-sections", "-ffunction-sections");
udp_tester 29 end case;
udp_tester 30 end Compiler;
udp_tester 31
udp_tester 32 package Binder is
udp_tester 33 case Mode is
udp_tester 34 when "debug" =>
udp_tester 35 for Switches ("Ada")
udp_tester 36 use ();
udp_tester 37 when "release" =>
udp_tester 38 for Switches ("Ada")
udp_tester 39 use ("-static");
udp_tester 40 end case;
udp_tester 41 end Binder;
udp_tester 42
udp_tester 43 package Linker is
udp_tester 44 case Mode is
udp_tester 45 when "debug" =>
udp_tester 46 for Switches ("Ada")
udp_tester 47 use ();
udp_tester 48 when "release" =>
udp_tester 49 for Switches ("Ada")
udp_tester 50 use ("-Wl,--gc-sections", "-static");
udp_tester 51 end case;
udp_tester 52 end Linker;
udp_tester 53
udp_tester 54 end Tester;