summaryrefslogtreecommitdiff
path: root/testsuite/tests/lib/IOExts/echo001.stdout
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/lib/IOExts/echo001.stdout')
-rw-r--r--testsuite/tests/lib/IOExts/echo001.stdout14
1 files changed, 14 insertions, 0 deletions
diff --git a/testsuite/tests/lib/IOExts/echo001.stdout b/testsuite/tests/lib/IOExts/echo001.stdout
new file mode 100644
index 0000000000..a9d7699954
--- /dev/null
+++ b/testsuite/tests/lib/IOExts/echo001.stdout
@@ -0,0 +1,14 @@
+False
+MODULE MAIN(MAIN) WHERE
+
+IMPORT SYSTEM.IO
+IMPORT DATA.CHAR
+
+MAIN = DO
+ IST <- HISTERMINALDEVICE STDIN
+ FLG <- IF NOT IST THEN RETURN FALSE ELSE HGETECHO STDIN
+ PRINT FLG
+ IF NOT IST THEN HSETECHO STDIN FALSE ELSE RETURN ()
+ HSETBUFFERING STDIN NOBUFFERING
+ INTERACT (MAP TOUPPER)
+