|
|
@ -14,8 +14,7 @@ |
|
|
|
(var g-window-width int 1080) |
|
|
|
(var g-window-height int 2340) |
|
|
|
|
|
|
|
;; TODO: Paths are relative to gamelib, including when running, unless we change our working dir |
|
|
|
(define-constant DATA_DIR "../../data/") |
|
|
|
(define-constant DATA_DIR "data/") |
|
|
|
|
|
|
|
(defmacro in-data-dir (path-in-data string) |
|
|
|
(tokenize-push output |
|
|
@ -110,11 +109,11 @@ Rush Hour database from Michael Fogleman.\n\n") |
|
|
|
(when exit-reason |
|
|
|
(printf "Exiting. Reason: %s\n" exit-reason)) |
|
|
|
|
|
|
|
(SDL_DestroyTexture background-texture) |
|
|
|
(set background-texture null) |
|
|
|
(sdl-shutdown window) |
|
|
|
(return 0)) |
|
|
|
|
|
|
|
(module-use-sdl-build-options) |
|
|
|
|
|
|
|
(defgenerator define-constant (define-name symbol value any) |
|
|
|
(var define-statement (const ([] CStatementOperation)) |
|
|
|
(array |
|
|
@ -137,3 +136,12 @@ Rush Hour database from Michael Fogleman.\n\n") |
|
|
|
(return (CStatementOutput environment context tokens startTokenIndex |
|
|
|
statement (array-size statement) |
|
|
|
output))) |
|
|
|
|
|
|
|
;; |
|
|
|
;; Building |
|
|
|
;; |
|
|
|
|
|
|
|
(module-use-sdl-build-options) |
|
|
|
|
|
|
|
;; Note that this executable still pulls .so files from Dependencies |
|
|
|
(set-cakelisp-option executable-output "../../kitty-gridlock") |
|
|
|