X-Git-Url: http://ncurses.scripts.mit.edu/?a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses-termcap__adb.htm;h=3a82187099feb2b6c2367d9f252537f340a34f72;hb=29ee95cea37c4bbf2014a35677d9a0750c6b52a8;hp=27b23024d3b6172222057ada46dddef27e6c02ce;hpb=f6718d80c998008de6cfe8e6296bee3958ff86d7;p=ncurses.git
diff --git a/doc/html/ada/terminal_interface-curses-termcap__adb.htm b/doc/html/ada/terminal_interface-curses-termcap__adb.htm
index 27b23024..3a821870 100644
--- a/doc/html/ada/terminal_interface-curses-termcap__adb.htm
+++ b/doc/html/ada/terminal_interface-curses-termcap__adb.htm
@@ -12,7 +12,7 @@
-- B O D Y --
-- --
------------------------------------------------------------------------------
--- Copyright (c) 2000-2004,2006 Free Software Foundation, Inc. --
+-- Copyright (c) 2000-2006,2009 Free Software Foundation, Inc. --
-- --
-- Permission is hereby granted, free of charge, to any person obtaining a --
-- copy of this software and associated documentation files (the --
@@ -40,8 +40,8 @@
------------------------------------------------------------------------------
-- Author: Juergen Pfeifer, 1996
-- Version Control:
--- @Revision: 1.11 @
--- @Date: 2006/06/25 14:30:22 @
+-- @Revision: 1.12 @
+-- @Date: 2009/12/26 17:38:58 @
-- Binding Version 01.00
------------------------------------------------------------------------------
@@ -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;
@@ -87,7 +87,7 @@
end Get_Flag;
------------------------------------------------------------------------------
- procedure Get_Number (Name : in String;
+ procedure Get_Number (Name : String;
Value : out Integer;
Result : out Boolean)
is