Path: news.eternal-september.org!eternal-september.org!feeder3.eternal-september.org!i2pn.org!i2pn2.org!.POSTED!not-for-mail
From: dxf <dxforth@gmail.com>
Newsgroups: comp.lang.forth
Subject: Re: Fetch string from comment
Date: Tue, 4 Mar 2025 16:08:49 +1100
Organization: i2pn2 (i2pn.org)
Message-ID: <eaf8e4d9ac9957e6b411400e1490a5aa17fb90d1@i2pn2.org>
References: <vq4rmt$1dv1v$1@dont-email.me>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 7bit
Injection-Date: Tue, 4 Mar 2025 05:08:48 -0000 (UTC)
Injection-Info: i2pn2.org;
	logging-data="2749932"; mail-complaints-to="usenet@i2pn2.org";
	posting-account="XPw7UV90Iy7EOhY4YuUXhpdoEf5Vz7K+BsxA/Cx8bVc";
User-Agent: Mozilla Thunderbird
X-Spam-Checker-Version: SpamAssassin 4.0.0
Content-Language: en-GB
In-Reply-To: <vq4rmt$1dv1v$1@dont-email.me>

On 4/03/2025 5:17 am, sjack wrote:
>                           String fetched from comment                           
> 
> 
> 
> Comment string
> 
> ( This string is a simple comment)
> ( The comment can be enhanced to include parethises in the string)
> 
> ( This string is an (enhanced) comment)
> 
> 
> Accessing enhanced comments
> 
> A comment string, when interpreting, can be found in the 
> input buffer.  It can be accessed and used if it's consumed
> or moved before the end of line.
> 
> 
> .( ( ccc<)> -- )  Print enhanced comment string
> 
> cr i. .( This string, an enhanced comment, is consumed (gets printed))
>  --> This string, an enhanced comment, is consumed (gets printed)
> 
> 
> s( ( ccc<)> -- s )  Save enhanced comment string
> 
> s( "MOO") s( The sound of a cow)
> The above strings are saved in a ring buffer and 
> return string references to be used soon.
> 
> cr i. ul( tell ) tab tell
>  --> The sound of a cow "MOO"
> 
> 
> ,(  ( ccc<)> -- )  Compile enhanced comment string
> 
> here ,( This string with '"bar" (foo)' is compiled)
> here om cr i. type
>  --> This string with '"bar" (foo)' is compiled
> 
> ...

Not understanding where it fits in.  Is this meant to be in lieu of
.."  ,"  S"  etc ?