summaryrefslogtreecommitdiff
path: root/src/Gtk/State.icl
diff options
context:
space:
mode:
authorCamil Staps2019-10-21 22:25:36 +0200
committerCamil Staps2019-10-21 22:25:36 +0200
commit49dc2a8d465e2a11c74da70ce8912795ddd2c2aa (patch)
tree52aaeed9ebcdf50475b805fe49382f3dae7bd742 /src/Gtk/State.icl
parentAdd support for file choosers (diff)
Fix accWorld
Diffstat (limited to 'src/Gtk/State.icl')
-rw-r--r--src/Gtk/State.icl3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Gtk/State.icl b/src/Gtk/State.icl
index 6adaf9c..ff97b40 100644
--- a/src/Gtk/State.icl
+++ b/src/Gtk/State.icl
@@ -64,7 +64,8 @@ accWorld f = state \st
voidToWorld :: !() -> *World
voidToWorld _ = code {
- no_op
+ fill_a 0 1
+ pop_a 1
}
worldToVoid :: !*World -> ()