remove debug things

948f49f1 · Mart Lubbers · 1b85b495 · 948f49f1
Commit 948f49f1 authored Mar 21, 2017 by Mart Lubbers
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

iTasksTTY.icl iTasksTTY.icl +1 -1

No files found.
--- a/iTasksTTY.icl
+++ b/iTasksTTY.icl
@@ -86,7 +86,7 @@ serialDeviceBackgroundTask enc dec rw iworld

 		(Ok (r,s,ss), iworld)
 		# (Just (TTYd tty bgid)) = iworld.resources
-		# tty = foldr TTYwrite tty $ map enc s
+		# tty = foldr TTYwrite tty $ reverse $ map enc s
 		# (ml, tty) = case TTYavailable tty of
 			(False, tty) = ([], tty)
 			(_, tty) = appFst (pure o dec) $ TTYreadline tty