Switched the keyword from string to a sum type

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 =