Estou construindo um simulador que analisa alguns eventos STDINe os "executa". Atualmente, minha formação é principalmente a programação funcional, por isso parecia natural fazer algo assim: data Event = Thing1 String Int | Thing2 Int | Thing3 String String Int Parse :: String ->...