diff --git a/zad2/src/iter/module.adb b/zad2/iter/module.adb similarity index 100% rename from zad2/src/iter/module.adb rename to zad2/iter/module.adb diff --git a/zad2/src/rec/module.adb b/zad2/rec/module.adb similarity index 100% rename from zad2/src/rec/module.adb rename to zad2/rec/module.adb diff --git a/zad2/src/module.ads b/zad2/src/module.ads index 4226a8d..1883853 100644 --- a/zad2/src/module.ads +++ b/zad2/src/module.ads @@ -3,16 +3,16 @@ with Ada.Strings.Unbounded; use Ada.Strings.Unbounded; package Module is + function gcd(a : Natural; b : Natural) return Natural; + + function factorial(n : Natural) return Natural; + type Result is record resultExists : Boolean; n : Integer; m : Integer; end record; - function factorial(n : Natural) return Natural; - - function gcd(a : Natural; b : Natural) return Natural; - function diophantine(a : Integer; b : Integer; c : Integer) return Result; end Module; diff --git a/zad2/zad2.gpr b/zad2/zad2.gpr index fc89598..9e47a59 100644 --- a/zad2/zad2.gpr +++ b/zad2/zad2.gpr @@ -3,7 +3,7 @@ project Zad2 is Impl : Impl_Type := external ("impl", "iter"); for Main use ("main"); - for Source_Dirs use ("src", "src/" & Impl); + for Source_Dirs use ("src", Impl); for Object_Dir use "target"; end Zad2;