gestalt.c

#include "glknew.h"

glui32 glk_gestalt(glui32 sel, glui32 val) {
  return glk_gestalt_ext(sel, val, NULL, 0);
}

glui32 glk_gestalt_ext(glui32 sel, glui32 val, glui32 *arr,
                       glui32 arrlen) {
  switch (sel) {
  case gestalt_Version:
    return 0x00000700;

  case gestalt_Unicode:
    /* This makes more work for me, but if I do not signal unicode
       support, then the game complains. */
    return 1;

  case gestalt_Graphics:
    return 1;

  case gestalt_Sound:
    /* I would like to do this eventually, but not right now.  Blue
       Lacuna doesn't actually have any sounds, anyway -- though if you
       return 1, the init code will try to set them up. */
    return 0;

  case gestalt_Timer:
    /* I am unlikely to support these in the future; the client-server
       model just doesn't fit them well. */
    return 0;

  default:
    printf("Unhandled gestalt sel=%u, val=%u, arr=%p, arrlen=%u\n", sel, val, arr, arrlen);
    return 0;
  }
}