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

fixed compile-errors.

Browse Source
This commit is contained in:
Nicole Dresselhaus 2022-03-21 13:44:14 +01:00
parent 69a9bf50a5
commit a4237d369f
Signed by: Drezil
GPG Key ID: AC88BB432537313A
2 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
imgui

@ -1 +1 @@
Subproject commit bc5d864c4f036f1a88ce92ae12636f0469163874 Subproject commit db20d38864f6b598e255cef116add91ab08e66de

5
src/DearImGui/Raw/DrawList.hs
View File

@ -412,8 +412,8 @@ addText_ (DrawList drawList) pos col text_begin text_end = liftIO do
} }
|] |]
addText :: MonadIO m => DrawList -> Ptr ImFont -> CFloat -> Ptr ImVec2 -> ImU32 -> CString -> CString -> CFloat -> Ptr ImVec4 -> m () addText :: MonadIO m => DrawList -> Ptr ImFont -> CFloat -> Ptr ImVec2 -> ImU32 -> CString -> CString -> CFloat -> CFloat -> Ptr ImVec4 -> m ()
addText (DrawList drawList) fontPtr font_size pos col text_begin text_end wrap_width cpu_fine_clip_rect = liftIO do addText (DrawList drawList) fontPtr font_size pos col text_begin text_end wrap_width text_align cpu_fine_clip_rect = liftIO do
[C.block| [C.block|
void { void {
$(ImDrawList* drawList)->AddText( $(ImDrawList* drawList)->AddText(
@ -424,6 +424,7 @@ addText (DrawList drawList) fontPtr font_size pos col text_begin text_end wrap_w
$(char* text_begin), $(char* text_begin),
$(char* text_end), $(char* text_end),
$(float wrap_width), $(float wrap_width),
$(float text_align),
$(ImVec4* cpu_fine_clip_rect) $(ImVec4* cpu_fine_clip_rect)
); );
} }