Don't kebab case macros.

This commit is contained in:
Erik Svedäng 2018-03-11 20:17:26 +01:00
parent 2a79007a18
commit 7f3eeb392d

View File

@ -55,7 +55,7 @@ parseHeaderFile path src prefix kebab =
let tyXObj =
--toTypeXObj ("a", 0)
XObj (Sym (SymPath [] "a") Symbol) Nothing Nothing
return (createRegisterForm name tyXObj prefix kebab)
return (createRegisterForm name tyXObj prefix False) -- OBS! Never kebab
prefixedFunctionPrototype :: Parsec.Parsec String () [XObj]
prefixedFunctionPrototype = do Parsec.many spaceOrTab