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

  • Re: loop macro and multiple-value-bind

    From B. Pym@Nobody447095@here-nor-there.org to comp.lang.lisp,comp.lang.scheme on Thu Sep 26 20:44:08 2024
    From Newsgroup: comp.lang.scheme

    Iterate is a more lispy superset of loop. For instance you can do this:
    (iter
    (for a from 10 to 20)
    (for (values q r) = (truncate a 3))
    (format t "~d ~d~%" q r))
    3 1
    3 2
    4 0
    4 1
    4 2
    5 0
    5 1
    5 2
    6 0
    6 1
    6 2

    Gauche Scheme

    (use srfi-197) ;; chain-lambda

    (for-each
    (chain-lambda (div-and-mod _ 3) (format #t "~d ~d~%" _ _))
    (iota 11 10))

    3 1
    3 2
    4 0
    4 1
    4 2
    5 0
    5 1
    5 2
    6 0
    6 1
    6 2
    --- Synchronet 3.22a-Linux NewsLink 1.2