RosettaCodeData/Task/Reverse-a-string/Scheme/reverse-a-string.scm
2024-10-16 18:07:41 -07:00

2 lines
72 B
Scheme

(define (string-reverse s)
(list->string (reverse (string->list s))))