mescc: Use size 8 for stack.
Reported by W. J. van der Laan <laanwj@protonmail.com>. * module/mescc/x86_64/as.scm (x86_64:function-locals): Oops, use size 8.
This commit is contained in:
parent
a1bc54bce8
commit
794935b75d
|
@ -1,5 +1,5 @@
|
|||
;;; GNU Mes --- Maxwell Equations of Software
|
||||
;;; Copyright © 2018 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
|
||||
;;; Copyright © 2018, 2022 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
|
||||
;;; Copyright © 2023 Andrius Štikonas <andrius@stikonas.eu>
|
||||
;;; Copyright © 2021 W. J. van der Laan <laanwj@protonmail.com>
|
||||
;;;
|
||||
|
@ -69,9 +69,8 @@
|
|||
|
||||
(define (x86_64:function-locals . rest)
|
||||
`(
|
||||
;; FIXME: how on x86_64?
|
||||
("sub____$i32,%rsp" (#:immediate ,(+ (* 4 1025) (* 20 8))))
|
||||
)) ; 4*1024 buf, 20 local vars
|
||||
("sub____$i32,%rsp" (#:immediate ,(+ (* 8 1025) (* 20 8))))
|
||||
)) ; 8*1024 buf, 20 local vars
|
||||
|
||||
(define (x86_64:r->local info n)
|
||||
(let ((r (get-r info))
|
||||
|
|
Loading…
Reference in a new issue