Adjustments for WinMain on Win32/Cygwin

OCamlPro · Feb 15, 2025 · d385884 · d385884 · GitMensch · Feb 15, 2025
1 parent dc450d2
commit d385884
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/cobc/ChangeLog b/cobc/ChangeLog
@@ -12,7 +12,7 @@
 	  internally disabling it for generation of libraries/executable after
 	  first program as we only need that code once, fixing Win32 build errors
 	  and duplication warnings in other environments
-	* flag.def: don't suppress the help of -fwinmain under Win32
+	* flag.def: don't suppress the help of -fwinmain under Win32 and Cygwin
 	* typeck.c (build_expr_finish): use fallback error position token, fixing
 	  compiler aborts on broken expressions, bugs #933, #938 and #966
 	* typeck.c: minor refactoring within functions

diff --git a/cobc/flag.def b/cobc/flag.def
@@ -109,7 +109,7 @@ CB_FLAG_NQ (1, "default-file-colseq", CB_FLAG_GETOPT_DEFAULT_FILE_COLSEQ,
 CB_FLAG (cb_flag_sql_xfd, 1, "sql",
 	_("  -fsql                 process the XFD directives"))
 
-#ifdef _WIN32
+#if defined (_WIN32) || defined (__CYGWIN__)
 #define COB_SHOW 1
 #else
 #define COB_SHOW 0