From dc58fccc4c47110b79bc8c9b6c5619da5edec792 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Sat, 19 Jan 2019 13:50:25 -0700 Subject: [PATCH] cs: immutable string in `seconds->date` result --- racket/src/cs/rumble/time.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/racket/src/cs/rumble/time.ss b/racket/src/cs/rumble/time.ss index b679dd3bbd..c3b630c644 100644 --- a/racket/src/cs/rumble/time.ss +++ b/racket/src/cs/rumble/time.ss @@ -131,6 +131,6 @@ (chez:date-dst? d) (date-zone-offset d) (date-nanosecond d) - (or (date-zone-name d) utc-string)))])) + (or (string->immutable-string (date-zone-name d)) utc-string)))])) (define utc-string (string->immutable-string "UTC"))