-
+ 3D95822D87E16F7A8B8997642E35B7BC8B1F4A2B7CF82C39F27B507D62BD243FF50F9C24D6CE01873254B76A6AD93A26258B96FB1BE471E13EB9A7E5322A31AFzfp/adainclude/last_chance_handler.ads(0 . 0)(1 . 19)
432 ------------------------------------------------------------------------------
433 ------------------------------------------------------------------------------
434 -- You do not have, nor can you ever acquire the right to use, copy or --
435 -- distribute this software ; Should you use this software for any purpose, --
436 -- or copy and distribute it to anyone or in any manner, you are breaking --
437 -- the laws of whatever soi-disant jurisdiction, and you promise to --
438 -- continue doing so for the indefinite future. In any case, please --
439 -- always : read and understand any software ; verify any PGP signatures --
440 -- that you use - for any purpose. --
441 -- --
442 -- See also http://trilema.com/2015/a-new-software-licensing-paradigm . --
443 ------------------------------------------------------------------------------
444 ------------------------------------------------------------------------------
445
446 with System;
447
448 procedure Last_Chance_Handler
449 (Msg : System.Address; Line : Integer);
450 pragma Export (C, Last_Chance_Handler, "__gnat_last_chance_handler");