Fix WinMain calling convention.

diff --git a/src/cmp/cmpmain.lsp b/src/cmp/cmpmain.lsp
index c11a7f7..6476eeb 100644 (file)
--- a/src/cmp/cmpmain.lsp
+++ b/src/cmp/cmpmain.lsp
@@ -394,7 +394,7 @@ main(int argc, char **argv)
 #+windows
 (defconstant +lisp-program-winmain+ "
 #include <windows.h>
-int
+int WINAPI
 WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow)
 { 
   char **argv;