Revision 05ff7a00 htools/Ganeti/HTools/Utils.hs
b/htools/Ganeti/HTools/Utils.hs | ||
---|---|---|
72 | 72 |
|
73 | 73 |
-- | Show the first parameter before returning the second one. |
74 | 74 |
debugXy :: Show a => a -> b -> b |
75 |
debugXy a b = debug a `seq` b
|
|
75 |
debugXy = seq . debug
|
|
76 | 76 |
|
77 | 77 |
-- * Miscellaneous |
78 | 78 |
|
Also available in: Unified diff