projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
2e3fc43
)
[project @ 1998-08-14 11:10:37 by sof]
author
sof
<unknown>
Fri, 14 Aug 1998 11:10:37 +0000
(11:10 +0000)
committer
sof
<unknown>
Fri, 14 Aug 1998 11:10:37 +0000
(11:10 +0000)
abstract away the real home of trace, and re-export it from here
ghc/compiler/utils/Util.lhs
patch
|
blob
|
history
diff --git
a/ghc/compiler/utils/Util.lhs
b/ghc/compiler/utils/Util.lhs
index
34d36ae
..
3319856
100644
(file)
--- a/
ghc/compiler/utils/Util.lhs
+++ b/
ghc/compiler/utils/Util.lhs
@@
-47,6
+47,9
@@
module Util (
IF_NOT_GHC(applyToSnd COMMA foldPair COMMA)
unzipWith,
+ -- tracing (abstract away from lib home)
+ trace,
+
-- error handling
panic, panic#, assertPanic
@@
-56,6
+59,7
@@
module Util (
import FastString ( FastString )
import List ( zipWith4 )
+import GlaExts ( trace )
infixr 9 `thenCmp`
\end{code}