blob: a38873ea2869f054e82e22f07e0ae7fc6555f41f (
plain) (
blame)
1
2
3
4
5
6
7
8
|
open Sexplib.Std
type value = Str of string | Int of int [@@deriving sexp]
type statement =
| Define of {target: string; heading: (string * string) list; tuples: (string * value) list list}
| Drop of {target: string}
[@@deriving sexp]
|
