Changeset 5772


Ignore:
Timestamp:
Jan 21, 2007, 7:31:58 AM (18 years ago)
Author:
Gary Byers
Message:

WITH-FFCALL-RESULTS: zero the stack-block.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ccl/compiler/X86/X8664/x8664-arch.lisp

    r5768 r5772  
    12791279  ;; Reserve space for rax,rdx,xmm0,xmm1 only.
    12801280  (let* ((size (+ (* 2 8) (* 2 8))))
    1281     `(ccl::%stack-block ((,buf ,size))
     1281    `(ccl::%stack-block ((,buf ,size :clear t))
    12821282      ,@body)))
    12831283 
Note: See TracChangeset for help on using the changeset viewer.