Add "GUI not supported" primitives to Faustine.

[Faustine.git] / interpreter / lexer.mll

diff --git a/interpreter/lexer.mll b/interpreter/lexer.mll
index 353712a..48b3729 100644 (file)
--- a/interpreter/lexer.mll
+++ b/interpreter/lexer.mll
@@ -57,6 +57,17 @@ rule token = parse
 | "selectthree"                         { IDENT Select3}  
 | "rdtable"                             { IDENT Rdtable}
 | "rwtable"                            { IDENT Rwtable}
+| "button"                             { IDENT Button}
+| "checkbox"                           { IDENT Checkbox}
+| "vslider"                            { IDENT Vslider}
+| "hslider"                            { IDENT Hslider}
+| "vgroup"                             { IDENT Vgroup}
+| "hgroup"                             { IDENT Hgroup}
+| "tgroup"                             { IDENT Tgroup}
+| "hbargraph"                          { IDENT Hbargraph}
+| "vbargraph"                          { IDENT Vbargraph}
+| "nentry"                             { IDENT Nentry}
+| "attach"                             { IDENT Attach}
 
 | ['0'-'9']+ as a                      { CONST a }
 | '.'                                   { POINT }