From 07f558fb1111782ca1d7ea1fb67562addeaf3bd9 Mon Sep 17 00:00:00 2001
From: Javier Sancho <jsf@jsancho.org>
Date: Thu, 3 Oct 2019 12:01:15 +0200
Subject: [PATCH] Return pointer to device

---
 irrlicht/bindings.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/irrlicht/bindings.scm b/irrlicht/bindings.scm
index f17557f..af85526 100644
--- a/irrlicht/bindings.scm
+++ b/irrlicht/bindings.scm
@@ -26,6 +26,6 @@
 
 (define create-device
   (pointer->procedure
-   int
+   '*
    (dynamic-func "irr_createDevice" cirr)
    (list int '* uint32 int int int)))
-- 
2.39.5