4 files changed, 5 insertions, 4 deletions
diff --git a/sources/main.c b/sources/main.c
index 3c2e1da..7196bc4 100644
--- a/sources/main.c
+++ b/sources/main.c
@@ -10,6 +10,7 @@
 #include "rl/texture.h"
 #include "rl/core.h"
 #include "rl/shapes.h"
+#include "repl/repl.h"
 
 #include <math.h>
 #include <stdio.h> 
diff --git a/sources/repl/repl.c b/sources/repl/repl.c
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/sources/repl/repl.c
diff --git a/sources/repl/repl.h b/sources/repl/repl.h
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/sources/repl/repl.h
diff --git a/sources/rl/shapes.h b/sources/rl/shapes.h
index 0033a5b..10d38eb 100644
--- a/sources/rl/shapes.h
+++ b/sources/rl/shapes.h
@@ -6,10 +6,10 @@
 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))))),
+  DrawRectangle(s7_real(s7_car(args)),
+		s7_real(s7_car(s7_cdr(args))),
+		s7_real(s7_car(s7_cdr(s7_cdr(args)))),
+		s7_real(s7_car(s7_cdr(s7_cdr(s7_cdr(args))))),
 		*c);
 
   return(NULL);