summaryrefslogtreecommitdiff
path: root/compiler/cmm/CmmLint.hs
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2012-01-17 11:26:23 +0000
committerSimon Marlow <marlowsd@gmail.com>2012-01-17 11:26:23 +0000
commit46b03136fd39d033b6e0ee5e56c6df0bc4248feb (patch)
tree771e5a15b9f4f3cff16e11ec6418675f05eb4f78 /compiler/cmm/CmmLint.hs
parent919a298f8c55a343621d5f97d69fca7d74e0888b (diff)
downloadhaskell-46b03136fd39d033b6e0ee5e56c6df0bc4248feb.tar.gz
Snapshot
Diffstat (limited to 'compiler/cmm/CmmLint.hs')
-rw-r--r--compiler/cmm/CmmLint.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/cmm/CmmLint.hs b/compiler/cmm/CmmLint.hs
index 9e70a55bfc..f50d9629b7 100644
--- a/compiler/cmm/CmmLint.hs
+++ b/compiler/cmm/CmmLint.hs
@@ -11,9 +11,10 @@ module CmmLint (
) where
import Cmm
+import Outputable
cmmLint :: CmmGraph -> IO ()
-cmmLint g = pprTrace "ToDo! CmmLint" return ()
+cmmLint g = return () -- TODO!!
-- Things to check:
-- - invariant on CmmBlock in CmmExpr (see comment there)