Еквивалент на схемата на функцията за печат в Clojure

Интересно... можете да разточите едно от тях доста лесно, но не съм сигурен, че виждам нужда от това. Например:

#lang racket

(define (print-many . args)
  (display
   (apply
    string-append
    (add-between (map print-to-string args) " "))))

(define (print-to-string arg) (format "~v" arg))

(print-many 3 4 5 'b '(3 3 4))

Като цяло обаче мисля, че ако генерирате изход за потребител, ще искате по-добър контрол върху изхода и ако не генерирате изход за потребител, вие сте също толкова щастливи удряйки чифт скоби около него и го превръщайки в списък.

Какъв е случаят на използване на това?

Може би търсите trace?

#lang racket

(define (foo x y)
  (+ x y))

(define (bar x)
  (+ (foo 1 x)
     (foo 2 (+ x 1))))

(require racket/trace)
(trace foo)

И след това в прозореца за взаимодействие:

> (bar 3)

>(foo 1 3)
<4
>(foo 2 4)
<6
10

Използвам този набор от дефиниции, за да отпечатам множество аргументи, разделени с нов ред:

(define (println x) (display x) (newline))
(define (printlist l) (begin
                        (println (car l))
                        (if (not (null? (cdr l))) (printlist (cdr l)))))  
(define (multiprint  . args) (begin
                                (if (not (null? args)) (printlist args) 
                                    (println "Error: multiprint requires at least one argument"))))