Raymond Toy pushed to branch issue-459-more-accurate-dd-complex-div at cmucl / cmucl Commits: a8e2a8bf by Raymond Toy at 2026-01-08T08:37:59-08:00 Remove duplicated deftransform for / using cdiv-double-double-float - - - - - 1 changed file: - src/compiler/float-tran-dd.lisp Changes: ===================================== src/compiler/float-tran-dd.lisp ===================================== @@ -578,7 +578,7 @@ (deftransform / ((a b) ((complex vm::double-double-float) (complex vm::double-double-float)) *) - `(kernel::cdiv-double-double-float a b)) + `(kernel::cdiv-double-double-float a b)) (declaim (inline sqr-d)) (defun sqr-d (a) @@ -691,8 +691,4 @@ (kernel:double-double-lo a) (kernel:double-double-hi b) (kernel:double-double-lo b))) - -(deftransform / ((x y) ((complex double-double-float) (complex double-double-float)) - *) - `(kernel::cdiv-double-double-float x y)) ) ; end progn View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/a8e2a8bfad7a75d5977a7c19... -- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/a8e2a8bfad7a75d5977a7c19... You're receiving this email because of your account on gitlab.common-lisp.net.