Transition to new room datatypes, first separate out/inlinks

2021-11-23 17:27:33 +00:00
parent 67b0d694af
commit 0f4040807a
19 changed files with 119 additions and 87 deletions
@@ -7,8 +7,9 @@ import qualified Data.IntMap.Strict as IM
 defaultRoom :: Room
 defaultRoom = Room
    { _rmPolys  = []
-    , _rmLinks  = []
+    , _rmOutLinks  = []
    , _rmLinkEff = []
+    , _rmInLinks = []
    , _rmPos    = []
    , _rmPath   = []
    , _rmPmnts  = []