Path: ...!weretis.net!feeder9.news.weretis.net!i2pn.org!i2pn2.org!.POSTED!not-for-mail
From: oh2aun@gmail.com (FFmike)
Newsgroups: comp.lang.forth
Subject: Re: Parsing =?UTF-8?B?dGltZXN0YW1wcz8=?=
Date: Sun, 6 Oct 2024 13:08:56 +0000
Organization: novaBBS
Message-ID: <a3365e0c6c574a54f4caa31c3f5ba4f2@www.novabbs.com>
References: <1f433fabcb4d053d16cbc098dedc6c370608ac01@i2pn2.org>
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8; format=flowed
Content-Transfer-Encoding: 8bit
Injection-Info: i2pn2.org;
	logging-data="823375"; mail-complaints-to="usenet@i2pn2.org";
	posting-account="39UK9ThsGv2aH5Ju2f1a+mSLdXsn+5dak35uZnMCiTc";
User-Agent: Rocksolid Light
X-Spam-Checker-Version: SpamAssassin 4.0.0
X-Rslight-Posting-User: b798353b37e53d14ace2ed0c33020067837946c0
X-Rslight-Site: $2y$10$VMbpRoyfViXN8hPlvA3kxOxti0.kqNuMF4EjFi2XDdo.4QP6iT4Ui
Bytes: 1215
Lines: 14

In FlashForth I usually do this.

FlashForth allows only "." as number punctuation.

: /t ( addr len -- )
  'source 2@ >r >r >in @ >r
  'source 2! 0 >in !
  3 for
    [char] : word number? 1 <> if drop 0 then
  next
  r> >in ! r> r> 'source 2!
;

s" 12:33:44" /t . . .
44 33 12 ok