summaryrefslogtreecommitdiff
path: root/sources/shapes.h
diff options
context:
space:
mode:
authorHenrique Alves <henrique.alves@itsjungle.xyz>2024-04-29 10:23:52 +0300
committerHenrique Alves <henrique.alves@itsjungle.xyz>2024-04-29 10:23:52 +0300
commitaeddacb8d88f41ba7bdf37d39de17d8cf3b6a258 (patch)
tree2daee509556bb1e7a9b74dc610b2ef4831392fdb /sources/shapes.h
parent94e1881676e39bd8b8e6a8ee98e541102b380549 (diff)
downloadgamejam-slgj-2024-aeddacb8d88f41ba7bdf37d39de17d8cf3b6a258.tar.gz
gamejam-slgj-2024-aeddacb8d88f41ba7bdf37d39de17d8cf3b6a258.tar.bz2
gamejam-slgj-2024-aeddacb8d88f41ba7bdf37d39de17d8cf3b6a258.zip
Creating small evaluation prompt
Diffstat (limited to 'sources/shapes.h')
-rw-r--r--sources/shapes.h20
1 files changed, 0 insertions, 20 deletions
diff --git a/sources/shapes.h b/sources/shapes.h
deleted file mode 100644
index dc73011..0000000
--- a/sources/shapes.h
+++ /dev/null
@@ -1,20 +0,0 @@
-#include "raylib.h"
-#include "s7.h"
-#include <stdio.h>
-#include <stdlib.h>
-
-static s7_pointer rl_draw_rectangle(s7_scheme *s7, s7_pointer args) {
- Color *c = (Color *)s7_c_object_value(s7_car(s7_cdr(s7_cdr(s7_cdr(s7_cdr(args))))));
-
- DrawRectangle(s7_integer(s7_car(args)),
- s7_integer(s7_car(s7_cdr(args))),
- s7_integer(s7_car(s7_cdr(s7_cdr(args)))),
- s7_integer(s7_car(s7_cdr(s7_cdr(s7_cdr(args))))),
- *c);
-
- return(NULL);
-}
-
-static void rl_shapes_define_methods(s7_scheme *s7) {
- s7_define_function(s7, "rl-draw-rectangle", rl_draw_rectangle, 5, 0, false, "test");
-}