TEST: Oldes/Rebol-issues#1415

Oldes · Oldes · commit 986f87bfb2e2 · 2022-07-07T12:48:22.000+02:00
diff --git a/src/tests/units/lexer-test.r3 b/src/tests/units/lexer-test.r3
@@ -79,6 +79,10 @@ Rebol [
 	;@@ https://github.com/Oldes/Rebol-issues/issues/863
 		--assert all [error? e: try [load {#[path! [0]]}] e/id = 'malconstruct]
 
+	--test-- "Invalid file"
+	;@@ https://github.com/Oldes/Rebol-issues/issues/1415
+		--assert all [error? e: try [load {%^^}] e/id = 'invalid]
+
 ===end-group===
 
 ===start-group=== "Special % word"
diff --git a/src/tests/units/mold-test.r3 b/src/tests/units/mold-test.r3
@@ -211,6 +211,8 @@ Rebol [
 			f2: try [load mold f1: append copy %a to char! i]
 			--assert f1 == f2
 		]
+		;@@ https://github.com/Oldes/Rebol-issues/issues/1415
+		--assert "%%5E" == mold to-file "^^"
 
 ===end-group=== 
 

Original file line number	Diff line number	Diff line change
`@@ -211,6 +211,8 @@ Rebol [`
`211`	`211`	`f2: try [load mold f1: append copy %a to char! i]`
`212`	`212`	`--assert f1 == f2`
`213`	`213`	`]`
	`214`	`+ ;@@ https://github.com/Oldes/Rebol-issues/issues/1415`
	`215`	`+ --assert "%%5E" == mold to-file "^^"`
`214`	`216`
`215`	`217`	`===end-group===`
`216`	`218`