--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/GDBMI_info_ada_exceptions.st	Thu Jun 12 01:21:45 2014 +0100
@@ -0,0 +1,70 @@
+"{ Package: 'jv:libgdbs' }"
+
+GDBMICommand subclass:#GDBMI_info_ada_exceptions
+	instanceVariableNames:''
+	classVariableNames:''
+	poolDictionaries:''
+	category:'GDB-Core-Commands-MI'
+!
+
+!GDBMI_info_ada_exceptions class methodsFor:'documentation'!
+
+documentation
+"
+The `-info-ada-exceptions' Command
+----------------------------------
+
+Synopsis
+........
+
+      -info-ada-exceptions [ REGEXP]
+
+   List all Ada exceptions defined within the program being debugged.
+With a regular expression REGEXP, only those exceptions whose names
+match REGEXP are listed.
+
+{No value for `GDBN'} Command
+.............................
+
+The corresponding {No value for `GDBN'} command is `info exceptions'.
+
+Result
+......
+
+The result is a table of Ada exceptions.  The following columns are
+defined for each exception:
+
+`name'
+     The name of the exception.
+
+`address'
+     The address of the exception.
+
+
+Example
+.......
+
+     -info-ada-exceptions aint
+     ^done,ada-exceptions={nr_rows='2',nr_cols='2',
+     hdr=[{width='1',alignment='-1',col_name='name',colhdr='Name'},
+     {width='1',alignment='-1',col_name='address',colhdr='Address'}],
+     body=[{name='constraint_error',address='0x0000000000613da0'},
+     {name='const.aint_global_e',address='0x0000000000613b00'}]}
+
+Catching Ada Exceptions
+-----------------------
+
+The commands describing how to ask {No value for `GDBN'} to stop when a
+program raises an exception are described at *note Ada Exception GDB/MI
+Catchpoint Commands::.
+
+
+"
+! !
+
+!GDBMI_info_ada_exceptions methodsFor:'accessing'!
+
+operation
+	^ 'info-ada-exceptions'
+! !
+