87def jsonRenderEscapedControl =
88 (lambda unrestricted value : Byte .
89 (bytes-builder-chunk
90 (bytes-cons
91 (byte 92)
92 (bytes-cons
93 (byte 117)
94 (bytes-cons
95 (byte 48)
96 (bytes-cons
97 (byte 48)
98 (bytes-cons
99 (dataBytesHexDigit
100 (naturalDivideUnchecked (byte-to-nat value) (byte-to-nat (byte 16))))
101 (bytes-cons
102 (dataBytesHexDigit
103 (naturalModuloUnchecked (byte-to-nat value) (byte-to-nat (byte 16))))
104 b""))))))))The compiler supplied declaration spans and resolved links from this source snapshot. This page does not assert that this file belongs to a checked closure.