diffing dir...
Mon Apr 1 22:04:17 BST 2013 Daniel Wagner <da...@wa...>
* minor drive-by refactoring
Ignore-this: d0c93659ba9848fe5c9c19ea7f4c6ef3
hunk ./tools/c2hs/gen/GenBind.hs 422
- let prefix = case oprefix of
- Nothing -> gprefix
- Just pref -> pref
-
- let trans = transTabToTransFun prefix chsTrans
- hide = identToLexeme . fromMaybe cide $ oalias
+ let prefix = fromMaybe gprefix oprefix
+ trans = transTabToTransFun prefix chsTrans
+ hide = identToLexeme . fromMaybe cide $ oalias
|
