Unify world shape and picture into spic

2021-11-01 02:00:12 +00:00
parent 86fdfd260e
commit da346bc3a0
9 changed files with 266 additions and 158 deletions
@@ -71,6 +71,7 @@ customMouseCursor w =
    . color white
    $ pictures [ line [V2 (-5) 0,V2 5 0] , line [V2 0 (-5),V2 0 5] ]

+-- TODO remove duplicate!
 testPic :: World -> Picture
 testPic _ = []