1 files changed, 4 insertions, 0 deletions
diff --git a/bug.ads b/bug.ads
index ce57a35a7..5e35ffca0 100644
--- a/bug.ads
+++ b/bug.ads
@@ -18,5 +18,9 @@
 with Ada.Exceptions; use Ada.Exceptions;
 
 package Bug is
+   --  Display a bug box for EXCEPT.
    procedure Disp_Bug_Box (Except : Exception_Occurrence);
+
+   --  Get the gnat version used to bind the unit.
+   function Get_Gnat_Version return String;
 end Bug;