#include "event-receiver.h"
#include "gsubr.h"
#include "keycodes.h"
+#include "wrapped.h"
using namespace irr;
SEvent_EventType (SCM event)
{
return scm_from_event_type
- (((SEvent*)scm_to_pointer (event))->EventType);
+ (((SEvent*)scm_to_irr_pointer (event))->EventType);
}
SCM
SEvent_SGUIEvent_Caller (SCM event)
{
gui::IGUIElement* caller =
- ((SEvent*)scm_to_pointer (event))->GUIEvent.Caller;
+ ((SEvent*)scm_to_irr_pointer (event))->GUIEvent.Caller;
return scm_from_pointer ((void*)caller, NULL);
}
SEvent_SGUIEvent_EventType (SCM event)
{
return scm_from_gui_event_type
- (((SEvent*)scm_to_pointer (event))->GUIEvent.EventType);
+ (((SEvent*)scm_to_irr_pointer (event))->GUIEvent.EventType);
}
SCM
SEvent_SKeyInput_Key (SCM event)
{
return scm_from_key_code
- (((SEvent*)scm_to_pointer (event))->KeyInput.Key);
+ (((SEvent*)scm_to_irr_pointer (event))->KeyInput.Key);
}
SCM
SEvent_SKeyInput_PressedDown (SCM event)
{
return scm_from_bool
- (((SEvent*)scm_to_pointer (event))->KeyInput.PressedDown);
+ (((SEvent*)scm_to_irr_pointer (event))->KeyInput.PressedDown);
}
void