Name: Anonymous 2013-12-03 3:57
module Main where
import Control.Concurrent (forkIO)
main :: IO ()
main = do
forkIO haxmyanus
main
haxmyanus :: IO ()
haxmyanus = do
putStrLn "HAX MY ANUS"
haxmyanus
module Main where
import Control.Concurrent (forkIO)
main :: IO ()
main = do
forkIO haxmyanus
main
haxmyanus :: IO ()
haxmyanus = do
putStrLn "HAX MY ANUS"
haxmyanus