7 lines
120 B
Text
7 lines
120 B
Text
|
(define (rev s)
|
||
|
|
(runes->string (reverse (string->runes s))))
|
||
|
|
|
||
|
|
; testing:
|
||
|
|
(print (rev "Hello, λ!"))
|
||
|
|
; ==> !λ ,olleH
|