diff options
| author | Josh Rahm <joshuarahm@gmail.com> | 2026-01-14 00:09:26 -0700 |
|---|---|---|
| committer | Josh Rahm <joshuarahm@gmail.com> | 2026-01-14 00:11:37 -0700 |
| commit | f216280bc0fdc4a6f00187dba1d1ddc22b54097d (patch) | |
| tree | 64637e9df49011b3ec81738b4347ab7a97e88980 /montis/src/Montis/Base | |
| parent | cc6302ee2073d1ea40608abb77ca6019feca4a2a (diff) | |
| download | montis-main.tar.gz montis-main.tar.bz2 montis-main.zip | |
It makes a bit more sense.
Diffstat (limited to 'montis/src/Montis/Base')
| -rw-r--r-- | montis/src/Montis/Base/Foreign/Runtime.hs | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/montis/src/Montis/Base/Foreign/Runtime.hs b/montis/src/Montis/Base/Foreign/Runtime.hs index 46507b5..5690b51 100644 --- a/montis/src/Montis/Base/Foreign/Runtime.hs +++ b/montis/src/Montis/Base/Foreign/Runtime.hs @@ -12,26 +12,26 @@ foreign import ccall "montis_do_request_log" foreign_doRequestLog :: Ptr Void -> foreign import ccall "montis_do_request_exit" foreign_doRequestExit :: Ptr Void -> CInt -> IO () -foreign import ccall "arksoul_get_seat" foreign_getSeat :: Ptr Void -> IO (Ptr Void) +foreign import ccall "arkworld_get_seat" foreign_getSeat :: Ptr Void -> IO (Ptr Void) -foreign import ccall "arksoul_toplevel_at" +foreign import ccall "arkworld_toplevel_at" foreign_toplevelAt :: Ptr Void -> CDouble -> CDouble -> IO (Ptr ForeignMontisToplevel) -foreign import ccall "arksoul_get_toplevel_position" +foreign import ccall "arkworld_get_toplevel_position" foreign_getToplevelPosition :: Ptr ForeignMontisToplevel -> Ptr CDouble -> Ptr CDouble -> IO () -foreign import ccall "arksoul_set_toplevel_position" +foreign import ccall "arkworld_set_toplevel_position" foreign_setToplevelPosition :: Ptr ForeignMontisToplevel -> CDouble -> CDouble -> IO () -foreign import ccall "arksoul_get_toplevel_geometry" +foreign import ccall "arkworld_get_toplevel_geometry" foreign_getToplevelGeometry :: Ptr ForeignMontisToplevel -> Ptr CDouble -> Ptr CDouble -> Ptr CDouble -> Ptr CDouble -> IO () -foreign import ccall "arksoul_set_toplevel_geometry" +foreign import ccall "arkworld_set_toplevel_geometry" foreign_setToplevelGeometry :: Ptr ForeignMontisToplevel -> CDouble -> CDouble -> CDouble -> CDouble -> IO () -foreign import ccall "arksoul_focus_toplevel" +foreign import ccall "arkworld_focus_toplevel" foreign_focusToplevel :: Ptr ForeignMontisToplevel -> IO () -foreign import ccall "arksoul_warp_cursor" +foreign import ccall "arkworld_warp_cursor" foreign_warpCursor :: Ptr Void -> CDouble -> CDouble -> IO () |