Agar (http://libagar.org) uses AG_FunctionFoo as naming convention and
I like to write hooks of the form
{#fun FunctionFoo as ^ ... #}
As it stands, though, c2hs-0.15.1 will lowercase the second F,
unnecessarily.
I attached a patch against c2hs/chs/CHS.hs that fixes this... I'm not
completely sure of it, though, as apathToIdent looks like it could be
important. Anyway, for me the patch does what it's supposed to do.
--
(c) this sig last receiving data processing entity. Inspect headers
for copyright history. All rights reserved. Copying, hiring, renting,
performance and/or quoting of this signature prohibited.
930,931c930
< let lowerFirst (c:cs) = toLower c : cs
< in onlyPosIdent (posOf ide) (lowerFirst $ identToLexeme ide)
---
> onlyPosIdent (posOf ide) (identToLexeme ide)
1086c1085
< adjustCase (c:cs) = toUpper c : map toLower cs
---
> adjustCase (c:cs) = toUpper c : cs
_______________________________________________
C2hs mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/c2hs
