From 638041964c7a3549b46ff897d635dc030bd3875b Mon Sep 17 00:00:00 2001 From: Jack Firth Date: Thu, 8 Aug 2024 18:49:16 -0700 Subject: [PATCH] Add forgotten immutability guarantee --- main.rkt | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/main.rkt b/main.rkt index 495946a..4cb6058 100644 --- a/main.rkt +++ b/main.rkt @@ -93,9 +93,10 @@ #f #f) - (string-join (for/list ([line (in-list all-lines)]) - (string-trim line #:left? #f)) - "\n")) + (string->immutable-string + (string-join (for/list ([line (in-list all-lines)]) + (string-trim line #:left? #f)) + "\n"))) (define ((compose-formatter-map . fs) x) (for/or ([f (in-list fs)])