FEAT: added unit test for QUERY on INPUT port

Oldes · Nov 21, 2018 · b1f770a · b1f770a
1 parent d443cb1
commit b1f770a
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/src/tests/units/port-test.r3 b/src/tests/units/port-test.r3
@@ -20,4 +20,11 @@ Rebol [
 		--assert  not error? [delete %port-issue-2320/]
 ===end-group===
 
+===start-group=== "console port"
+	--test-- "query input port"
+		--assert  port? system/ports/input
+		--assert  object? console-info: query system/ports/input
+		?? console-info
+===end-group===
+
 ~~~end-file~~~