summaryrefslogtreecommitdiff
path: root/scripts/main.scm
blob: 190091103707a4d02c902a1c9cb779e02c404423 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
(define a 0)
(define b 0)

(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)
  (newline)
  )