-
+ 88610367D612A781967BB6E3E82377404F8007E79CE2B664A1F64E6B79D2985236144FA6205FD3824DF2712C68E3BCD1124B3EC528BD4DAE588B1DB1370750EFcryostat/demo/cryodemo.gpr(0 . 0)(1 . 68)
192 ------------------------------------------------------------------------------
193 ------------------------------------------------------------------------------
194 -- This file is part of 'CryoDemo', a tutorial example for 'Cryostat'. --
195 -- --
196 -- (C) 2020 Stanislav Datskovskiy ( www.loper-os.org ) --
197 -- http://wot.deedbot.org/17215D118B7239507FAFED98B98228A001ABFFC7.html --
198 -- --
199 -- You do not have, nor can you ever acquire the right to use, copy or --
200 -- distribute this software ; Should you use this software for any purpose, --
201 -- or copy and distribute it to anyone or in any manner, you are breaking --
202 -- the laws of whatever soi-disant jurisdiction, and you promise to --
203 -- continue doing so for the indefinite future. In any case, please --
204 -- always : read and understand any software ; verify any PGP signatures --
205 -- that you use - for any purpose. --
206 ------------------------------------------------------------------------------
207 ------------------------------------------------------------------------------
208
209 with "../libcryo/cryostat.gpr";
210
211 project CryoDemo is
212
213 for Object_Dir use "obj";
214
215 type Mode_Type is ("debug", "release");
216 Mode : Mode_Type := external ("mode", "release");
217
218 for Languages use ("Ada");
219 for Source_Dirs use (".");
220 for Exec_Dir use "bin";
221 for Main use ("cryodemo.adb");
222
223 package Compiler is
224 case Mode is
225 when "debug" =>
226 for Switches ("Ada")
227 use ("-g");
228 when "release" =>
229 for Switches ("Ada")
230 use ("-O2", "-fdump-scos", "-gnata", "-fstack-check",
231 "-gnatyd", "-gnatym",
232 "-fdata-sections", "-ffunction-sections",
233 "-gnatec=" & CryoDemo'Project_Dir & "restrict.adc");
234 end case;
235 end Compiler;
236
237 package Binder is
238 case Mode is
239 when "debug" =>
240 for Switches ("Ada")
241 use ();
242 when "release" =>
243 for Switches ("Ada")
244 use ("-static");
245 end case;
246 end Binder;
247
248 package Linker is
249 case Mode is
250 when "debug" =>
251 for Switches ("Ada")
252 use ();
253 when "release" =>
254 for Switches ("Ada")
255 use ("-Wl,--gc-sections", "-static");
256 end case;
257 end Linker;
258
259 end CryoDemo;