diff --git a/demo/win32/window.exw b/demo/win32/window.exw
index 1faeeafa..68260e8f 100644
--- a/demo/win32/window.exw
+++ b/demo/win32/window.exw
@@ -74,9 +74,9 @@ procedure WinMain()
 	atom hwnd
 	atom icon_handle
 
-	atom wndclass = allocate(SIZE_OF_WNDCLASS,1)
-	atom msg = allocate(SIZE_OF_MESSAGE,1)
-	atom szAppName = allocate_string("HelloWin",1)
+	atom wndclass = allocate(SIZE_OF_WNDCLASS)
+	atom msg = allocate(SIZE_OF_MESSAGE)
+	atom szAppName = allocate_string("HelloWin")
 
 	atom id = routine_id("WndProc")
 	if id = -1 then
diff --git a/demo/win32/winwire.exw b/demo/win32/winwire.exw
index 53c97c04..ee4d6899 100644
--- a/demo/win32/winwire.exw
+++ b/demo/win32/winwire.exw
@@ -447,8 +447,8 @@ end function
 procedure WinMain()
 -- main routine 
 
-	atom wndclass = allocate(SIZE_OF_WNDCLASS,1)
-	atom msg = allocate(SIZE_OF_MESSAGE,1)
+	atom wndclass = allocate(SIZE_OF_WNDCLASS)
+	atom msg = allocate(SIZE_OF_MESSAGE)
 	atom szAppName = allocate_string("HelloWin")
 
 	integer id = routine_id("WndProc")