From 354e5ac4b7c9c1461a9c5969b3183f9ae190a3a1 Mon Sep 17 00:00:00 2001 From: Koichi Nakamura Date: Mon, 11 Jan 2021 01:27:13 +0900 Subject: [PATCH] Update README and comment --- README.md | 7 ++++--- bootstrap.fs | 2 +- 2 files changed, 5 insertions(+), 4 deletions(-) diff --git a/README.md b/README.md index 34c54cb..63b012e 100644 --- a/README.md +++ b/README.md @@ -30,8 +30,9 @@ After bootstrapping by `bootstrap.fs`, it looks like this. ``` $ ./planck < bootstrap.fs -PlanckForth (implementation: hand-written i386-linux) -Ready. +Welcome to PlanckForth 0.0.1 [i386-linux handwrite] +Copyright (c) 2021 Koichi Nakamura +Type 'bye' to exit. ." Hello World!" cr ``` @@ -85,4 +86,4 @@ $ ./planck < bootstrap.fs example/fib.fs | } | shr | ( a b -- c ) | c = a >> b (logical) | | ) | sar | ( a b -- c ) | c = a >> b (arithmetic) | | v | argv | ( -- a-addr u ) | argv and argc | -| V | version | ( -- c-addr ) | Version String | +| V | version | ( -- c-addr ) | Runtime infomation stringe | diff --git a/bootstrap.fs b/bootstrap.fs index 31a073d..1652ab9 100644 --- a/bootstrap.fs +++ b/bootstrap.fs @@ -60,7 +60,7 @@ l! \ '}' ( a b -- c ) c = a >> b (logical) \ ')' ( a b -- c ) c = a >> b (arithmetic) \ 'v' ( -- a-addr u ) argv and argc -\ 'V' ( -- c-addr ) Version text +\ 'V' ( -- c-addr ) Runtime information string \ The 1st stage interpreter repeats execution of k, f and x. \ There following line is an example program of planckforth