1 files changed, 8 insertions, 0 deletions
diff --git a/src/options.ml b/src/options.ml
new file mode 100644
index 0000000..a57c28b
--- /dev/null
+++ b/src/options.ml
@@ -0,0 +1,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; }

diff --git a/src/options.ml b/src/options.ml new file mode 100644 index 0000000..a57c28b --- /dev/null +++ b/src/options.ml
@@ -0,0 +1,8 @@
	1	type t = { height: int; ascii: bool; marker: Marker.t}
	2	let default =
	3	{ height = 14
	4	; ascii = false
	5	; marker = Marker.Point
	6	}
	7	let with_height v c = { c with height = v; }
	8	let with_marker v c = { c with marker = v; }