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=1292ae8109c9f10ca9cd7cc056a8f8af323606f1;hp=35d4531c680c2cafad7e6d1347da11e428b7581c;hb=02c4e383be9337e73a0e75844dfd1047745adb28;hpb=34d602f272c394e9a980438e636e1ce4d355f83b diff --git a/doc/html/ada/terminal_interface-curses-trace__ads.htm b/doc/html/ada/terminal_interface-curses-trace__ads.htm index 35d4531c..1292ae81 100644 --- a/doc/html/ada/terminal_interface-curses-trace__ads.htm +++ b/doc/html/ada/terminal_interface-curses-trace__ads.htm @@ -56,7 +56,7 @@ -- Binding Version 01.00 ------------------------------------------------------------------------------ -package Terminal_Interface.Curses.Trace is +package Terminal_Interface.Curses.Trace is pragma Preelaborate (Terminal_Interface.Curses.Trace); type Trace_Attribute_Set is @@ -79,35 +79,35 @@ for Trace_Attribute_Set use record - Times at 0 range Curses_Constants.TRACE_TIMES_First - .. Curses_Constants.TRACE_TIMES_Last; - Tputs at 0 range Curses_Constants.TRACE_TPUTS_First - .. Curses_Constants.TRACE_TPUTS_Last; - Update at 0 range Curses_Constants.TRACE_UPDATE_First - .. Curses_Constants.TRACE_UPDATE_Last; - 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 - .. Curses_Constants.TRACE_CHARPUT_Last; - Calls at 0 range Curses_Constants.TRACE_CALLS_First - .. Curses_Constants.TRACE_CALLS_Last; - 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 - .. Curses_Constants.TRACE_IEVENT_Last; - 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 - .. Curses_Constants.TRACE_ICALLS_Last; - 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 - .. Curses_Constants.TRACE_DATABASE_Last; - Attribute_Color at 0 range Curses_Constants.TRACE_ATTRS_First - .. Curses_Constants.TRACE_ATTRS_Last; + Times at 0 range Curses_Constants.TRACE_TIMES_First + .. Curses_Constants.TRACE_TIMES_Last; + Tputs at 0 range Curses_Constants.TRACE_TPUTS_First + .. Curses_Constants.TRACE_TPUTS_Last; + Update at 0 range Curses_Constants.TRACE_UPDATE_First + .. Curses_Constants.TRACE_UPDATE_Last; + 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 + .. Curses_Constants.TRACE_CHARPUT_Last; + Calls at 0 range Curses_Constants.TRACE_CALLS_First + .. Curses_Constants.TRACE_CALLS_Last; + 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 + .. Curses_Constants.TRACE_IEVENT_Last; + 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 + .. Curses_Constants.TRACE_ICALLS_Last; + 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 + .. Curses_Constants.TRACE_DATABASE_Last; + 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); @@ -128,11 +128,11 @@ -- |===================================================================== -- #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;