MODULE Win_OpenGL_Base EXPORTS Win_OpenGL_Base, Win_OpenGL_BaseProxy;

IMPORT GraphicsBase;

REVEAL
  T = Public BRANDED OBJECT
  OVERRIDES
    init := Init;
  END;

PROCEDURE Init (<*UNUSED*> self      : T;
                <*UNUSED*> title     : TEXT;
                <*UNUSED*> x, y, w, h: INTEGER): T
    RAISES {GraphicsBase.Failure} =
  BEGIN
    RAISE GraphicsBase.Failure;
  END Init;

PROCEDURE Available () : BOOLEAN =
  BEGIN
    RETURN FALSE;
  END Available;

BEGIN
END Win_OpenGL_Base.