From: Daniel W. <dm...@lu...> - 2013-04-01 21:09:07
|
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 |