From 9d0d350d2cb62a0396c2d186fcfb936edfc150e8 Mon Sep 17 00:00:00 2001
From: Jeffrey Yasskin <jyasskin@gmail.com>
Date: Mon, 19 Jul 2010 13:59:57 +0800
Subject: Make the LLVM compiler crash when it hits a source construct it
 doesn't know what to do with, rather than silently omitting it from the
 output.

---
 src/boot/util/common.ml | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'src/boot/util')

diff --git a/src/boot/util/common.ml b/src/boot/util/common.ml
index 3271b644..63a4a321 100644
--- a/src/boot/util/common.ml
+++ b/src/boot/util/common.ml
@@ -25,6 +25,10 @@ let bug _ =
   in Printf.ksprintf k
 ;;
 
+(* TODO: On some joyous day, remove me. *)
+exception Not_implemented of string
+;;
+
 exception Semant_err of ((node_id option) * string)
 ;;
 
-- 
cgit v1.2.3