From 150738de9fb42159f6b60bc5cf817d99e6718988 Mon Sep 17 00:00:00 2001
From: Henrique Alves <henrique.alves@itsjungle.xyz>
Date: Wed, 24 Apr 2024 02:44:33 +0300
Subject: Successful test with s7!

---
 scripts/main.scm | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

(limited to 'scripts/main.scm')

diff --git a/scripts/main.scm b/scripts/main.scm
index bccb72f..136c757 100644
--- a/scripts/main.scm
+++ b/scripts/main.scm
@@ -1,8 +1,16 @@
 (define a 0)
 (define b 0)
 
+(define update
+  (lambda ()
+    (set! a (+ a 1))
+    (set! b (rl-load-texture))
+    (display b)
+    (newline)
+    (gc-run)
+    ))
 
 (define draw
   (lambda ()
-    (rl-draw-text)
+    (rl-draw-text (number->string a))
     ))
-- 
cgit v1.2.3