kOS/lib/boot.ks

function Bootstrap {
  parameter bootfile, init, compiled, copied, debug.
  compileInit(init, debug).
  compileLibs(compiled, debug).
  copyLibs(copied).

  if debug {
    // Open a terminal and run init.
    CORE:PART:GETMODULE("kOSProcessor"):DOEVENT("Open Terminal").
    if init <> "" {
      run "/init".
    }
  } else {
    DeletePath("1:" + bootfile).
    // Set OS to boot and restart.
    if init = "" {
      set CORE:BOOTFILENAME to init.
    } else {
      set CORE:BOOTFILENAME to "/init".
    }
    reboot.
  }
}

function compileLibs {
  parameter libs, debug.
  if debug {
    CopyLibs(libs).
    return.
  }

  for lib in libs {
    compile "0:" + lib to "1:" + lib.
  }
}

function copyLibs {
  parameter libs.
  for lib in libs {
    copypath("0:" + lib, "1:" + lib).
  }
}

function compileInit {
  parameter init, debug is false.

  if init = "" {
    return.
  }

  if debug {
    copypath("0:" + init, "1:/init").
    return.
  }

  compile "0:" + init to "1:/init".
}