From 7287d3aaa0545a9b22cea874f2d751de4fefd23d Mon Sep 17 00:00:00 2001
From: Graydon Hoare <graydon@mozilla.com>
Date: Tue, 14 Sep 2010 10:52:32 -0700
Subject: Teach front-end about simple, first-cut version of const items.

---
 src/boot/fe/token.ml | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src/boot/fe/token.ml')

diff --git a/src/boot/fe/token.ml b/src/boot/fe/token.ml
index 64aef2a4..e6f8cd4b 100644
--- a/src/boot/fe/token.ml
+++ b/src/boot/fe/token.ml
@@ -93,6 +93,7 @@ type token =
 
   (* Value / stmt declarators *)
   | LET
+  | CONST
 
   (* Magic runtime services *)
   | LOG
@@ -246,6 +247,7 @@ let rec string_of_tok t =
 
     (* Value / stmt declarators. *)
     | LET        -> "let"
+    | CONST      -> "const"
 
     (* Magic runtime services *)
     | LOG        -> "log"
-- 
cgit v1.2.3