diff options
Diffstat (limited to 'lib/syntax/tree.ml')
| -rw-r--r-- | lib/syntax/tree.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/syntax/tree.ml b/lib/syntax/tree.ml index bb31253..ecad1b4 100644 --- a/lib/syntax/tree.ml +++ b/lib/syntax/tree.ml @@ -28,7 +28,7 @@ module Ast = struct | Declaration of ('a * 'a variable * T.assignation_operator * 'a expression) | Expression of 'a expression | Comment of 'a - | Call of 'a * string * 'a expression list + | Call of 'a * T.keywords * 'a expression list | Location of 'a * string [@@deriving eq, show] end @@ -64,7 +64,7 @@ module Instruction : type expression = Expression.repr type variable = Expression.variable - let call : pos -> string -> expression list -> repr = + let call : pos -> T.keywords -> expression list -> repr = fun pos name args -> Ast.Call (pos, name, args) let location : pos -> string -> repr = |