A patch to run monadius on Haskell Platform 2012.2.0.0 for Mac OS X

README

The author of monadius is @nushio.
You can download monadius from following URL.

http://www.geocities.jp/takascience/haskell/monadius_en.html
http://www.geocities.jp/takascience/haskell/monadius_ja.html

monadius.patch

diff -ur monadius.orig/src/main.hs monadius/src/main.hs
--- monadius.orig/src/main.hs	2005-06-04 17:31:48.000000000 +0900
+++ monadius/src/main.hs	2012-07-01 19:01:42.000000000 +0900
@@ -12,7 +12,7 @@
 
 import Graphics.UI.GLUT hiding (position)
 import Graphics.Rendering.OpenGL.GLU
-import Control.Exception
+import Control.OldException
 import Control.Monad
 import System.Exit
 import Prelude hiding (catch)
@@ -47,7 +47,7 @@
 loadReplay filename = readFile filename >>= (return.read)
 
 main = do 
-  args <-getArgs
+  (_, args) <- getArgsAndInitialize
   putDebugStrLn $ show args 
 
   keystate <- newIORef []