Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

*. Enhanced Problem 102 visualization. #gc

  • Loading branch information...
commit 0874eee6132ac125b415c2545edb0134cf06fd5d 1 parent fed8c0c
@dmw authored
Showing with 3 additions and 0 deletions.
  1. +3 −0  src/problem102.hs
View
3  src/problem102.hs
@@ -140,6 +140,7 @@ handlerIOError e = putStrLn (printf "IOError: %s" $ show e)
>> exitFailure
+
mainGl :: IO ()
mainGl = do [x,y,z] <- getArgs
inp <- readFile x
@@ -156,6 +157,8 @@ mainGl = do [x,y,z] <- getArgs
mainLoop
+
main :: IO ()
main = mainGl `catch` handlerIOError
+
Please sign in to comment.
Something went wrong with that request. Please try again.