Fix typos. Add tiled testmap
This commit is contained in:
parent
9042939cbd
commit
7c4af946cf
|
|
@ -1,11 +1,11 @@
|
|||
(define-record-type <map>
|
||||
(make-map width height layers)
|
||||
map?
|
||||
(widht map-width)
|
||||
(width map-width)
|
||||
(height map-height)
|
||||
(layers map-layers))
|
||||
|
||||
|
||||
(define (read-map port)
|
||||
(json-read port)
|
||||
))
|
||||
)
|
||||
|
|
|
|||
|
|
@ -3,7 +3,7 @@
|
|||
|
||||
(define mapdata (read-map (open-input-file "retropikzel/tiled/testmap.json")))
|
||||
|
||||
;(write mapdata)
|
||||
;(newline)
|
||||
(write mapdata)
|
||||
(newline)
|
||||
|
||||
(test-end "tiled")
|
||||
|
|
|
|||
Loading…
Reference in New Issue