diff options
Diffstat (limited to 'scripts/main.scm')
-rw-r--r-- | scripts/main.scm | 21 |
1 files changed, 13 insertions, 8 deletions
diff --git a/scripts/main.scm b/scripts/main.scm index 779a351..1900911 100644 --- a/scripts/main.scm +++ b/scripts/main.scm @@ -1,11 +1,16 @@ (define a 0) +(define b 0) -(define update - (lambda () - (set! a (+ a 1)) - )) +(define (update) + (set! a (+ a 1)) + (set! b (rl-load-texture "./assets/test.png")) + ;; Not displaying the next lines makes the crash take longer to happen + (display a) + (newline) + (display b) + (newline) + ) -(define draw - (lambda () - (rl-draw-text (string-append (number->string a) " oi ")) - )) +(define (draw) + (newline) + ) |