summaryrefslogtreecommitdiff
path: root/compiler/HsVersions.h
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/HsVersions.h')
-rw-r--r--compiler/HsVersions.h25
1 files changed, 0 insertions, 25 deletions
diff --git a/compiler/HsVersions.h b/compiler/HsVersions.h
deleted file mode 100644
index 10cc152ea1..0000000000
--- a/compiler/HsVersions.h
+++ /dev/null
@@ -1,25 +0,0 @@
-#pragma once
-
-#if 0
-
-IMPORTANT! If you put extra tabs/spaces in these macro definitions,
-you will screw up the layout where they are used in case expressions!
-
-(This is cpp-dependent, of course)
-
-#endif
-
-#define ASSERT(e) if debugIsOn && not (e) then (assertPanic __FILE__ __LINE__) else
-#define ASSERT2(e,msg) if debugIsOn && not (e) then (assertPprPanic (msg)) else
-#define WARN( e, msg ) (warnPprTrace (e) (msg)) $
-
--- Examples: Assuming flagSet :: String -> m Bool
---
--- do { c <- getChar; MASSERT( isUpper c ); ... }
--- do { c <- getChar; MASSERT2( isUpper c, text "Bad" ); ... }
--- do { str <- getStr; ASSERTM( flagSet str ); .. }
--- do { str <- getStr; ASSERTM2( flagSet str, text "Bad" ); .. }
-#define MASSERT(e) ASSERT(e) return ()
-#define MASSERT2(e,msg) ASSERT2(e,msg) return ()
-#define ASSERTM(e) do { bool <- e; MASSERT(bool) }
-#define ASSERTM2(e,msg) do { bool <- e; MASSERT2(bool,msg) }