X-Git-Url: http://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses-trace__ads.htm;h=0660c14f3fcd6e1b186cf968e4dfe4b7cb979790;hp=0d7cff95e656efc65d08eb55e560b523cc5ecaa7;hb=f7b8e526e024ce141e61633e966255400de67772;hpb=9c9ca6d67ecb4d929b7239cadbd79db649bdf8c6
diff --git a/doc/html/ada/terminal_interface-curses-trace__ads.htm b/doc/html/ada/terminal_interface-curses-trace__ads.htm
index 0d7cff95..0660c14f 100644
--- a/doc/html/ada/terminal_interface-curses-trace__ads.htm
+++ b/doc/html/ada/terminal_interface-curses-trace__ads.htm
@@ -3,7 +3,6 @@
File : terminal_interface-curses-trace.ads
-
------------------------------------------------------------------------------
-- --
-- GNAT ncurses Binding --
@@ -45,28 +44,28 @@
-- Binding Version 01.00
------------------------------------------------------------------------------
-package Terminal_Interface.Curses.Trace is
- pragma Preelaborate (Terminal_Interface.Curses.Trace);
+package Terminal_Interface.Curses.Trace is
+ pragma Preelaborate (Terminal_Interface.Curses.Trace);
pragma Warnings (Off);
- type Trace_Attribute_Set is
+ type Trace_Attribute_Set is
record
- Times : Boolean;
- Tputs : Boolean;
- Update : Boolean;
- Cursor_Move : Boolean;
- Character_Output : Boolean;
- Calls : Boolean;
- Virtual_Puts : Boolean;
- Input_Events : Boolean;
- TTY_State : Boolean;
- Internal_Calls : Boolean;
- Character_Calls : Boolean;
- Termcap_TermInfo : Boolean;
+ Times : Boolean;
+ Tputs : Boolean;
+ Update : Boolean;
+ Cursor_Move : Boolean;
+ Character_Output : Boolean;
+ Calls : Boolean;
+ Virtual_Puts : Boolean;
+ Input_Events : Boolean;
+ TTY_State : Boolean;
+ Internal_Calls : Boolean;
+ Character_Calls : Boolean;
+ Termcap_TermInfo : Boolean;
end record;
- pragma Convention (C, Trace_Attribute_Set);
+ pragma Convention (C, Trace_Attribute_Set);
- for Trace_Attribute_Set use
+ for Trace_Attribute_Set use
record
Times at 0 range 0 .. 0;
Tputs at 0 range 1 .. 1;
@@ -81,22 +80,22 @@
Character_Calls at 0 range 10 .. 10;
Termcap_TermInfo at 0 range 11 .. 11;
end record;
- for Trace_Attribute_Set'Size use 32;
+ for Trace_Attribute_Set'Size use 32;
-- Please note: this rep. clause is generated and may be
-- different on your system.
pragma Warnings (On);
- Trace_Disable : constant Trace_Attribute_Set := (others => False);
+ Trace_Disable : constant Trace_Attribute_Set := (others => False);
- Trace_Ordinary : constant Trace_Attribute_Set :=
- (Times => True,
- Tputs => True,
- Update => True,
- Cursor_Move => True,
- Character_Output => True,
- others => False);
- Trace_Maximum : constant Trace_Attribute_Set := (others => True);
+ Trace_Ordinary : constant Trace_Attribute_Set :=
+ (Times => True,
+ Tputs => True,
+ Update => True,
+ Cursor_Move => True,
+ Character_Output => True,
+ others => False);
+ Trace_Maximum : constant Trace_Attribute_Set := (others => True);
------------------------------------------------------------------------------
@@ -105,15 +104,15 @@
-- |=====================================================================
-- #1A NAME="AFU_1"#2|
- procedure Trace_On (x : Trace_Attribute_Set);
+ procedure Trace_On (x : Trace_Attribute_Set);
-- The debugging library has trace.
-- #1A NAME="AFU_2"#2|
- procedure Trace_Put (str : String);
+ procedure Trace_Put (str : String);
-- AKA: _tracef()
- Current_Trace_Setting : Trace_Attribute_Set;
- pragma Import (C, Current_Trace_Setting, "_nc_tracing");
+ Current_Trace_Setting : Trace_Attribute_Set;
+ pragma Import (C, Current_Trace_Setting, "_nc_tracing");
-end Terminal_Interface.Curses.Trace;
+end Terminal_Interface.Curses.Trace;