X-Git-Url: https://ncurses.scripts.mit.edu/?a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses-trace__adb.htm;h=a209b3f34e057777fc394c058eec284a6d5ace08;hb=b5a763d403a45cf54f774f07e1542d4ca8433e2b;hp=04dae6b930606ab6380b84828848536f26d069f4;hpb=55ccd2b959766810cf7db8d1c4462f338ce0afc8;p=ncurses.git
diff --git a/doc/html/ada/terminal_interface-curses-trace__adb.htm b/doc/html/ada/terminal_interface-curses-trace__adb.htm
index 04dae6b9..a209b3f3 100644
--- a/doc/html/ada/terminal_interface-curses-trace__adb.htm
+++ b/doc/html/ada/terminal_interface-curses-trace__adb.htm
@@ -44,17 +44,19 @@
-- Binding Version 01.00
------------------------------------------------------------------------------
-package body Terminal_Interface.Curses.Trace is
+package body Terminal_Interface.Curses.Trace is
procedure Trace_On (x : Trace_Attribute_Set) is
+ pragma Unreferenced (x);
begin
null;
end Trace_On;
- procedure Trace_Put (str : String) is
+ procedure Trace_Put (str : String) is
+ pragma Unreferenced (str);
begin
null;
end Trace_Put;
-end Terminal_Interface.Curses.Trace;
+end Terminal_Interface.Curses.Trace;