elm_playground_native 0.1.7 (latest)

module E = Sub

val spf : ('a, unit, string) format -> 'a

val (=~) : string -> string -> bool

val matched : int -> string -> string

val _matched1 : string -> string

val _matched2 : string -> string * string

val matched3 : string -> string * string * string

val writer : 'a -> 'b -> Buffer.t -> string -> int

val save : string -> Buffer.t -> unit

val curl_url : string -> string -> unit

val png_file_of_url : string -> string

val g_cr : Cairo.context option ref

val get_cr : unit -> Cairo.context

val g_sx : int ref

val g_sy : int ref

val himages : (string, Cairo.Surface.t) Hashtbl.t

val with_cr : (Cairo.context -> 'a) -> 'a

val set_color : Cairo.context -> Color.t -> float -> unit

val debug_coordinates : Cairo.context -> unit

val convert : ('a * float) -> 'a * float

val render_transform : 
  Cairo.context ->
  float ->
  float ->
  float ->
  float ->
  unit

val ngon_points : Cairo.context -> int -> int -> float -> unit

val render_ngon : 
  (Cairo.context -> 'a) ->
  Color.t ->
  int ->
  float ->
  float ->
  float ->
  float ->
  float ->
  float ->
  unit

val render_oval : 
  (Cairo.context -> 'a) ->
  Color.t ->
  float ->
  float ->
  float ->
  float ->
  'b ->
  'c ->
  float ->
  unit

val render_circle : 
  (Cairo.context -> 'a) ->
  Color.t ->
  float ->
  float ->
  float ->
  float ->
  float ->
  float ->
  unit

val render_polygon : 
  (Cairo.context -> 'a) ->
  Color.t ->
  (float * float) list ->
  float ->
  float ->
  float ->
  float ->
  float ->
  unit

val render_rectangle : 
  (Cairo.context -> 'a) ->
  Color.t ->
  float ->
  float ->
  float ->
  float ->
  float ->
  float ->
  float ->
  unit

val render_words : 
  (Cairo.context -> 'a) ->
  Color.t ->
  string ->
  float ->
  float ->
  float ->
  float ->
  float ->
  unit

val render_image : 
  (Cairo.context -> 'a) ->
  float ->
  float ->
  string ->
  float ->
  float ->
  float ->
  float ->
  'b ->
  unit

type hook = Cairo.context -> unit

val empty_hook : 'a -> unit

val render_shape : hook -> Playground.shape -> unit

val render : Playground.shape list -> unit

module Fps : sig ... end

val let* : ('a, [< `Msg of string ]) result -> ('a -> 'b) -> 'b

val scancode_to_keystring : string -> string

val run_app : ('a, 'b) Playground.app -> unit

package elm_playground_native