X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=includes%2Fstg%2FMiscClosures.h;h=e68282ebc064b2feebdd6df708891f363c9bd604;hb=0ccb37ab2cc96f6e9cca7fe8fe0889efc13a8a69;hp=24323cdaff97cce301ef95d579785e53ce24273c;hpb=5407ad8e0a5c08ac5193c1a9ede2a12570baee0b;p=ghc-hetmet.git

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);