From: Simon Marlow <simonmarhaskell@gmail.com>
Date: Wed, 16 Apr 2008 21:52:45 +0000 (+0000)
Subject: use RTS_VAR()
X-Git-Tag: Before_cabalised-GHC~228
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=5f15c042606033ce3b953837fc4a2f76674c4839;p=ghc-hetmet.git

use RTS_VAR()
---

diff --git a/includes/Storage.h b/includes/Storage.h
index 32d4e9b..d109a17 100644
--- a/includes/Storage.h
+++ b/includes/Storage.h
@@ -121,7 +121,7 @@ extern generation * RTS_VAR(g0);
 extern step * RTS_VAR(g0s0);
 extern generation * RTS_VAR(oldest_gen);
 extern step * RTS_VAR(all_steps);
-extern nat total_steps;
+extern nat RTS_VAR(total_steps);
 
 /* -----------------------------------------------------------------------------
    Initialisation / De-initialisation