Home My Page Projects Code Snippets Project Openings 3D graphics for Standard ML
Summary Activity SCM

SCM Repository

[sml3d] View of /trunk/sml3d/src/glfw/glfw-sig.sml
ViewVC logotype

View of /trunk/sml3d/src/glfw/glfw-sig.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1253 - (download) (annotate)
Sun Jan 8 20:05:24 2012 UTC (7 years, 2 months ago) by jhr
File size: 1493 byte(s)
  Working on GLFW support
(* glfw-sig.sml
 *
 * COPYRIGHT (c) 2012 The SML3d Project (http://sml3d.cs.uchicago.edu)
 * All rights reserved.
 *)

signature GLFW =
  sig

(* FIXME: should these should be data constructors? *)
    datatype window_prop
     | REFRESH_RATE of word
     | ACCUM_RED_BITS of word
     | ACCUM_GREEN_BITS of word
     | ACCUM_BLUE_BITS of word
     | ACCUM_ALPHA_BITS of word
     | AUX_BUFFERS : window_hint
     | STEREO
     | WINDOW_NO_RESIZE
     | FSAA_SAMPLES of int
     | OPENGL_VERSION_MAJOR of int
     | OPENGL_VERSION_MINOR of int
     | OPENGL_FORWARD_COMPAT
     | OPENGL_DEBUG_CONTEXT
     | OPENGL_PROFILE : window_hint

    val openWindow : {
            size : ?,
            redBits, greenBits, blueBits,
            alphaBits,
            depthBits,
            stencilBits,
            fullScreen,
            hints : window_hint list
          } -> ??

    eqtype input_state
    val MOUSE_CURSOR : input_state
    val STICKY_KEYS : input_state
    val STICKY_MOUSE_BUTTONS : input_state
    val SYSTEM_KEYS : input_state
    val KEY_REPEAT : input_state
    val AUTO_POLL_EVENTS : input_state

    val setWindowTitle : string -> unit
    val setWindowSize : size2i -> unit
    val setWindowPos : vec2i -> unit
    val getWindowSize : unit -> size2i

  (* callbacks *)
    val setWindowSizeCallback : (size -> unit) option -> unit

    val swapBuffers : unit -> unit

    val enableInputState : input_state -> unit
    val disableInputState : input_state -> unit

  end

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0