amend order of Glfw.swapBuffers and Glfw.pollEvents in imperative shell (previous order polled events before swapping buffers which is not the intended order)
This commit is contained in:
@@ -39,8 +39,8 @@ struct
|
|||||||
AppDraw.drawTriangles (triangleDrawObject, triangleDrawLength)
|
AppDraw.drawTriangles (triangleDrawObject, triangleDrawLength)
|
||||||
val _ = AppDraw.drawButton (buttonDrawObject, buttonDrawLength)
|
val _ = AppDraw.drawButton (buttonDrawObject, buttonDrawLength)
|
||||||
|
|
||||||
val _ = Glfw.pollEvents ()
|
|
||||||
val _ = Glfw.swapBuffers window
|
val _ = Glfw.swapBuffers window
|
||||||
|
val _ = Glfw.pollEvents ()
|
||||||
in
|
in
|
||||||
draw
|
draw
|
||||||
( drawMailbox
|
( drawMailbox
|
||||||
|
|||||||
Reference in New Issue
Block a user