This commit is contained in:
Vitor Santos Costa
2017-09-17 21:06:22 +01:00
parent 717aeb162a
commit b24dc4893d
3 changed files with 22 additions and 32 deletions

View File

@@ -609,7 +609,7 @@ static void putAtom(Atom atom, int Quote_illegal, struct write_globs *wglb) {
wrputc('\'', stream);
while (*s) {
int32_t ch;
s += get_utf8(s, 1, &ch);
s += get_utf8(s, -1, &ch);
write_quoted( ch, '\'', stream);
}
wrputc('\'', stream);