aboutsummaryrefslogtreecommitdiff
path: root/syntax/t.ml
diff options
context:
space:
mode:
Diffstat (limited to 'syntax/t.ml')
-rw-r--r--syntax/t.ml77
1 files changed, 77 insertions, 0 deletions
diff --git a/syntax/t.ml b/syntax/t.ml
new file mode 100644
index 0000000..12be4b4
--- /dev/null
+++ b/syntax/t.ml
@@ -0,0 +1,77 @@
+(**
+ 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 (** -= *)
+[@@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
+ | 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]