blob: 71dbb44e1acac0ace82a15afa4f3e0fa381013a2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
(* Programmed by Jedidiah Barber *)
(* Licensed under the Sunset License v1.0 *)
val license_text : string
val new_wall : unit -> (int * int * string) option
val open_file : ?folder:string -> unit -> string option
val save_file : ?folder:string -> ?name:string -> unit -> string option
val export_file : ?folder:string -> ?name:string -> unit -> string option
(* I hate GTK colors *)
val colors : fore:(int * int * int) -> back:(int * int * int) ->
((int * int * int) * (int * int * int)) option
val modulus : current:int -> int option
val about : unit -> unit
|