summaryrefslogtreecommitdiff
path: root/rts/HeapStackCheck.cmm
diff options
context:
space:
mode:
Diffstat (limited to 'rts/HeapStackCheck.cmm')
-rw-r--r--rts/HeapStackCheck.cmm17
1 files changed, 1 insertions, 16 deletions
diff --git a/rts/HeapStackCheck.cmm b/rts/HeapStackCheck.cmm
index 469cecdb3a..90691fa091 100644
--- a/rts/HeapStackCheck.cmm
+++ b/rts/HeapStackCheck.cmm
@@ -679,23 +679,8 @@ INFO_TABLE_RET( stg_block_async, RET_SMALL, W_ unused )
len = TO_W_(StgAsyncIOResult_len(ares));
errC = TO_W_(StgAsyncIOResult_errCode(ares));
foreign "C" free(ares "ptr");
-#if defined(GhcUnregisterised)
- Sp(1) = errC;
- Sp(0) = len;
- jump %ENTRY_CODE(Sp(2));
-#elif defined(i386_HOST_ARCH)
- R1 = len;
- Sp_adj(1);
- Sp(0) = errC;
- jump %ENTRY_CODE(Sp(1));
-#elif defined(x86_64_HOST_ARCH)
- R1 = len;
- R2 = errC;
Sp_adj(2);
- jump %ENTRY_CODE(Sp(0));
-#else
-#error Unexpected arch
-#endif
+ RET_NN(len, errC);
}
stg_block_async