From 9bfc8bf11e15b7b9a782f1757f9a0ebe324b16e4 Mon Sep 17 00:00:00 2001
From: Marijn Haverbeke <marijnh@gmail.com>
Date: Tue, 19 Apr 2011 10:15:26 +0200
Subject: Add log_err to rustboot

---
 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 18da8c6d..7b4f04b2 100644
--- a/src/boot/fe/token.ml
+++ b/src/boot/fe/token.ml
@@ -106,6 +106,7 @@ type token =
 
   (* Magic runtime services *)
   | LOG
+  | LOG_ERR
   | SPAWN
   | BIND
   | THREAD
@@ -269,6 +270,7 @@ let rec string_of_tok t =
 
     (* Magic runtime services *)
     | LOG        -> "log"
+    | LOG_ERR    -> "log_err"
     | SPAWN      -> "spawn"
     | BIND       -> "bind"
     | THREAD     -> "thread"
-- 
cgit v1.2.3