diff --git a/src/simple_webapps-upload_servers.adb b/src/simple_webapps-upload_servers.adb index 71c2892..c16fab3 100644 --- a/src/simple_webapps-upload_servers.adb +++ b/src/simple_webapps-upload_servers.adb @@ -155,11 +155,11 @@ package body Simple_Webapps.Upload_Servers is null; -- processed below when others => - begin -- explicit block needed to work around a GNAT parsing bug +-- begin -- explicit block needed to work around a GNAT parsing bug return Error_Page (AWS.Messages.S405, Dispatcher.DB.Query.Data.Error_Template); - end; +-- end; end case; declare diff --git a/webapps.gpr b/webapps.gpr index 53b2130..4ad6a93 100644 --- a/webapps.gpr +++ b/webapps.gpr @@ -15,10 +15,10 @@ project Webapps is Prefix := "coverage/"; end case; - for Source_Dirs use ("src"); + for Source_Dirs use ("src", "tests"); for Object_Dir use Prefix & "obj"; for Exec_Dir use Prefix & "bin"; - for Main use ("upload_server.adb"); + for Main use ("minimal.adb"); case Mode is when "Release" =>