[Git][cmucl/cmucl][rtoy-amd64-p1] Define double-double-float-digits

[Raymond Toy]

Raymond Toy pushed to branch rtoy-amd64-p1 at cmucl / cmucl


Commits:
b323ffa9 by Raymond Toy at 2020-08-11T20:06:28-07:00
Define double-double-float-digits

Forgot to grab this from the x86 version.  Fixes one compile error.

- - - - -


1 changed file:

- src/compiler/amd64/parms.lisp


Changes:

=====================================
src/compiler/amd64/parms.lisp
=====================================
@@ -165,6 +165,10 @@
 (defconstant long-float-digits
   (+ (byte-size long-float-significand-byte) 32 1))
 
+#+double-double
+(defconstant double-double-float-digits
+  (* 2 double-float-digits))
+
 ;;; pfw -- from i486 microprocessor programmers reference manual
 (defconstant float-invalid-trap-bit        (ash 1 0))
 (defconstant float-denormal-trap-bit       (ash 1 1))



View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/b323ffa95870f5e67a99f293d61401feee61ee1e

-- 
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/b323ffa95870f5e67a99f293d61401feee61ee1e
You're receiving this email because of your account on gitlab.common-lisp.net.


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cmucl-cvs/attachments/20200812/12fdda3b/attachment.htm>