master: Reset dstate-disp-n to 0
stassats via Sbcl-commits <[email protected]>
| Newsgroups | gmane.lisp.steel-bank.cvs |
|---|---|
| Message-ID | <[email protected]> |
The branch "master" has been updated in SBCL:
via fa59dfa2e72e7116b20eefbd40c70a9339f71352 (commit)
from 885a2ddd61241ccf0e3dc29f216b66d42b041dbb (commit)
- Log -----------------------------------------------------------------
commit fa59dfa2e72e7116b20eefbd40c70a9339f71352
Author: Stas Boukarev <[email protected]>
Date: Wed Aug 26 04:17:38 2026 +0300
Reset dstate-disp-n to 0
---
src/compiler/target-disassem.lisp | 8 +++++++-
1 file changed, 7 insertions(+), 1 deletion(-)
diff --git a/src/compiler/target-disassem.lisp b/src/compiler/target-disassem.lisp
index d3c98fc94..05ab5d740 100644
--- a/src/compiler/target-disassem.lisp
+++ b/src/compiler/target-disassem.lisp
@@ -400,6 +400,8 @@
(type segment segment))
(setf (dstate-segment dstate) segment)
(setf (dstate-inst-properties dstate) 0)
+ #+x86-64
+ (setf (dstate-disp-n dstate) 0)
(setf (dstate-known-register-contents dstate) nil)
(setf (dstate-cur-offs-hooks dstate)
(stable-sort (nreverse (copy-list (seg-hooks segment)))
@@ -523,6 +525,8 @@
(defun disassemble-instruction (dstate)
(declare (type disassem-state dstate))
(setf (dstate-inst-properties dstate) 0)
+ #+x86-64
+ (setf (dstate-disp-n dstate) 0)
(setf (dstate-filtered-arg-pool-in-use dstate) nil)
(loop
;; There is no point to using GET-DCHUNK. How many bytes remain is unknown.
@@ -671,7 +675,9 @@
(nconc (dstate-filtered-arg-pool-free dstate)
(dstate-filtered-arg-pool-in-use dstate)))
(setf (dstate-filtered-arg-pool-in-use dstate) nil)
- (setf (dstate-inst-properties dstate) 0))))))
+ (setf (dstate-inst-properties dstate) 0)
+ #+x86-64
+ (setf (dstate-disp-n dstate) 0))))))
(defun collect-labelish-operands (args cache)
-----------------------------------------------------------------------
hooks/post-receive
--
SBCL