1. Forum
  2. USENET
  3. comp.lang.lisp

  • 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.lisp

    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