diff --git a/include/Mw/MachDep.h b/include/Mw/MachDep.h
index f00a119..ecc7bc0 100644
--- a/include/Mw/MachDep.h
+++ b/include/Mw/MachDep.h
@@ -67,6 +67,7 @@
 #include <View.h>
 #include <Screen.h>
 #include <Application.h>
+#include <Locker.h>
 #endif
 
 #ifdef __APPLE__
diff --git a/src/backend/haiku.cxx b/src/backend/haiku.cxx
index 948c2d5..292040f 100644
--- a/src/backend/haiku.cxx
+++ b/src/backend/haiku.cxx
@@ -5,6 +5,8 @@ void MwApplication::ReadyToRun(){
 }
 
 void MwApplication::Pulse(){
+	this->locker->Lock();
+	this->locker->Unlock();
 }
 
 MwApplication::MwApplication(BRect rc, MwLL handle) : BApplication("application/milsko-generic") {
@@ -22,12 +24,14 @@ MwApplication::MwApplication(BRect rc, MwLL handle) : BApplication("application/
 	handle->haiku.view = new BView(this->window->Bounds(), NULL, B_FOLLOW_ALL_SIDES, B_WILL_DRAW);
 
 	this->ready = 0;
+	this->locker = new BLocker();
 
 	delete scr;
 }
 
 MwApplication::~MwApplication(){
 	delete this->window;
+	delete this->locker;
 }
 
 MwLL MwLLCreateImpl(MwLL parent, int x, int y, int width, int height) {