X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=src%2Fgui-skin.h;h=b4ec4c515252a8702e816f7dc81696545f3989be;hb=61aadd8525de89016f63572fd474547a1bb932de;hp=ca43d2b60bda683c4f637b8ee3695a7a7c32ee3a;hpb=60376e14c4cc35b3c8d7e069b083881b5ffe9032;p=guile-irrlicht.git diff --git a/src/gui-skin.h b/src/gui-skin.h index ca43d2b..b4ec4c5 100644 --- a/src/gui-skin.h +++ b/src/gui-skin.h @@ -33,6 +33,26 @@ extern "C" { DECLARE_WRAPPED_TYPE (irr::gui::IGUISkin*, init_gui_skin_type, gui_skin_p, wrap_gui_skin, unwrap_gui_skin); + + SCM + irr_gui_IGUISkin_getColor (SCM wrapped_gui_skin, + SCM color); + + SCM + irr_gui_IGUISkin_getFont (SCM wrapped_gui_skin, + SCM rest); + + SCM + irr_gui_setFont (SCM wrapped_gui_skin, + SCM font, + SCM rest); + + irr::gui::EGUI_DEFAULT_COLOR + scm_to_default_color (SCM default_color); + + irr::gui::EGUI_DEFAULT_FONT + scm_to_default_font (SCM default_font); + } #endif