[Ada (GNAT/GCC)] Better build automation

Just after I notified comp.lang.ada of my posting re GNAT/GPL, Martin Krischik wrote suggesting I use a .gpr file and gnat make rather than a direct reference to gcc.

After reading a friendly manual, I came up with the following .grp file and a batch file to control it.

I have stayed with the batch file, simply because I can't yet see how to have a multiple-program linkage (gnatlink, dlltool and gnatlink a second time).

First, build.gpr

project Build is for Source_Dirs use ( "./", "c:\mingw\lib\gcc\mingw32\4.2.1\**" ); for Object_Dir use "debug"; for Exec_Dir use "debug"; for Main use ("api"); type Style_Type is ("debug", "release"); Style : Style_Type := external ("STYLE", "debug"); case Style is when "debug" => for Object_Dir use "debug"; when "release" => for Object_Dir use "release"; for Exec_Dir use "."; end case; package Builder is case Style is when "debug" => for Default_Switches ("Ada") use ("-g"); when others => null; end case; end Builder; package Compiler is case Style is when "debug" => for Default_Switches ("Ada") use ( "-s", "-gnata", "-gnato", "-gnatE"); when "release" => for Default_Switches ("Ada") use ("-O2", "-fno-strict-aliasing"); end case; end Compiler; end Build;

And then, build.bat. Note the call to UPX, which compresses the release version of the .DLL. Note also that the debug and release subdirectories must already exist (though it wouldn't have been difficult to check-for-and-create-if-missing.)

@echo off set target=%1 if %1@==@ set target=debug if not %1@==debug@ if not %1@==release@ set target=debug echo Building %target% version of dll gnat make -Pbuild -XSTYLE=%target% gnatbind -n -x %target%\api.ali -IC:\MinGW\lib\gcc\mingw32\4.2.1\stdarg -IC:\MinGW\lib\gcc\mingw32\4.2.1\win32ada gnatlink -g -mdll -s -o %target%\api.dll %target%\api.ali -Xlinker --base-file=%target%\api.base dlltool --dllname api.dll --base-file %target%\api.base --output-exp %target%\api.exp --def api.def gnatlink -g -mdll -s -o %target%\api.dll %target%\api.ali -Xlinker --base-file=%target%\api.base %target%\api.exp if %target%==release upx -9 %target%\api.dll

Trust that's helpful.

© Copyright Bruce M. Axtens, 2007