summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2016-02-11 21:42:00 -0500
committerDavid Thompson <dthompson2@worcester.edu>2016-02-11 21:42:00 -0500
commit2e91dc573c62cd8f32e58a5bd62444e3568c34ab (patch)
tree699dd18770498562b5867d6ced3f318ad3a37e2c
parente6a691a322ef243fa6c879b91ea9ad5f04e3521f (diff)
Remove unused sly-init procedure.
* sly.scm (sly-init): Delete.
-rw-r--r--sly.scm12
1 files changed, 1 insertions, 11 deletions
diff --git a/sly.scm b/sly.scm
index 3ec28ff..6eb3698 100644
--- a/sly.scm
+++ b/sly.scm
@@ -21,11 +21,7 @@
;;
;;; Code:
-(define-module (sly)
- #:use-module (sly window)
- #:use-module (sly render font)
- #:use-module ((sdl2) #:prefix sdl2:)
- #:export (sly-init))
+(define-module (sly))
(eval-when (eval load compile)
(begin
@@ -52,9 +48,3 @@
(lambda (m)
(module-use! i (resolve-interface m))))
%public-modules)))
-
-(define* (sly-init #:key (fonts? #t))
- "Initialize Sly's global state, such as the OpenGL context."
- (sdl2:sdl-init)
- (init-window)
- (when fonts? (enable-fonts)))