Raymond Toy pushed to branch issue-356-x87-status-word-in-low-part at cmucl / cmucl Commits: ab7cfc59 by Raymond Toy at 2024-09-03T06:21:12-07:00 Clean up indentation; add a few comments. - - - - - 1 changed file: - src/compiler/x86/float-sse2.lisp Changes: ===================================== src/compiler/x86/float-sse2.lisp ===================================== @@ -1396,8 +1396,10 @@ (inst byte #x66) ; operand size prefix (inst or sw-reg cw-stack) (inst xor sw-reg #x3f) ; invert exception mask - (move res sw-reg) - (inst rol res 16))) + (move res sw-reg) + ;; Put status word in the low 16 bits and the control word in the + ;; high 16 bits. + (inst rol res 16))) ;; Set the control and status words from the FPU. The low 16 bits ;; contain the control word, and the high 16 bits contain the status. @@ -1414,6 +1416,8 @@ (:temporary (:sc unsigned-reg) new) (:generator 6 (move new new-modes) + ;; Put the status word in the high 16 bits and the control word in + ;; the low 16 bits. (inst rol new 16) (inst mov cw-stack new) (inst xor cw-stack #x3f) ; invert exception mask View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/ab7cfc599c973e6215c4a5d1... -- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/ab7cfc599c973e6215c4a5d1... You're receiving this email because of your account on gitlab.common-lisp.net.