haskal
/
crossfire
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

fix potential encoding bug

This commit is contained in:
xenia 2020-12-26 03:26:51 -05:00
parent 9fc1f546c5
commit de032b9237
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
crossfire/agent.rkt
View File

@ -200,7 +200,7 @@
(unless proc-done (unless proc-done
(loop #t proc-done))] (loop #t proc-done))]
[(list line) [(list line)
(define line-str (bytes->string/utf-8 line #f)) (define line-str (bytes->string/utf-8 line #\?))
(define line-parts (define line-parts
(and line-str (and line-str
(map (lambda (x) (string->number x 16)) (map (lambda (x) (string->number x 16))