tdpeuter/2022FuncProg-project3-RPGEngine
tdpeuter/2022FuncProg-project3-RPGEngine
Archived
1
Fork 0
Code Issues Pull requests Releases Activity

#18 Started conversion to Game

Browse source
This commit is contained in:
Tibo De Peuter 2022-12-20 19:53:40 +01:00
parent d4fbcda73b
commit de02c7113f
11 changed files with 300 additions and 112 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/RPGEngine/Parse.hs
View file

@ -1,7 +1,7 @@
module RPGEngine.Parse where
import RPGEngine.Data
import RPGEngine.Parse.StructureElement
import RPGEngine.Parse.StructElement
import RPGEngine.Parse.Game
import Text.Parsec.String
@ -14,6 +14,6 @@ type FileName = String
----------------------------------------------------------------------
parseToGame :: FileName -> Game
parseToGame filename = structureToGame structure
where (Right structure) = unsafePerformIO io
io = parseFromFile structureElement filename
parseToGame filename = structToGame struct
where (Right struct) = unsafePerformIO io
io = parseFromFile structElement filename