summaryrefslogtreecommitdiff
path: root/src/options.ml
blob: a57c28b4ec3e37a1f9dc58bca6ff7822a653bbd6 (plain)
1
2
3
4
5
6
7
8
type t = { height: int; ascii: bool; marker: Marker.t}
let default =
    { height = 14
    ; ascii = false
    ; marker = Marker.Point
    }
let with_height v c = { c with height = v; }
let with_marker v c = { c with marker = v; }