-(define-public add-camera-scene-node-fps
- (pointer->procedure
- '*
- (dynamic-func "irr_scene_addCameraSceneNodeFPS" cirr)
- (list '* '* float float int '* int int float int int)))
+(define-foreign add-camera-scene-node-fps
+ '* "irr_scene_addCameraSceneNodeFPS" (list '* '* float float int '* int int float int int))