summaryrefslogtreecommitdiff
path: root/utils/genapply
diff options
context:
space:
mode:
Diffstat (limited to 'utils/genapply')
-rw-r--r--utils/genapply/GenApply.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/utils/genapply/GenApply.hs b/utils/genapply/GenApply.hs
index 7b84a27d64..7ff1b877a0 100644
--- a/utils/genapply/GenApply.hs
+++ b/utils/genapply/GenApply.hs
@@ -605,6 +605,7 @@ genApply regstatus args =
nest 4 (vcat [
text "W_ info;",
text "W_ arity;",
+ text "unwind Sp = Sp + WDS(" <> int (1+all_args_size) <> text ");",
-- if fast == 1:
-- print "static void *lbls[] ="