summaryrefslogtreecommitdiffstats
path: root/otherlibs/labltk/builtin/builtin_text.ml
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/labltk/builtin/builtin_text.ml')
-rw-r--r--otherlibs/labltk/builtin/builtin_text.ml24
1 files changed, 24 insertions, 0 deletions
diff --git a/otherlibs/labltk/builtin/builtin_text.ml b/otherlibs/labltk/builtin/builtin_text.ml
new file mode 100644
index 000000000..1b6d6facd
--- /dev/null
+++ b/otherlibs/labltk/builtin/builtin_text.ml
@@ -0,0 +1,24 @@
+(* Not a string as such, more like a symbol *)
+
+(* type *)
+type textMark = string
+(* /type *)
+
+(* type *)
+type textTag = string
+(* /type *)
+
+(* type *)
+type textModifier = [
+ `Char(int) (* tk keyword: +/- Xchars *)
+ | `Line(int) (* tk keyword: +/- Xlines *)
+ | `Linestart (* tk keyword: linestart *)
+ | `Lineend (* tk keyword: lineend *)
+ | `Wordstart (* tk keyword: wordstart *)
+ | `Wordend (* tk keyword: wordend *)
+]
+(* /type *)
+
+(* type *)
+type textIndex = text_index * textModifier list
+(* /type *)