[gsharp-devel] redraw buglets

[Christophe Rhodes]

Christophe Rhodes <csr21 at cam.ac.uk> writes:

> I had a look at sbcl's own routines, and it turns out that there is
> currently (and probably in sbcl-0.8.13, due out soon, but probably not
> in sbcl-0.8.13.1) a large avoidable inefficiency in SBCL's (and I
> believe also CMUCL's) BIGNUM-GCD.  I'm working on patching the system,
> and I'll report back once I have some numbers.

   1    213   5.9    213   5.9 SB-BIGNUM:BIGNUM-GCD
   2    171   4.8    384  10.7 SB-BIGNUM::SUBTRACT-BIGNUM-BUFFERS
   3    139   3.9    523  14.5 "XEP for #'(SB-KERNEL:INSTANCE-LAMBDA (SB-PCL::.ARG0.) (LET NIL # ...))"
   4    122   3.4    645  17.9 SB-BIGNUM::MAKE-GCD-BIGNUM-ODD
   5    100   2.8    745  20.7 SB-BIGNUM::BIGNUM-GCD-ORDER-AND-SUBTRACT
   6     96   2.7    841  23.4 "XEP for #'(SB-KERNEL:INSTANCE-LAMBDA (SB-PCL::.ARG0. SB-PCL::.ARG1. SB-PCL::.ARG2. ...) (LET NIL # ...))"
   7     95   2.6    936  26.0 SB-KERNEL::%%TYPEP
   8     89   2.5   1025  28.5 SB-BIGNUM::BIGNUM-BUFFER-ASHIFT-RIGHT
   9     88   2.4   1113  31.0 SB-KERNEL:TWO-ARG-+
  10     81   2.3   1194  33.2 SB-KERNEL:CLASSOID-TYPEP

Still really bignum-gcd dominated, I'm afraid.  Your hypothesis about
McCLIM coordinates is certainly possible...

Cheers,

Christophe
-- 
http://www-jcsu.jesus.cam.ac.uk/~csr21/       +44 1223 510 299/+44 7729 383 757
(set-pprint-dispatch 'number (lambda (s o) (declare (special b)) (format s b)))
(defvar b "~&Just another Lisp hacker~%")    (pprint #36rJesusCollegeCambridge)