diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

improve char conversion

Browse Source
This commit is contained in:
Vítor Santos Costa
2013-12-05 11:20:57 +00:00
parent ba07371328
commit b3608c6a83
5 changed files with 23 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
C/write.c
View File

@@ -174,21 +174,18 @@ wrpututf8(const char *s, struct write_globs *wglb) /* writes an integer */
IOSTREAM *stream = wglb->stream;
int chr;
char *ptr = (char *)s;
if (wglb->Write_strings)
wrputc('`', stream);
else
wrputc('"', stream);
if (stream->encoding == ENC_UTF8) {
wrputs( s, stream);
} else {
int chr;
char *ptr = (char *)s;
do {
ptr = utf8_get_char(ptr, &chr);
if (chr == '\0') break;
wrputc(chr, stream);
} while (TRUE);
}
do {
ptr = utf8_get_char(ptr, &chr);
if (chr == '\0') break;
wrputc(chr, stream);
} while (TRUE);
if (wglb->Write_strings)
wrputc('`', stream);
else