diff options
Diffstat (limited to 'ia32')
-rw-r--r-- | ia32/TargetPrinter.ml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/ia32/TargetPrinter.ml b/ia32/TargetPrinter.ml index 39f8be23..888a7e72 100644 --- a/ia32/TargetPrinter.ml +++ b/ia32/TargetPrinter.ml @@ -933,7 +933,9 @@ module Target(System: SYSTEM):TARGET = let cfi_startproc = cfi_startproc let cfi_endproc = cfi_endproc - let print_instructions oc fn = List.iter (print_instruction oc) fn.fn_code + let print_instructions oc fn = + current_function_sig := fn.fn_sig; + List.iter (print_instruction oc) fn.fn_code let print_optional_fun_info _ = () |