diff --git a/src/0000Boot/0000Kernel.BIN.C b/src/0000Boot/0000Kernel.BIN.C index a584c51..8575b26 100755 Binary files a/src/0000Boot/0000Kernel.BIN.C and b/src/0000Boot/0000Kernel.BIN.C differ diff --git a/src/Compiler/Compiler.BIN b/src/Compiler/Compiler.BIN index a4a7a06..e2f81e9 100755 Binary files a/src/Compiler/Compiler.BIN and b/src/Compiler/Compiler.BIN differ diff --git a/src/Demo/AcctExample/TOS/TOSDistro.CC b/src/Demo/AcctExample/TOS/TOSDistro.CC index 7811859..9e14185 100755 --- a/src/Demo/AcctExample/TOS/TOSDistro.CC +++ b/src/Demo/AcctExample/TOS/TOSDistro.CC @@ -56,7 +56,7 @@ public U0 TOSPromptAndCopyDrive() U0 DistroPrep() { - AOnceFlush; //Don't want in Registry + ZOnceFlush; //Don't want in Registry OnceFlush; Del("/Home/Demo*"); diff --git a/src/Demo/OnceDemo.CC b/src/Demo/OnceDemo.CC index 30cc49b..a39756c 100755 --- a/src/Demo/OnceDemo.CC +++ b/src/Demo/OnceDemo.CC @@ -9,4 +9,4 @@ U0 OnceDemo() OnceDemo; -//There are variants for zenith $LK,"AOnce",A="MN:AOnce"$(). +//There are variants for zenith $LK,"ZOnce",A="MN:ZOnce"$(). diff --git a/src/Doc/Once.DD b/src/Doc/Once.DD index 97b7dd3..e83069e 100755 --- a/src/Doc/Once.DD +++ b/src/Doc/Once.DD @@ -6,9 +6,9 @@ $WW,1$$LK,"KMain",A="MN:KMain"$() includes $LK,"~/Once.CC"$ calls $LK,"OnceExe",A="MN:OnceExe"$(). -$LK,"AOnce",A="MN:AOnce"$() appends src code to $LK,"~/Registry.CC"$ $FG,2$Once/Zenith$FG$ tree, executed at next boot by $FG,2$Zenith$FG$. +$LK,"ZOnce",A="MN:ZOnce"$() appends src code to $LK,"~/Registry.CC"$ $FG,2$Once/Zenith$FG$ tree, executed at next boot by $FG,2$Zenith$FG$. $LK,"Once",A="MN:Once"$() appends src code to $LK,"~/Registry.CC"$ $FG,2$Once/User$FG$ tree, executed at next boot by first $FG,2$User$FG$ term. -At boot, $LK,"OnceExe",A="MN:OnceExe"$(), executes $FG,2$Once/Zenith$FG$ tree, $LK,"AOnceFlush",A="MN:AOnceFlush"$()s it, +At boot, $LK,"OnceExe",A="MN:OnceExe"$(), executes $FG,2$Once/Zenith$FG$ tree, $LK,"ZOnceFlush",A="MN:ZOnceFlush"$()s it, executes $FG,2$Once/User$FG$ tree and $LK,"OnceFlush",A="MN:OnceFlush"$()s. diff --git a/src/Doc/Print.DD b/src/Doc/Print.DD index 4acfde6..2a4b01a 100755 --- a/src/Doc/Print.DD +++ b/src/Doc/Print.DD @@ -81,7 +81,7 @@ $LK,"ExePrint",A="MN:ExePrint"$(U8 *format,...) compiles and execute a string. $LK,"Once",A="MN:Once"$(U8 *format,...) Writes User code to $LK,"Registry",A="FI:~/Registry.CC"$ to be executed next boot. -$LK,"AOnce",A="MN:AOnce"$(U8 *format,...) Writes Zenith code to $LK,"Registry",A="FI:~/Registry.CC"$ to be executed next boot. +$LK,"ZOnce",A="MN:ZOnce"$(U8 *format,...) Writes Zenith code to $LK,"Registry",A="FI:~/Registry.CC"$ to be executed next boot. $LK,"InPrint",A="MN:InPrint"$(I64 mS,U8 *format,...) $LK,"PutChars",A="MN:PutChars"$()s one at a time with a delay. diff --git a/src/Kernel.BIN.C b/src/Kernel.BIN.C index df57217..f0b1cdc 100755 Binary files a/src/Kernel.BIN.C and b/src/Kernel.BIN.C differ diff --git a/src/Tmp/MyDistro.iso b/src/Tmp/MyDistro.iso index 343d2d4..0e5afd3 100755 Binary files a/src/Tmp/MyDistro.iso and b/src/Tmp/MyDistro.iso differ diff --git a/src/Zenith/ZRegistry.CC b/src/Zenith/ZRegistry.CC index 9a16ee1..7807a25 100755 --- a/src/Zenith/ZRegistry.CC +++ b/src/Zenith/ZRegistry.CC @@ -122,8 +122,8 @@ U0 RegInit() #help_index "Boot/Once;Registry/Once" #help_file "::/Doc/Once" -public U0 AOnceFlush() -{//Flush AOnce() buf. +public U0 ZOnceFlush() +{//Flush ZOnce() buf. RegWrite("Once/Zenith",""); } @@ -132,11 +132,11 @@ public U0 OnceFlush() RegWrite("Once/User",""); } -public U0 AOnce(U8 *format,...) +public U0 ZOnce(U8 *format,...) {//Add Zenith code to $LK,"~/Registry.CC"$, executed next boot. U8 *buf=StrPrintJoin(NULL,format,argc,argv); if (!Bt(&sys_run_level,RLf_ONCE_ZENITH)) - AOnceFlush; + ZOnceFlush; RegAppend("Once/Zenith","%s\n",buf); Free(buf); } @@ -150,14 +150,14 @@ public U0 Once(U8 *format,...) Free(buf); } -public U0 AOnceDrive(U8 drv_let=0,U8 *format,...) +public U0 ZOnceDrive(U8 drv_let=0,U8 *format,...) {//Add Zenith code to drv $LK,"~/Registry.CC"$, executed next boot. U8 *buf=StrPrintJoin(NULL,format,argc,argv); I64 old_drive_let=*sys_registry_doc->filename.name; if (drv_let) *sys_registry_doc->filename.name=drv_let; if (!Bt(&sys_run_level,RLf_ONCE_ZENITH)) - AOnceFlush; + ZOnceFlush; RegAppend("Once/Zenith","%s\n",buf); Free(buf); *sys_registry_doc->filename.name=old_drive_let; @@ -183,7 +183,7 @@ public U0 OnceExe() RegDefault("Once/Zenith",""); if (RegCount("Once/Zenith")>2) { Zenith("RegExe(\"Once/Zenith\");"); - AOnceFlush; + ZOnceFlush; } LBts(&sys_run_level,RLf_ONCE_ZENITH); @@ -195,7 +195,7 @@ public U0 OnceExe() LBts(&sys_run_level,RLf_ONCE_USER); } catch { - AOnceFlush; + ZOnceFlush; LBts(&sys_run_level,RLf_ONCE_ZENITH); OnceFlush; LBts(&sys_run_level,RLf_ONCE_USER);