1 files changed, 17 insertions, 0 deletions
diff --git a/c/src/lib/libbsp/i386/ts_386ex/tools/debug_ada/serial_debug.ads b/c/src/lib/libbsp/i386/ts_386ex/tools/debug_ada/serial_debug.ads
new file mode 100644
index 0000000000..d645ca52c5
--- /dev/null
+++ b/c/src/lib/libbsp/i386/ts_386ex/tools/debug_ada/serial_debug.ads
@@ -0,0 +1,17 @@
+--  This package allows one to easily add serial debugging support to any
+--  Ada program by simply adding "with Serial_Debug; use Serial_Debug".
+--  Debugging will be automatically initialized when the program is run,
+--  and it should be possible to interrupt the running program from ddd/gdb.
+--
+--  Additionally, one can place explicit breakpoints for the debugger using
+--  the procedure Breakpoint
+
+package Serial_Debug is
+
+   procedure Breakpoint;
+
+private
+
+   pragma Inline (Breakpoint);
+
+end Serial_Debug;