9 lines
242 B
Text
9 lines
242 B
Text
;; Solution from Common Lisp and Racket
|
|
(define-syntax-rule (set-append! str tail)
|
|
(set! str (string-append str tail)))
|
|
|
|
(define name "Albert") → name
|
|
|
|
(set-append! name " de Jeumont-Schneidre")
|
|
name
|
|
→ "Albert de Jeumont-Schneidre"
|