X-Git-Url: https://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses__adb.htm;h=4c676de93f9198599e1e4a2a8a45b51a181c593e;hp=fe61959f7bcd594d230af0cc8ada4481d59389a4;hb=f86cbeb5f9bd96ab041d34039c35749a14965039;hpb=90ffd624948c543a457324ee777717e4130f2ad2 diff --git a/doc/html/ada/terminal_interface-curses__adb.htm b/doc/html/ada/terminal_interface-curses__adb.htm index fe61959f..4c676de9 100644 --- a/doc/html/ada/terminal_interface-curses__adb.htm +++ b/doc/html/ada/terminal_interface-curses__adb.htm @@ -47,8 +47,8 @@ with System; with Terminal_Interface.Curses.Aux; -with Interfaces.C; use Interfaces.C; -with Interfaces.C.Strings; use Interfaces.C.Strings; +with Interfaces.C; use Interfaces.C; +with Interfaces.C.Strings; use Interfaces.C.Strings; with Ada.Characters.Handling; use Ada.Characters.Handling; with Ada.Strings.Fixed; @@ -1706,7 +1706,7 @@ if N > Str'Length then raise Constraint_Error; end if; - Txt (0) := Interfaces.C.char'First; + Txt (0) := Interfaces.C.char'First; if Winnstr (Win, Txt, C_Int (N)) = Curses_Err then raise Curses_Exception; end if; @@ -1796,7 +1796,7 @@ if N > Str'Length then raise Constraint_Error; end if; - Txt (0) := Interfaces.C.char'First; + Txt (0) := Interfaces.C.char'First; if Wgetnstr (Win, Txt, C_Int (N)) = Curses_Err then raise Curses_Exception; end if;