diff options
Diffstat (limited to 'ortho/mcode/ortho_code-x86-abi.adb')
| -rw-r--r-- | ortho/mcode/ortho_code-x86-abi.adb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/ortho/mcode/ortho_code-x86-abi.adb b/ortho/mcode/ortho_code-x86-abi.adb index a915f92..99b75e9 100644 --- a/ortho/mcode/ortho_code-x86-abi.adb +++ b/ortho/mcode/ortho_code-x86-abi.adb @@ -463,6 +463,10 @@ package body Ortho_Code.X86.Abi is end if; Disp_Decl_Name (Get_Call_Subprg (Stmt)); New_Line; + when OE_Stack_Adjust => + Put (" stack_adjust: "); + Put (Int32'Image (Get_Stack_Adjust (Stmt))); + New_Line; when OE_Intrinsic => Disp_Reg_Op_Name ("intrinsic"); --Disp_Decl_Name (Get_Call_Subprg (Stmt)); |