diff options
| author | Colin Okay <colin@cicadas.surf> | 2022-06-30 06:22:02 -0500 |
|---|---|---|
| committer | Colin Okay <colin@cicadas.surf> | 2022-06-30 06:22:02 -0500 |
| commit | 7390c49a8f730405c048b4e79a6275322987315f (patch) | |
| tree | ff4660c6edc9734afb685fd4244b87a1721b4de9 /src/wheelwork.lisp | |
| parent | 7bbcc1cce6dbda1c6f5ad84f956c188ce639100d (diff) | |
[modify] moved *application* into wheelwork; should-listen-for-p
Diffstat (limited to 'src/wheelwork.lisp')
| -rw-r--r-- | src/wheelwork.lisp | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/wheelwork.lisp b/src/wheelwork.lisp index 2932520..b6da6b9 100644 --- a/src/wheelwork.lisp +++ b/src/wheelwork.lisp @@ -2,6 +2,9 @@ (in-package #:wheelwork) +(defvar *application* nil + "current application") + (defun start (app &key (x :centered) (y :centered)) (sdl2:with-init (:everything) (sdl2:gl-set-attr :context-major-version 3) |