blob: 295d153a9f836d6d587ea0f6b000bb8189ec6cff (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
-- | Module that provides the start hooks using the config required to link the
-- world's shared library.
module Link () where
import Config (config)
import Montis.Core
foreign export ccall "arkworld_export_enworld"
coldStart :: MontisColdStart
foreign export ccall "arkworld_export_rebirth"
hotStart :: MontisHotStart
coldStart :: MontisColdStart
coldStart = coldStartMontis config
hotStart :: MontisHotStart
hotStart = hotStartMontis config
|
