1. Forum
  2. Usenet
  3. COMP.LANG.LISP

  • Re: "Well, I want to switch over to replace EMACS LISP with Guile."

    From B. Pym@21:1/5 to Adam Warner on Tue Jul 8 13:57:53 2025
    XPost: 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)))

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)