2021-07-02 00:53:42 +01:00
|
|
|
//This is executed by the System task at boot.
|
2021-12-11 11:21:22 +00:00
|
|
|
//See $LK,"System Start-up",A="FF:::/Kernel/KMain.ZC,\"StartOS"$.
|
2020-02-15 20:01:48 +00:00
|
|
|
|
|
|
|
#help_index "Compiler/Directive"
|
2020-04-11 23:19:38 +01:00
|
|
|
public extern I8i Option(I64i num, I8i val);
|
2020-02-20 23:40:10 +00:00
|
|
|
Option(0,0); //(0,0)=EchoOff (0,1)=EchoOn
|
2020-02-15 20:01:48 +00:00
|
|
|
|
|
|
|
#include "/Kernel/KernelA.HH"
|
|
|
|
#include "/Compiler/CompilerA.HH"
|
|
|
|
#include "/Kernel/KernelB.HH"
|
|
|
|
#include "/Kernel/KernelC.HH"
|
|
|
|
#include "/Compiler/CompilerB.HH"
|
|
|
|
|
2020-04-11 23:19:38 +01:00
|
|
|
Option(OPTf_WARN_PAREN, ON);
|
|
|
|
Option(OPTf_WARN_DUP_TYPES, ON);
|
2021-07-02 00:53:42 +01:00
|
|
|
HashTablePurge(sys_task->hash_table);
|
2020-02-15 20:01:48 +00:00
|
|
|
|
2021-07-02 00:53:42 +01:00
|
|
|
#include "/System/MakeSystem"
|
2020-02-15 20:01:48 +00:00
|
|
|
|
2020-02-15 22:25:33 +00:00
|
|
|
//Debug("Type 'G;'");
|
2020-02-15 20:01:48 +00:00
|
|
|
DocTermNew;
|
2021-07-03 00:38:56 +01:00
|
|
|
WinVert(2, text.rows / 8);
|
2020-02-15 20:01:48 +00:00
|
|
|
|
2021-09-19 06:58:38 +01:00
|
|
|
sys_winmgr_task = Spawn(&WinMgrTask, NULL, "Window Manager");
|
2020-04-11 23:19:38 +01:00
|
|
|
Fs->win_inhibit = WIG_TASK_DEFAULT - WIF_SELF_BORDER - WIF_SELF_GRAB_SCROLL - WIF_SELF_CTRLS;
|
|
|
|
LBts(&Fs->display_flags, DISPLAYf_CHILDREN_NOT_ON_TOP);
|
|
|
|
LBts(&Fs->display_flags, DISPLAYf_SHOW);
|
2020-02-15 20:01:48 +00:00
|
|
|
RegInit;
|
2020-04-11 23:19:38 +01:00
|
|
|
LBts(&sys_run_level, RLf_REGISTRY);
|
2020-02-15 20:01:48 +00:00
|
|
|
|
|
|
|
WallPaperInit;
|
|
|
|
|
2020-02-15 22:53:02 +00:00
|
|
|
if (DriveIsWritable)
|
2020-02-20 23:40:10 +00:00
|
|
|
DirMake("/Tmp"); //Good to have a Tmp
|
2020-02-15 20:01:48 +00:00
|
|
|
|
2020-04-11 23:19:38 +01:00
|
|
|
Option(OPTf_WARN_PAREN, OFF);
|
|
|
|
Option(OPTf_WARN_DUP_TYPES, OFF);
|
|
|
|
LBts(&sys_run_level, RLf_HOME);
|
2020-02-15 20:01:48 +00:00
|
|
|
|
|
|
|
#help_index ""
|
|
|
|
#include "~/MakeHome"
|
|
|
|
|
2021-07-02 00:53:42 +01:00
|
|
|
//After this file, the System task enters $LK,"server mode",A="HI:Job"$.
|