Path: nntp.eternal-september.org!news.eternal-september.org!eternal-september.org!feeder3.eternal-september.org!i2pn.org!i2pn2.org!.POSTED!not-for-mail
From: mhx@iae.nl (mhx)
Newsgroups: comp.lang.forth
Subject: Re: Parsing =?UTF-8?B?dGltZXN0YW1wcz8=?=
Date: Wed, 16 Jul 2025 21:12:13 +0000
Organization: novaBBS
Message-ID: <9264ab8440a109bea313a7347f13fcc5@www.novabbs.com>
References: <1f433fabcb4d053d16cbc098dedc6c370608ac01@i2pn2.org> <91e8859d9cb678b7ce7a8a5f341de513@www.novabbs.com> <2025Jul11.122254@mips.complang.tuwien.ac.at> <954cf34891bed0677fd79af0b676c50613dc1443@i2pn2.org> <2025Jul13.110141@mips.complang.tuwien.ac.at> <2d6811168025a74b3ff51a78efb75947d36a0146@i2pn2.org> <2025Jul14.080413@mips.complang.tuwien.ac.at> <063d4a116fb394a776b1e9313f9903cf@www.novabbs.com> <2025Jul14.095004@mips.complang.tuwien.ac.at> <a449857495e02b4d35627f9f31d37fd8@www.novabbs.com> <2025Jul16.132504@mips.complang.tuwien.ac.at>
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8; format=flowed
Content-Transfer-Encoding: 8bit
Injection-Info: i2pn2.org;
	logging-data="931833"; mail-complaints-to="usenet@i2pn2.org";
	posting-account="J+nubxJRM7ncpF4l6KLO+OONWmFAYJHVJegfwQXJ8vc";
User-Agent: Rocksolid Light
X-Rslight-Posting-User: 4e0dc1fdad1ead10b39e7eb5db19bf73d73e3ab3
X-Rslight-Site: $2y$10$lAMwjm26IiE5.xlJH261c.KnKzaE4QcY0HY8sb/oGsUmnuliH1jJa
X-Spam-Checker-Version: SpamAssassin 4.0.0

Well, that is strange ...

Results with the current iForth are quite different:

FORTH> bench ( see file quoted above + usual iForth timing words )
\ 7963 times
\ naive-sum        : 0.999 seconds elapsed. ( 4968257259 )
\ unrolled-sum     : 1.004 seconds elapsed. ( 4968257259 )
\ recursive-sum    : 0.443 seconds elapsed. ( 4968257259 )
\ shift-reduce-sum : 2.324 seconds elapsed. ( 4968257259 ) ok

So here recursive-sum is by far the fastest, and shift-reduce-sum
is not horribly slow. The slowdown in srs is because the 2nd loop
is using the external stack.

-marcel

PS: Because of recent user requests a development snapshot was
made available at the usual place.

--