X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=irrlicht.scm;h=5076c2a9aba72d76cb6d0e235ac7525018134885;hb=bca809c8b7d6a3056e51dff6a8016fd0a2cac476;hp=640b7f5f0e07e6c23e9e59753ada425c1485cca7;hpb=bf2cb00e2ef19e2eb33557f900405f836ebe65a3;p=guile-irrlicht.git diff --git a/irrlicht.scm b/irrlicht.scm index 640b7f5..5076c2a 100644 --- a/irrlicht.scm +++ b/irrlicht.scm @@ -21,28 +21,115 @@ (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! + #:re-export (;; classes + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + ;; methods + add-animated-mesh-scene-node! + add-animator! + add-button! add-camera-scene-node! + add-camera-scene-node-fps! + add-cube-scene-node! + add-custom-scene-node! + add-file-archive! + add-image! + add-internal-point! + add-octree-scene-node! + add-scrollbar! + add-sphere-scene-node! add-static-text! begin-scene create-device + create-fly-circle-animator + create-fly-straight-animator + create-rotation-animator + draw-vertex-primitive-list + drop! end-scene + get-absolute-transformation + get-built-in-font + get-color + get-cursor-control + get-event-key + get-event-key-pressed + get-event-type + get-file-system + get-font + get-fps get-gui-environment get-mesh + get-name + get-root-scene-node get-scene-manager + get-skin get-texture + get-time + get-timer get-video-driver - is-empty? + is-window-active? + make-box3d + make-event-receiver + make-material + make-vertex3d + reset-box3d! run + set-animation-speed! + set-color! + set-font! + set-frame-loop! + set-material! set-material-flag! set-material-texture! + set-max! set-md2-animation! - set-window-caption!)) + set-override-color! + set-resizable! + set-rotation! + set-scale! + set-transform! + set-visible! + set-window-caption! + yield-device)) ;; Merged methods have to be exported apart -(re-export draw-all) +(re-export draw-all + get-position + set-position!)