diff options
Diffstat (limited to 'compiler/HsVersions.h')
| -rw-r--r-- | compiler/HsVersions.h | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/compiler/HsVersions.h b/compiler/HsVersions.h index 9a83af9768..bd28c69377 100644 --- a/compiler/HsVersions.h +++ b/compiler/HsVersions.h @@ -24,7 +24,6 @@ you will screw up the layout where they are used in case expressions! /* Global variables may not work in other Haskell implementations, * but we need them currently! so the conditional on GLASGOW won't do. */ -#ifndef __HADDOCK__ #if defined(__GLASGOW_HASKELL__) || !defined(__GLASGOW_HASKELL__) #define GLOBAL_VAR(name,value,ty) \ {-# NOINLINE name #-}; \ @@ -36,15 +35,6 @@ name = Util.global (value); name :: IORef (ty); \ name = Util.globalM (value); #endif -#else /* __HADDOCK__ */ -#define GLOBAL_VAR(name,value,ty) \ -name :: IORef (ty); \ -name = Util.global (value); - -#define GLOBAL_VAR_M(name,value,ty) \ -name :: IORef (ty); \ -name = Util.globalM (value); -#endif #define ASSERT(e) if debugIsOn && not (e) then (assertPanic __FILE__ __LINE__) else #define ASSERT2(e,msg) if debugIsOn && not (e) then (assertPprPanic __FILE__ __LINE__ (msg)) else |