aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/wheelwork.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/wheelwork.lisp')
-rw-r--r--src/wheelwork.lisp3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/wheelwork.lisp b/src/wheelwork.lisp
index 8b1e534..41157e6 100644
--- a/src/wheelwork.lisp
+++ b/src/wheelwork.lisp
@@ -33,6 +33,9 @@
(shutdown app))
(cleanup app)))))))
+(defun stop ()
+ (sdl2:push-event :quit))
+
(defun refocus-on (target &optional (app *application*))
"Sets focus of application to TARGET. This works whether or not