Skip to content

Commit 0ff7ae0

Browse files
committed
1 parent 4dff723 commit 0ff7ae0

File tree

1 file changed

+9
-0
lines changed

1 file changed

+9
-0
lines changed

src/tests/units/evaluation-test.r3

+9
Original file line numberDiff line numberDiff line change
@@ -192,6 +192,15 @@ Rebol [
192192
b: [["OK"]]
193193
--assert ["OK"] == do first [b/1]
194194

195+
--test-- "do-path-3"
196+
;@@ https://github.com/Oldes/Rebol-issues/issues/1434
197+
a: [[1 + 2]] b: [a a/1]
198+
--assert [[1 + 2]] = do first b
199+
--assert [1 + 2] = do second b
200+
b: ['a 'a/1]
201+
--assert word? do first b
202+
--assert path? do second b
203+
195204
===end-group===
196205

197206
===start-group=== "attempt"

0 commit comments

Comments
 (0)