diff options
| author | Camil Staps | 2019-10-21 22:25:36 +0200 |
|---|---|---|
| committer | Camil Staps | 2019-10-21 22:25:36 +0200 |
| commit | 49dc2a8d465e2a11c74da70ce8912795ddd2c2aa (patch) | |
| tree | 52aaeed9ebcdf50475b805fe49382f3dae7bd742 | |
| parent | Add support for file choosers (diff) | |
Fix accWorld
| -rw-r--r-- | src/Gtk/State.icl | 3 |
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 -> () |