From 9b79c4c51954ffc46c631e56547ac865860e8855 Mon Sep 17 00:00:00 2001 From: Paul Khuong Date: Sat, 21 Sep 2013 18:34:30 -0400 Subject: [PATCH] Smaller initial stack frame size on x86oids Now that copy-more-arg is fixed, stack frames can be initialised at 3 slots (some raw constants in the codegen seems to depend on each frame spanning at least that many slot). --- src/compiler/x86-64/vm.lisp | 2 +- src/compiler/x86/vm.lisp | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/compiler/x86-64/vm.lisp b/src/compiler/x86-64/vm.lisp index 2538e49..71fff66 100644 --- a/src/compiler/x86-64/vm.lisp +++ b/src/compiler/x86-64/vm.lisp @@ -187,7 +187,7 @@ (define-storage-base float-registers :finite :size 16) -(define-storage-base stack :unbounded :size 4 :size-increment 1) +(define-storage-base stack :unbounded :size 3 :size-increment 1) (define-storage-base constant :non-packed) (define-storage-base immediate-constant :non-packed) (define-storage-base noise :unbounded :size 2) diff --git a/src/compiler/x86/vm.lisp b/src/compiler/x86/vm.lisp index 39924ff..7cc96e8 100644 --- a/src/compiler/x86/vm.lisp +++ b/src/compiler/x86/vm.lisp @@ -118,7 +118,7 @@ ;;; the new way: (define-storage-base float-registers :finite :size 8) -(define-storage-base stack :unbounded :size 4 :size-increment 1) +(define-storage-base stack :unbounded :size 3 :size-increment 1) (define-storage-base constant :non-packed) (define-storage-base immediate-constant :non-packed) (define-storage-base noise :unbounded :size 2) -- 1.7.10.4