X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=irrlicht.scm;h=e2e5a9bc92d131fba8ab928fddb5be764cfe8119;hb=c59d2be798005a3684d75c3f561568ad2cdac9c7;hp=c9d88672fc64ece5d911f0a4ab105cbdd83e70f7;hpb=5cd7046669d8cb991f75e1e56b4155f29bb80935;p=guile-irrlicht.git diff --git a/irrlicht.scm b/irrlicht.scm index c9d8867..e2e5a9b 100644 --- a/irrlicht.scm +++ b/irrlicht.scm @@ -19,17 +19,46 @@ (define-module (irrlicht) + #:use-module (oop goops) #:use-module (irrlicht base) + #:use-module (irrlicht core) #:use-module (irrlicht device) #:use-module (irrlicht gui) + #:use-module (irrlicht io) + #:use-module (irrlicht irr) #:use-module (irrlicht scene) + #:use-module (irrlicht video) + #:duplicates (merge-generics) #:re-export (add-animated-mesh-scene-node! + add-camera-scene-node! + add-camera-scene-node-fps! + add-file-archive! + add-octree-scene-node! add-static-text! + begin-scene create-device + drop! + end-scene + get-cursor-control + get-file-system + get-fps get-gui-environment get-mesh + get-name get-scene-manager + get-texture get-video-driver is-empty? + is-window-active? + make-box3d + run set-material-flag! - set-window-caption!)) + set-material-texture! + set-md2-animation! + set-position! + set-visible! + set-window-caption! + yield-device)) + +;; Merged methods have to be exported apart +(re-export draw-all)