file-handles: close the second handle

typeclasses · Oct 21, 2019 · f4ff15e · f4ff15e
1 parent d7658dd
commit f4ff15e
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/file-handles.hs b/file-handles.hs
@@ -24,4 +24,6 @@ main =
     atEnd <- hIsEOF h
     putStrLn (show atEnd)
 
+    hClose h
+
     removeFile "hello.txt"