X-Git-Url: https://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses-termcap__adb.htm;h=3a82187099feb2b6c2367d9f252537f340a34f72;hp=f409dda05b35f592c160708288fa7e26af27e06e;hb=9776951416d7fb862b9dca1f4c9f8031a5c9059b;hpb=77afe78361875f531dc2bf8d73f2e781c8e76176 diff --git a/doc/html/ada/terminal_interface-curses-termcap__adb.htm b/doc/html/ada/terminal_interface-curses-termcap__adb.htm index f409dda0..3a821870 100644 --- a/doc/html/ada/terminal_interface-curses-termcap__adb.htm +++ b/doc/html/ada/terminal_interface-curses-termcap__adb.htm @@ -46,8 +46,8 @@ ------------------------------------------------------------------------------ with Terminal_Interface.Curses.Aux; use 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; package body Terminal_Interface.Curses.Termcap is @@ -64,7 +64,7 @@ To_C (Name, NameTxt, Length); result := tgetent (char_array (ignored), NameTxt); if result = -1 then - raise Curses_Exception; + raise Curses_Exception; else return Boolean'Val (result); end if;