From 1a91a937ca327a80f0906c031e81f22c2a95d41b Mon Sep 17 00:00:00 2001
From: SouthFox <master@southfox.me>
Date: Sun, 26 May 2024 10:47:17 +0800
Subject: [PATCH] [feat] add funcall func

---
 game.scm | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/game.scm b/game.scm
index bedfe9d..94bb084 100644
--- a/game.scm
+++ b/game.scm
@@ -85,3 +85,9 @@
                (display (gelement-type-iamge (gelement-type e))))
         (display "False"))))
 
+(define (funcall fun args)
+  (cond ((equal? fun '+)
+         (apply + args))
+        ((equal? fun 'string-append)
+         (apply string-append args))
+        ))