Moved qparser and syntax in the library folder

1 files changed, 78 insertions, 0 deletions

diff --git a/lib/syntax/t.ml b/lib/syntax/t.ml
new file mode 100644
index 0000000..9c25647
--- /dev/null
+++ b/lib/syntax/t.ml
@@ -0,0 +1,78 @@
+(**
+    This module contains the basic operators used in the QSP syntax.
+ *)
+
+type boperator =
+  | Eq
+  | Neq
+  | Plus
+  | Minus
+  | Product
+  | Div
+  | Gt
+  | Lt
+  | Gte
+  | Lte
+  | And
+  | Or
+  | Mod
+[@@deriving eq, show]
+
+and uoperator = No | Neg | Add [@@deriving eq, show]
+
+and assignation_operator = Eq' | Inc  (** += *) | Decr  (** -= *) | Mult
+[@@deriving eq, show]
+
+type function_ =
+  | Arrcomp
+  | Arrpos
+  | Arrsize
+  | Countobj
+  | Desc
+  | Desc'
+  | Dyneval
+  | Dyneval'
+  | Func
+  | Func'
+  | Getobj
+  | Getobj'
+  | Iif
+  | Iif'
+  | Input
+  | Input'
+  | Instr
+  | Isnum
+  | Isplay
+  | Lcase
+  | Lcase'
+  | Len
+  | Loc
+  | Max
+  | Max'
+  | Mid
+  | Mid'
+  | Min
+  | Min'
+  | Msecscount
+  | Qspver
+  | Qspver'
+  | Rand
+  | Replace
+  | Replace'
+  | Rgb
+  | Rnd
+  | Selact
+  | Stattxt
+  | Stattxt'
+  | Str
+  | Str'
+  | Strcomp
+  | Strfind
+  | Strfind'
+  | Strpos
+  | Trim
+  | Trim'
+  | Ucase
+  | Ucase'
+  | Val
+[@@deriving eq, show]