A TempleOS distro for heretics
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 

47 lines
1.1 KiB

//This is executed by the Adam task at boot.
//See $LK,"Adam Start-up",A="FF:::/Kernel/KMain.HC,\"StartOS"$.
#help_index "Compiler/Directive"
public extern I8i Option(I64i num,I8i val);
Option(0,0); //(0,0)=EchoOff (0,1)=EchoOn
#include "/Kernel/KernelA.HH"
#include "/Compiler/CompilerA.HH"
#include "/Kernel/KernelB.HH"
#include "/Kernel/KernelC.HH"
#include "/Compiler/CompilerB.HH"
Option(OPTf_WARN_PAREN,ON);
Option(OPTf_WARN_DUP_TYPES,ON);
HashTablePurge(adam_task->hash_table);
#include "/Adam/MakeAdam"
//Dbg("Type 'G;'");
DocTermNew;
//Raw(ON); -- this breaks inputs in KCfg
WinVert(2,10);
if (DrvIsWritable)
DirMk("/Tmp"); //Good to have a Tmp
DirMk("/Home"); // needed why?
DirMk("/0000Boot"); // needed why?
#include "/Adam/Opt/Boot/MakeBoot"
#include "/Adam/Opt/Utils/MakeUtils"
Cd(__DIR__);;
#include "ShrineCfg"
#include "ShrineDistro"
// Make 128MB RAMdisk B: (Distro tree + ISO are built here)
CBlkDev* res;
res=BlkDevNextFreeSlot('B',BDT_RAM);
res->unit = 0;
res->max_blk = 0x40000-1;
BlkDevAdd(res,,TRUE,TRUE);
MakeStdDistro;
CopySingle("B:/Shrine.ISO.C", "C:/Shrine.ISO");