Drezil/dear-imgui.hs
1
0
Fork 0
mirror of https://github.com/Drezil/dear-imgui.hs.git synced 2025-11-04 07:01:06 +01:00
Code Issues Packages Projects Releases Wiki Activity

Add Show instances to structs and enums (#90)

Browse Source
This commit is contained in:
Alexander Bondarenko
2021-09-11 13:40:05 +03:00
committed by GitHub
parent be7aa1e9b1
commit efaaa5723a
2 changed files with 5 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
generator/DearImGui/Generator.hs
View File

@@ -125,9 +125,9 @@ declareEnumeration finiteEnumName countName ( Enumeration {..} ) = do
classes :: [ TH.Q TH.Type ]
classes
| isFlagEnum
= map TH.conT [ ''Eq, ''Ord, ''Storable, ''Bits ]
= map TH.conT [ ''Eq, ''Ord, ''Show, ''Storable, ''Bits ]
| otherwise
= map TH.conT [ ''Eq, ''Ord, ''Storable ]
= map TH.conT [ ''Eq, ''Ord, ''Show, ''Storable ]
derivClause :: TH.Q TH.DerivClause
derivClause = TH.derivClause ( Just TH.NewtypeStrategy ) classes