(test-begin "tiled")
(define mapdata (read-map (open-input-file "retropikzel/tiled/testmap.json")))
;(write mapdata)
;(newline)
(test-end "tiled")