Package Name: event_handlers

Return to: Package List

-- =============================================================================
-- File    : event_handlers.ads                                                =
-- Project : AMAF                                                              =
-- Version : 1.1.1                                                             =
-- Author  : M. A. van der Lugt                                                =
--                                                                             =
-- Copyright 1996 Marinus A. van der Lugt                                      =
--                                                                             =
-- History :                                                                   =
-- ----------------------------------------------------------------------------=


-- =============================================================================

-- MacOS bindings


with Events ;
-- =============================================================================
package Event_Handlers is


-- =============================================================================

procedure Handle_Mouse_Down       (Event : in Events.EventRecord) ;

procedure Handle_Mouse_Up         (Event : in Events.EventRecord) ;

procedure Handle_Key_Down         (Event : in Events.EventRecord) ;

procedure Handle_Key_Up           (Event : in Events.EventRecord) ;

procedure Handle_Auto_Key         (Event : in Events.EventRecord) ;

procedure Handle_Update_Event     (Event : in Events.EventRecord) ;

procedure Handle_Activate_Event   (Event : in Events.EventRecord) ;

procedure Handle_Disk_Event       (Event : in Events.EventRecord) ;

procedure Handle_Os_Event         (Event : in Events.EventRecord) ;


procedure Handle_High_Level_Event (Event : in Events.EventRecord) ;
end Event_Handlers ;