X-Git-Url: https://git.stderr.nl/gitweb?a=blobdiff_plain;f=libchimara%2Fgestalt.c;h=ebeb765f20a9f59d00697fa5758d345f1f6f33c1;hb=b892a848c444238c5379621fcd0209410742e5e2;hp=f7ac63a8a5cc5a84324086c57f3d12e3a423e454;hpb=632ef9d57c270608e01b1afdba772da0da7993ca;p=projects%2Fchimara%2Fchimara.git diff --git a/libchimara/gestalt.c b/libchimara/gestalt.c index f7ac63a..ebeb765 100644 --- a/libchimara/gestalt.c +++ b/libchimara/gestalt.c @@ -1,4 +1,5 @@ #include /* Surprisingly, the only symbol needed is NULL */ +#include #include "glk.h" /* Version of the Glk specification implemented by this library */ @@ -111,16 +112,32 @@ glk_gestalt_ext(glui32 sel, glui32 val, glui32 *arr, glui32 arrlen) /* Hyperlinks supported on textbuffers and textgrids */ case gestalt_HyperlinkInput: return val == wintype_TextBuffer || val == wintype_TextGrid; - - /* Unsupported capabilities */ + + /* Mouse support present in textgrids */ case gestalt_MouseInput: + return val == wintype_TextGrid; + case gestalt_Graphics: + return 1; + case gestalt_DrawImage: + return val == wintype_Graphics || val == wintype_TextBuffer; + + case gestalt_GraphicsTransparency: + return 1; + + /* Capabilities supported if compiled with GStreamer */ case gestalt_Sound: case gestalt_SoundVolume: case gestalt_SoundNotify: +#ifdef GSTREAMER_SOUND + return 1; +#else + return 0; +#endif + + /* Unsupported capabilities */ case gestalt_SoundMusic: - case gestalt_GraphicsTransparency: /* Selector not supported */ default: return 0;