summaryrefslogtreecommitdiff
path: root/translate/mcode/windows/ortho_code-sysdeps.adb
diff options
context:
space:
mode:
Diffstat (limited to 'translate/mcode/windows/ortho_code-sysdeps.adb')
-rw-r--r--translate/mcode/windows/ortho_code-sysdeps.adb8
1 files changed, 8 insertions, 0 deletions
diff --git a/translate/mcode/windows/ortho_code-sysdeps.adb b/translate/mcode/windows/ortho_code-sysdeps.adb
new file mode 100644
index 0000000..dbff7b6
--- /dev/null
+++ b/translate/mcode/windows/ortho_code-sysdeps.adb
@@ -0,0 +1,8 @@
+with Ortho_Code.X86.Flags;
+
+package body Ortho_Code.Sysdeps is
+ procedure Init is
+ begin
+ Ortho_Code.X86.Flags.Flag_Alloca_Call := True;
+ end Init;
+end Ortho_Code.Sysdeps;