X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=src%2Fevent-receiver.h;h=b85efd4eabb4f5097131babcfab5caac58fa04be;hb=c9c098c6a9363eb59f435eb195a4bc5b9098b1dd;hp=3b1cd7283c7f6809ce5c465745db81935a163700;hpb=a07c344063e6dca568add5f022c7aab495061d11;p=guile-irrlicht.git

diff --git a/src/event-receiver.h b/src/event-receiver.h
index 3b1cd72..b85efd4 100644
--- a/src/event-receiver.h
+++ b/src/event-receiver.h
@@ -38,7 +38,19 @@ extern "C" {
                         event_p, wrap_event, unwrap_event);
 
   SCM
-  event_type (SCM event);
+  get_event_gui_caller (SCM event);
+
+  SCM
+  get_event_gui_type (SCM event);
+
+  SCM
+  get_event_key_input_key (SCM event);
+
+  SCM
+  get_event_key_input_pressed (SCM event);
+
+  SCM
+  get_event_type (SCM event);
 
   SCM
   make_event_receiver (SCM proc_on_event);
@@ -46,6 +58,9 @@ extern "C" {
   SCM
   scm_from_event_type (irr::EEVENT_TYPE event_type);
 
+  SCM
+  scm_from_gui_event_type (irr::gui::EGUI_EVENT_TYPE gui_event_type);
+
 }
 
 #endif