Skip to content

GitLab

Commit 948f49f1 authored by Mart Lubbers's avatar Mart Lubbers
Browse files

remove debug things

parent 1b85b495
Hide whitespace changes
Inline Side-by-side
Showing with 1 addition and 1 deletion
iTasksTTY.icl
View file @ 948f49f1
......@@ -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
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment