about summary refs log tree commit diff
path: root/src/boot/fe/token.ml
diff options
context:
space:
mode:
authorPatrick Walton <pcwalton@mimiga.net>2011-05-02 17:47:24 -0700
committerPatrick Walton <pcwalton@mimiga.net>2011-05-02 17:50:46 -0700
commit147a2d655f86c66b6edfebc20b927a8de8668722 (patch)
tree5af8cebd67a6fe620fbe4fb84a9e73cabf764251 /src/boot/fe/token.ml
parent480eda0f10fabd6e76a30c91df1d84740d6f81cc (diff)
Un-revert "Use different syntax for checks that matter to typestate", fixing the problem.
This reverts commit d08b443fffb1181d8d45ae5d061412f202dd4118.
Diffstat (limited to 'src/boot/fe/token.ml')
-rw-r--r--src/boot/fe/token.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/boot/fe/token.ml b/src/boot/fe/token.ml
index 0b157983984..27cb399b551 100644
--- a/src/boot/fe/token.ml
+++ b/src/boot/fe/token.ml
@@ -77,6 +77,7 @@ type token =
   (* Type and type-state keywords *)
   | TYPE
   | CHECK
+  | ASSERT
   | CLAIM
   | PROVE
 
@@ -237,6 +238,7 @@ let rec string_of_tok t =
     (* Type and type-state keywords *)
     | TYPE       -> "type"
     | CHECK      -> "check"
+    | ASSERT     -> "assert"
     | CLAIM      -> "claim"
     | PROVE      -> "prove"