X-Git-Url: http://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses-mouse__adb.htm;h=a248a7b0a36d5bbee45abdb009d2c4a993eb37b4;hp=522656805e8b1bdfd1441e84045a199368797df1;hb=3ec8f79f3ceda990461c80de2f96d66b886e00d5;hpb=3faafb2efcc426a48649c12943d5006cae12cff1 diff --git a/doc/html/ada/terminal_interface-curses-mouse__adb.htm b/doc/html/ada/terminal_interface-curses-mouse__adb.htm index 52265680..a248a7b0 100644 --- a/doc/html/ada/terminal_interface-curses-mouse__adb.htm +++ b/doc/html/ada/terminal_interface-curses-mouse__adb.htm @@ -60,7 +60,7 @@ function Mouse_Avail return C_Int; pragma Import (C, Mouse_Avail, "_nc_has_mouse"); begin - if Has_Key (Key_Mouse) or else Mouse_Avail /= 0 then + if Has_Key (Key_Mouse) or else Mouse_Avail /= 0 then return True; else return False; @@ -123,7 +123,7 @@ begin R := MMask (Mask, Old'Access); if R = No_Events then - Beep; + Beep; end if; return Old; end Start_Mouse; @@ -132,7 +132,7 @@ is begin if Mask /= No_Events then - Beep; + Beep; end if; end End_Mouse; @@ -199,15 +199,15 @@ end if; end Unget_Mouse; - function Enclosed_In_Window (Win : Window := Standard_Window; + function Enclosed_In_Window (Win : Window := Standard_Window; Event : Mouse_Event) return Boolean is function Wenclose (Win : Window; Y : C_Int; X : C_Int) - return Curses_Bool; + return Curses_Bool; pragma Import (C, Wenclose, "wenclose"); begin if Wenclose (Win, C_Int (Event.Y), C_Int (Event.X)) - = Curses_Bool_False then + = Curses_Bool_False then return False; else return True;