From: Simon Marlow <marlowsd@gmail.com>
Date: Tue, 8 Dec 2009 10:09:25 +0000 (+0000)
Subject: declare g0 (fixes compilation failure with -fvia-C)
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=4caf3550d43477e0948d3212868a665d08c0cfbc

declare g0 (fixes compilation failure with -fvia-C)
---

diff --git a/includes/stg/MiscClosures.h b/includes/stg/MiscClosures.h
index 24323cd..e68282e 100644
--- a/includes/stg/MiscClosures.h
+++ b/includes/stg/MiscClosures.h
@@ -618,7 +618,7 @@ extern StgWord stg_ap_stack_entries[];
 extern StgWord stg_stack_save_entries[];
 
 // Storage.c
-extern unsigned int RTS_VAR(alloc_blocks);
+extern unsigned int RTS_VAR(g0);
 extern unsigned int RTS_VAR(alloc_blocks_lim);
 extern StgWord RTS_VAR(weak_ptr_list);
 extern StgWord RTS_VAR(atomic_modify_mutvar_mutex);