diff options
Diffstat (limited to 'lib/syntax/t.ml')
| -rw-r--r-- | lib/syntax/t.ml | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/lib/syntax/t.ml b/lib/syntax/t.ml index 38ad5b0..c50d2e2 100644 --- a/lib/syntax/t.ml +++ b/lib/syntax/t.ml @@ -2,14 +2,10 @@ This module contains the basic operators used in the QSP syntax. *) -open StdLabels - -type 'a literal = Text of string | Expression of 'a list +type 'a literal = Text of string | Expression of 'a let map_litteral : f:('a -> 'b) -> 'a literal -> 'b literal = - fun ~f -> function - | Text t -> Text t - | Expression e -> Expression (List.map ~f e) + fun ~f -> function Text t -> Text t | Expression e -> Expression (f e) type boperator = | Eq |