FIX: forcing DELINE to convert CRLF to LF in header file emitter scri…

…pts to be compatible with previous changes where READ does not do that now.
Oldes · Jan 16, 2019 · 7700920 · 7700920
1 parent d08f835
commit 7700920
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/src/tools/make-os-ext.r b/src/tools/make-os-ext.r
@@ -119,7 +119,7 @@ func-header: [
 process: func [file] [
 	if verbose [?? file]
 	data: read the-file: file
-	data: to-string data ; R3
+	data: deline to-string data ; R3
 	parse/all data [
 		any func-header
 	]

diff --git a/src/tools/make-reb-lib.r b/src/tools/make-reb-lib.r
@@ -164,15 +164,15 @@ func-header: [
 ]
 
 write-if: func [file data] [
-	if data <> attempt [to string! read file][ ;R3
+	if data <> attempt [deline to string! read file][ ;R3
 		print ["UPDATE:" file]
 		write file data
 	]
 ]
 
 process: func [file] [
 	if verbose [?? file]
-	data: to string! read the-file: file ;R3
+	data: deline to string! read the-file: file ;R3
 	parse/all data [
 		any func-header
 	]