From 176899a970b5ccea7aea43bee31c9ee08860ab0f Mon Sep 17 00:00:00 2001
From: Patrick Walton <pcwalton@mimiga.net>
Date: Fri, 13 Aug 2010 16:33:04 -0700
Subject: [PATCH] Evil solution to the problem of importing the same opaque
 from two different files. Closes #145.

---
 src/boot/me/dwarf.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/boot/me/dwarf.ml b/src/boot/me/dwarf.ml
index 1ff6c8ad6fd..552b41e4108 100644
--- a/src/boot/me/dwarf.ml
+++ b/src/boot/me/dwarf.ml
@@ -2795,6 +2795,7 @@ let rec extract_meta
     queue_to_arr meta
 ;;
 
+let external_opaques = Hashtbl.create 0;;
 
 let rec extract_mod_items
     (nref:node_id ref)
@@ -2816,7 +2817,6 @@ let rec extract_mod_items
       id
   in
 
-  let external_opaques = Hashtbl.create 0 in
   let get_opaque_of o =
     htab_search_or_add external_opaques o
       (fun _ -> next_opaque_id())