+(define-method (create-rotation-animator (scene-manager <scene-manager>) rotation-speed)
+ (let ((createRotationAnimator (get-irrlicht-proc "createRotationAnimator" scene-manager)))
+ (make <scene-node-animator>
+ #:irr-pointer
+ (createRotationAnimator scene-manager rotation-speed))))
+