+(define-method (get-event-gui-caller (event <event>))
+ (let ((SGUIEvent_Caller (get-irrlicht-proc "SGUIEvent_Caller" event)))
+ (SGUIEvent_Caller event)))
+
+(define-method (get-event-gui-type (event <event>))
+ (let ((SGUIEvent_EventType (get-irrlicht-proc "SGUIEvent_EventType" event)))
+ (SGUIEvent_EventType event)))
+