#line 262 "/home/ubuntu/felix/src/packages/gui.fdoc"
  class FlxGuiInit
  {
    proc init()
    {
      if SDL_Init(SDL_INIT_AUDIO \| SDL_INIT_VIDEO) < 0  do
        eprintln$ f"Unable to init SDL: %S\n" #SDL_GetError;
        System::exit(1);
      done
      println$ "SDL_init OK";
      if TTF_Init() < 0 do
        eprintln$ f"Unable to init TTF: %S\n" #TTF_GetError;
        System::exit(1);
      done
      println$ "TTF_init OK";
      if IMG_Init(IMG_INIT_PNG) < 0 do
        eprintln$ f"Unable to init IMG with PNG: %S\n" #IMG_GetError;
        System::exit(1);
      done
      println$ "IMG_init OK";
    }
  
    proc quit() { SDL_Quit(); }
  
    proc versions ()
    {
      begin
        var compiled = #SDL_Compiled_Version;
        var linked = #SDL_Linked_Version;
        println$ f"We compiled against SDL version %d.%d.%d ..."
          (compiled.major.int, compiled.minor.int, compiled.patch.int);
        println$ f"But we are linking against SDL version %d.%d.%d."
          (linked.major.int, linked.minor.int, linked.patch.int);
      end
  
      begin
        var compiled = #TTF_Compiled_Version;
        var linked = #TTF_Linked_Version;
        println$ f"We compiled against TTF version %d.%d.%d ..."
          (compiled.major.int, compiled.minor.int, compiled.patch.int);
        println$ f"But we are linking against TTF version %d.%d.%d."
          (linked.major.int, linked.minor.int, linked.patch.int);
      end
  
      begin
        var compiled = #IMG_Compiled_Version;
        var linked = #IMG_Linked_Version;
        println$ f"We compiled against IMG version %d.%d.%d ..."
          (compiled.major.int, compiled.minor.int, compiled.patch.int);
        println$ f"But we are linking against IMG version %d.%d.%d."
          (linked.major.int, linked.minor.int, linked.patch.int);
      end
    }
  
  }