Fix everything so kakapo builds. Most failures involved the now-missing IO dynops.
[kakapo:kakapo.git] / src / Internals / kakapo_top.pir_tmpl
1 .namespace []
2
3 .loadlib 'io_ops'
4 .include 'iglobals.pasm'
5 .include 'interpinfo.pasm'
6 .include 'sysinfo.pasm'
7
8 # By virtue of appearing first in the library, this function runs before all other :init or :load
9 # subs. Call one of the Kakapo _pre_initload hooks to set up those modules that absolutely
10 # must be done first.
11
12 .sub '_kakapo_top_pre_initload' :load :init
13
14         $P0 = get_hll_global ['Kakapo'], '_pre_initload'
15         unless null $P0 goto call_sub
16
17         die "Could not locate Kakapo::_pre_initload. Is your library file corrupted?"
18
19 call_sub:
20         $P0()
21 .end