From ffc9116e6223c0a90a51c05ff4b471b7f5af1b55 Mon Sep 17 00:00:00 2001 From: Eric Lindblad Date: Sun, 24 Jul 2022 17:23:53 +0000 Subject: typo --- rts/Interpreter.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'rts') diff --git a/rts/Interpreter.c b/rts/Interpreter.c index e2b17075bc..581238c36a 100644 --- a/rts/Interpreter.c +++ b/rts/Interpreter.c @@ -1875,7 +1875,7 @@ run_BCO: int flags = BCO_NEXT; bool interruptible = flags & 0x1; bool unsafe_call = flags & 0x2; - void(*marshall_fn)(void*) = (void (*)(void*))BCO_LIT(o_itbl); + void(*marshal_fn)(void*) = (void (*)(void*))BCO_LIT(o_itbl); /* the stack looks like this: @@ -1902,7 +1902,7 @@ run_BCO: #define ROUND_UP_WDS(p) ((((StgWord)(p)) + sizeof(W_)-1)/sizeof(W_)) - ffi_cif *cif = (ffi_cif *)marshall_fn; + ffi_cif *cif = (ffi_cif *)marshal_fn; uint32_t nargs = cif->nargs; uint32_t ret_size; uint32_t i; -- cgit v1.2.1