From: Ralph Ronnquist <ralph.ronnquist@gmail.com>
Date: Wed, 5 May 2021 03:51:09 +0000 (+1000)
Subject: slight rebranding
X-Git-Url: https://git.rrq.au/?a=commitdiff_plain;h=66a7dc89cdd30b31fab0c529790b79dcf365d068;p=rrq%2Fjonasforth.git

slight rebranding
---

diff --git a/init/sys.f b/init/sys.f
index 6e7c853..bf79f38 100644
--- a/init/sys.f
+++ b/init/sys.f
@@ -75,8 +75,9 @@ EXIT [
     KEY
   10 = UNTIL ;
 
-\ So far, S" has only worked in immediate mode, which is backwards -- actually,
-\ the main use-case of this is as a compile-time word. Let's fix that.
+\ So far, S" has only worked in immediate mode, which is backwards --
+\ actually, the main use-case of this is as a compile-time word. Let's
+\ fix that.
 : S" IMMEDIATE
   ' LITSTRING ,
   HERE @ 0 C, \ We will put the length here
@@ -99,11 +100,12 @@ EXIT [
   DROP DROP ;
 
 : NEWLINE 10 EMIT ;
+
 : SPACE 32 EMIT ;
 
 ( Read a number from standard input. )
 : READ-NUMBER READ-WORD PARSE-NUMBER ;
 
-: RESTART S" Ready." TELL NEWLINE ;
-RESTART
+: RESTART S" rrq's UEFI boot using jonasforth." TELL NEWLINE ;
 
+RESTART