xxx

cobc/cobc.c

@@ -9313,7 +9313,9 @@ process_file (struct filename *fn, int status)
 		/* These lines should only be added with -MP */
 		if (cb_depend_add_phony){
 			for (l = cb_depend_list; l; l = l->next) {
+				char* filename = cobc_slashify (l->text);
 				fprintf (file, "%s:\n", l->text);
+				cobc_free (filename);
 			}
 		}
 		if (!cb_depend_file){

cobc/error.c

@@ -63,11 +63,8 @@ size_t				cb_msg_style;
 
 DECLNORET static void		cobc_too_many_errors (void) COB_A_NORETURN;
 
-/* Returns the argument with backslashes replaced by slashes
-in filenames. Second argument explains whether the result should be
-set in place or reallocated.
-
-Note that all Windows system calls accept slashes
+/* Returns a copy of the argument with backslashes replaced by slashes
+in filenames. Note that all Windows system calls accept slashes
 instead of backslashes. Only a few tools force the use of slashes,
 such as the cmd shell. */
 char *
@@ -92,6 +89,8 @@ print_error_prefix (const char *file, int line, const char *prefix)
 {
 	if (file) {
 		char *absfile = NULL ;
+		char *tmpfile = cobc_slashify (file);
+		file = tmpfile;
 		if (cb_diagnostics_absolute_paths
 		 && strcmp (file, COB_DASH) != 0
 		 && file[0] != '/'
@@ -125,6 +124,7 @@ print_error_prefix (const char *file, int line, const char *prefix)
 			fprintf (stderr, "%s:%d: ", file, line);
 		}
 		if (absfile) cobc_free (absfile);
+		cobc_free (tmpfile);
 	}
 	if (prefix) {
 		fprintf (stderr, "%s", prefix);

cobc/pplex.l

@@ -1298,7 +1298,7 @@ ppopen_get_file (const char *name)
 	ppin = fopen (name, "rb");
 #endif
 	if (!ppin) {
-		cb_error ("%s: %s", name, cb_get_strerror ());
+		cb_error ("%s: %s", cobc_slashify (name), cb_get_strerror ());
 		/* Note: postpone error exit as we need the saved buffers later on */
 		return 0;
 	}