Pop-Up Thingie
Sidebar
Too Lazy BBS
Home
Forum
Files
Chat
Bulletins
Top doors
MOTD
BBS Stats
Radio
AvatarChat
Dark
Register
Log in
Username
Password
Sidebar
Forum
USENET
comp.lang.scheme
Re: "Well, I want to switch over to replace EMACS LISP with Guile."
From
B. Pym
@Nobody447095@here-nor-there.org to
comp.lang.lisp,comp.lang.scheme
on Tue Jul 8 13:57:53 2025
From Newsgroup: comp.lang.scheme
Adam Warner wrote:
(let ((x '(1 3 5 7 9)))
(do ((x x (cdr x))
(sum 0 (+ sum (car x))))
((null? x) sum)))
Gauche Scheme
(let1 xs '(1 3 5 7 9)
(do ((sum 0 (+ sum (pop! xs))))
((null? xs) sum)))
--- Synchronet 3.21a-Linux NewsLink 1.2
Who's Online
Recent Visitors
Sauron
Mon Aug 17 05:50:20 2026
from
Purgatory
via
Telnet
Sauron
Sun Aug 16 22:51:04 2026
from
Purgatory
via
Telnet
Rixter
Sun Aug 16 22:39:57 2026
from
Madison, Nc
via
Telnet
Rixter
Sun Aug 16 10:20:30 2026
from
Madison, Nc
via
Telnet
System Info
Sysop:
Amessyroom
Location:
Fayetteville, NC
Users:
74
Nodes:
6 (
0
/
6
)
Uptime:
53:56:09
Calls:
1,101
Calls today:
1
Files:
1,339
Messages:
276,282