package Adafn.Key.Selftest is

   pragma Elaborate_Body;

   --  During elaboration performs a self-test of key functions

end Adafn.Key.Selftest;