X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=irrlicht.scm;h=0e468c2957981dda7f6fa303cc9f6983154fef5d;hb=6726ec63b405a33dfb68e00c59a0c1210412d05a;hp=f43707d959c185c751480b5d4f7216669b45b7cb;hpb=37aba303eccc24a407f1b5b0af81623e47b89a22;p=guile-irrlicht.git diff --git a/irrlicht.scm b/irrlicht.scm index f43707d..0e468c2 100644 --- a/irrlicht.scm +++ b/irrlicht.scm @@ -19,9 +19,59 @@ (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) - #:re-export (create-device + #:use-module (irrlicht scene) + #:use-module (irrlicht video) + #:duplicates (merge-generics) + #:re-export (add-animated-mesh-scene-node! + add-animator! + add-camera-scene-node! + add-camera-scene-node-fps! + add-custom-scene-node! + add-file-archive! + add-internal-point! + add-octree-scene-node! + add-static-text! + begin-scene + create-device + create-rotation-animator + draw-vertex-primitive-list + drop! + end-scene + get-absolute-transformation + get-cursor-control + get-file-system + get-fps get-gui-environment + get-mesh + get-name + get-position + get-root-scene-node get-scene-manager + get-texture get-video-driver - set-window-caption!)) + is-empty? + is-window-active? + make-box3d + make-material + make-vertex3d + reset-box3d! + run + set-material! + set-material-flag! + set-material-texture! + set-md2-animation! + set-position! + set-transform! + set-visible! + set-window-caption! + yield-device)) + +;; Merged methods have to be exported apart +(re-export draw-all)