RosettaCodeData/Task/Reverse-a-string/Scheme/reverse-a-string.scm

3 lines
72 B
Scheme
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
(define (string-reverse s)
(list->string (reverse (string->list s))))