make file writing accept characters
This commit is contained in:
parent
77144cd79c
commit
996114a73b
@ -163,7 +163,10 @@ void file_wBytes(B path, B x) { // consumes path
|
|||||||
u64 len = a(x)->ia;
|
u64 len = a(x)->ia;
|
||||||
TALLOC(char, val, len);
|
TALLOC(char, val, len);
|
||||||
SGetU(x)
|
SGetU(x)
|
||||||
for (u64 i = 0; i < len; i++) val[i] = o2i(GetU(x,i));
|
for (u64 i = 0; i < len; i++) {
|
||||||
|
B c = GetU(x,i);
|
||||||
|
val[i] = isNum(c)? o2iu(c) : o2c(c);
|
||||||
|
}
|
||||||
|
|
||||||
if (fwrite(val, 1, len, f) != len) thrF("Error writing to file \"%R\"", path);
|
if (fwrite(val, 1, len, f) != len) thrF("Error writing to file \"%R\"", path);
|
||||||
TFREE(val);
|
TFREE(val);
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user