mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2024-11-24 17:27:18 +00:00
Code Issues 1 Releases Wiki Activity

Fix #452 - Bad file marshal

Browse Source 
We forgot a call to janet_marshal_abstract, which corrupted the output.
This commit is contained in:
Calvin Rose 2020-07-25 08:09:22 -05:00
parent 1ba3f72e4c
commit 409a8a3a43
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/core/io.c
View File

@ -339,6 +339,7 @@ static int io_file_get(void *p, Janet key, Janet *out) {
static void io_file_marshal(void *p, JanetMarshalContext *ctx) { static void io_file_marshal(void *p, JanetMarshalContext *ctx) {
JanetFile *iof = (JanetFile *)p; JanetFile *iof = (JanetFile *)p;
if (ctx->flags & JANET_MARSHAL_UNSAFE) { if (ctx->flags & JANET_MARSHAL_UNSAFE) {
janet_marshal_abstract(ctx, p);
#ifdef JANET_WINDOWS #ifdef JANET_WINDOWS
janet_marshal_int(ctx, _fileno(iof->file)); janet_marshal_int(ctx, _fileno(iof->file));
#else #else