From bc0852b15c6d8ddb8a08f9abf85e3f1697690336 Mon Sep 17 00:00:00 2001 From: David Thompson Date: Wed, 17 Jul 2013 19:11:07 -0400 Subject: Use init-2d in all examples. --- examples/coroutine.scm | 2 ++ examples/particles.scm | 1 + examples/simple.scm | 2 ++ examples/tilemap.scm | 2 ++ 4 files changed, 7 insertions(+) diff --git a/examples/coroutine.scm b/examples/coroutine.scm index 0c6f3b4..bb3f6ab 100644 --- a/examples/coroutine.scm +++ b/examples/coroutine.scm @@ -12,6 +12,8 @@ (2d agenda) (2d coroutine)) +(init-2d) + (define window-width 800) (define window-height 600) (define sprite #f) diff --git a/examples/particles.scm b/examples/particles.scm index 65bf0ea..8e6d11e 100644 --- a/examples/particles.scm +++ b/examples/particles.scm @@ -13,6 +13,7 @@ (2d helpers)) (set! *random-state* (random-state-from-platform)) +(init-2d) ;;; ;;; Particles diff --git a/examples/simple.scm b/examples/simple.scm index 891e0fc..c5d25f1 100644 --- a/examples/simple.scm +++ b/examples/simple.scm @@ -7,6 +7,8 @@ (2d helpers) (ice-9 format)) +(init-2d) + (define window-width 800) (define window-height 600) (define sprite #f) diff --git a/examples/tilemap.scm b/examples/tilemap.scm index 5a7ccea..ce0082b 100644 --- a/examples/tilemap.scm +++ b/examples/tilemap.scm @@ -10,6 +10,8 @@ (2d input) (2d helpers)) +(init-2d) + ;;; ;;; Orthogonal tile map example ;;; -- cgit v1.2.3