X-Git-Url: https://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses-trace__ads.htm;h=136c93fc91afc44129a993d5aea365fa4c96f8af;hp=1292ae8109c9f10ca9cd7cc056a8f8af323606f1;hb=a90dd7b66fa711acd24d8181ea20e4f57d4b36cd;hpb=db5f7f4f146a91ba8ec7f1df8e9d7f9d2d7c74fd;ds=sidebyside
diff --git a/doc/html/ada/terminal_interface-curses-trace__ads.htm b/doc/html/ada/terminal_interface-curses-trace__ads.htm
index 1292ae81..136c93fc 100644
--- a/doc/html/ada/terminal_interface-curses-trace__ads.htm
+++ b/doc/html/ada/terminal_interface-curses-trace__ads.htm
@@ -24,7 +24,8 @@
-
+
+
@@ -52,74 +53,74 @@
-
+
-package Terminal_Interface.Curses.Trace is
- pragma Preelaborate (Terminal_Interface.Curses.Trace);
+package Terminal_Interface.Curses.Trace is
+ pragma Preelaborate (Terminal_Interface.Curses.Trace);
- 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;
- Attribute_Color : 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;
+ Attribute_Color : Boolean;
end record;
- pragma Convention (C_Pass_By_Copy, Trace_Attribute_Set);
+ pragma Convention (C_Pass_By_Copy, Trace_Attribute_Set);
- for Trace_Attribute_Set use
+ for Trace_Attribute_Set use
record
- Times at 0 range Curses_Constants.TRACE_TIMES_First
+ Times at 0 range Curses_Constants.TRACE_TIMES_First
.. Curses_Constants.TRACE_TIMES_Last;
- Tputs at 0 range Curses_Constants.TRACE_TPUTS_First
+ Tputs at 0 range Curses_Constants.TRACE_TPUTS_First
.. Curses_Constants.TRACE_TPUTS_Last;
- Update at 0 range Curses_Constants.TRACE_UPDATE_First
+ Update at 0 range Curses_Constants.TRACE_UPDATE_First
.. Curses_Constants.TRACE_UPDATE_Last;
- Cursor_Move at 0 range Curses_Constants.TRACE_MOVE_First
+ Cursor_Move at 0 range Curses_Constants.TRACE_MOVE_First
.. Curses_Constants.TRACE_MOVE_Last;
- Character_Output at 0 range Curses_Constants.TRACE_CHARPUT_First
+ Character_Output at 0 range Curses_Constants.TRACE_CHARPUT_First
.. Curses_Constants.TRACE_CHARPUT_Last;
- Calls at 0 range Curses_Constants.TRACE_CALLS_First
+ Calls at 0 range Curses_Constants.TRACE_CALLS_First
.. Curses_Constants.TRACE_CALLS_Last;
- Virtual_Puts at 0 range Curses_Constants.TRACE_VIRTPUT_First
+ Virtual_Puts at 0 range Curses_Constants.TRACE_VIRTPUT_First
.. Curses_Constants.TRACE_VIRTPUT_Last;
- Input_Events at 0 range Curses_Constants.TRACE_IEVENT_First
+ Input_Events at 0 range Curses_Constants.TRACE_IEVENT_First
.. Curses_Constants.TRACE_IEVENT_Last;
- TTY_State at 0 range Curses_Constants.TRACE_BITS_First
+ TTY_State at 0 range Curses_Constants.TRACE_BITS_First
.. Curses_Constants.TRACE_BITS_Last;
- Internal_Calls at 0 range Curses_Constants.TRACE_ICALLS_First
+ Internal_Calls at 0 range Curses_Constants.TRACE_ICALLS_First
.. Curses_Constants.TRACE_ICALLS_Last;
- Character_Calls at 0 range Curses_Constants.TRACE_CCALLS_First
+ Character_Calls at 0 range Curses_Constants.TRACE_CCALLS_First
.. Curses_Constants.TRACE_CCALLS_Last;
- Termcap_TermInfo at 0 range Curses_Constants.TRACE_DATABASE_First
+ Termcap_TermInfo at 0 range Curses_Constants.TRACE_DATABASE_First
.. Curses_Constants.TRACE_DATABASE_Last;
- Attribute_Color at 0 range Curses_Constants.TRACE_ATTRS_First
+ Attribute_Color at 0 range Curses_Constants.TRACE_ATTRS_First
.. Curses_Constants.TRACE_ATTRS_Last;
end record;
pragma Warnings (Off);
- for Trace_Attribute_Set'Size use Curses_Constants.Trace_Size;
+ for Trace_Attribute_Set'Size use Curses_Constants.Trace_Size;
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,
+ 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_Maximum : constant Trace_Attribute_Set := (others => True);
@@ -127,16 +128,16 @@
-
- procedure Trace_On (x : Trace_Attribute_Set);
+
+ procedure Trace_On (x : Trace_Attribute_Set);
-
- procedure Trace_Put (str : String);
+
+ procedure Trace_Put (str : String);
- 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;