diff --git a/bepascal/source/bepascal/cpp/src/be/app/Application.cpp b/bepascal/source/bepascal/cpp/src/be/app/Application.cpp
index 5a94a19..0608dcb 100644
--- a/bepascal/source/bepascal/cpp/src/be/app/Application.cpp
+++ b/bepascal/source/bepascal/cpp/src/be/app/Application.cpp
@@ -193,7 +193,7 @@ TCPlusObject BApplication_Create_3(TPasObject PasObject, const char *Signature,
 
 void BApplication_Free(TCPlusObject Application)
 {
-	delete Application;
+	delete reinterpret_cast<BPApplication*>(Application);
 }
 
 void BApplication_HideCursor(TCPlusObject Application)
diff --git a/bepascal/source/bepascal/cpp/src/be/app/Message.cpp b/bepascal/source/bepascal/cpp/src/be/app/Message.cpp
index 8e145da..9d7f07b 100644
--- a/bepascal/source/bepascal/cpp/src/be/app/Message.cpp
+++ b/bepascal/source/bepascal/cpp/src/be/app/Message.cpp
@@ -77,7 +77,7 @@ TCPlusObject BMessage_Create_2(TPasObject PasObject, uint32 what)
 
 void BMessage_Free(TCPlusObject message)
 {
-	delete message;
+	delete reinterpret_cast<BPMessage*>(message);
 }
 
 uint32 BMessage_Getwhat(TCPlusObject message)
diff --git a/bepascal/source/bepascal/cpp/src/be/app/Roster.cpp b/bepascal/source/bepascal/cpp/src/be/app/Roster.cpp
index 32c036f..16bab20 100644
--- a/bepascal/source/bepascal/cpp/src/be/app/Roster.cpp
+++ b/bepascal/source/bepascal/cpp/src/be/app/Roster.cpp
@@ -42,7 +42,7 @@ TCPlusObject BRoster_Create(TPasObject PasObject)
 
 void BRoster_Destroy(TPasObject PasObject)
 {
-	delete PasObject;
+	delete reinterpret_cast<BRoster*>(PasObject);
 }
 
 //status_t BRoster_Broadcast(TCPlusObject Roster, TCPlusObject *message)