Drezil/dear-imgui.hs
1
0
Fork 0
mirror of https://github.com/Drezil/dear-imgui.hs.git synced 2025-07-19 19:23:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fix GHC-9.2 build (#145)

Browse Source
This commit is contained in:
Alexander Bondarenko
2022-03-28 16:04:22 +03:00
committed by GitHub
parent 7d4f3a8b93
commit 08d4b423ad
3 changed files with 34 additions and 37 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
generator/DearImGui/Generator.hs
View File

@ -24,6 +24,10 @@ import Data.Traversable
( for )
import Foreign.Storable
( Storable )
#if MIN_VERSION_template_haskell(2,18,0)
import Data.Coerce
( coerce )
#endif
-- containers
import Data.Map.Strict
@ -171,7 +175,7 @@ declareEnumeration finiteEnumName countName ( Enumeration {..} ) = do
else
\ nm args dir pat ->
TH.patSynD_doc nm args dir pat
( Just $ Text.unpack patDoc ) []
( Just $ Text.unpack _patDoc ) []
)
#else
TH.patSynD