+(define-method (get-built-in-font (gui-environment <gui-environment>))
+ (let ((getBuiltInFont (get-irrlicht-proc "getBuiltInFont" gui-environment)))
+ (getBuiltInFont gui-environment)))
+
+(define-method (get-font (gui-environment <gui-environment>) filename)
+ (let ((getFont (get-irrlicht-proc "getFont" gui-environment)))
+ (getFont gui-environment filename)))
+
+(define-method (get-skin (gui-environment <gui-environment>))
+ (let ((getSkin (get-irrlicht-proc "getSkin" gui-environment)))
+ (getSkin gui-environment)))
+
+(export <gui-environment> add-button! add-image! add-static-text! draw-all get-built-in-font
+ get-font get-skin)