Hello,
I'm seeing a problem with the bundled demo: pages are taking 5+
seconds to load. I am using SBCL 1.0.43 with Quicklisp 2011051901 and
weblocks-20110418-hg, installed via Quicklisp. It seems like it could
be related to a previously reported (and fixed?) interaction between
Weblocks and Quicklisp. FWIW, I also see this problem with Clozure CL
1.6 (both on amd64 FreeBSD 8.2-RELEASE).
I profiled with sb-sprof when requesting the demo page:
Self Total Cumul
Nr Count % Count % Count % Calls Function
------------------------------------------------------------------------
2 16 6.3 16 6.3 16 6.3 - "foreign
function poll"
4 16 6.3 16 6.3 32 12.6 - "foreign
function sigprocmask"
6 14 5.5 19 7.5 46 18.2 - MAKE-ARRAY
8 10 4.0 73 28.9 56 22.1 - QL-UTIL:SPLIT-
SPACES
10 10 4.0 14 5.5 66 26.1 - SB-IMPL::FD-
STREAM-READ-N-CHARACTERS/ASCII
12 10 4.0 10 4.0 76 30.0 - SB-KERNEL:HAIRY-
DATA-VECTOR-REF/CHECK-BOUNDS
14 8 3.2 8 3.2 84 33.2 - SB-
IMPL::OPTIMIZED-DATA-VECTOR-REF
16 7 2.8 40 15.8 91 36.0 - (LABELS QL-
UTIL::IN-WORD)
18 7 2.8 7 2.8 98 38.7 - "foreign
function funcallable_instance_tramp"
20 7 2.8 7 2.8 105 41.5 - SB-KERNEL:
%COERCE-CALLABLE-TO-FUN
22 5 2.0 14 5.5 110 43.5 - (SB-PCL::FAST-
METHOD SHARED-INITIALIZE (SB-PCL::SLOT-OBJECT T))
24 5 2.0 5 2.0 115 45.5 - SB-PCL::CHECK-
APPLICABLE-KEYWORDS
26 5 2.0 5 2.0 120 47.4 - (FLET #:CLEANUP-
FUN-[CALL-WITH-RECURSIVE-SYSTEM-SPINLOCK]249)
28 4 1.6 35 13.8 124 49.0 - SB-KERNEL:VECTOR-
SUBSEQ*
30 4 1.6 4 1.6 128 50.6 - SB-PCL::PLIST-
KEYS
32 4 1.6 4 1.6 132 52.2 - (LAMBDA (SB-
PCL::.ARG0. SB-PCL::.ARG1. SB-INT:&MORE SB-PCL::.MORE-CONTEXT. SB-
PCL::.MORE-COUNT.))
34 4 1.6 4 1.6 136 53.8 - (FLET #:CLEANUP-
FUN-[REFILL-INPUT-BUFFER]732)
36 4 1.6 4 1.6 140 55.3 - SB-
IMPL::OPTIMIZED-DATA-VECTOR-SET
38 4 1.6 4 1.6 144 56.9 - TRUNCATE
40 4 1.6 4 1.6 148 58.5 - SB-KERNEL:UB32-
BASH-COPY
42 3 1.2 220 87.0 151 59.7 - QL-DIST::CALL-
FOR-EACH-INDEX-ENTRY
44 3 1.2 21 8.3 154 60.9 - SB-IMPL::ANSI-
STREAM-READ-LINE-FROM-FRC-BUFFER
46 3 1.2 5 2.0 157 62.1 - (SB-PCL::EMF
MAKE-INSTANCE)
48 3 1.2 5 2.0 160 63.2 - SB-VM::GENERIC-+
50 3 1.2 5 2.0 163 64.4 - "foreign
function _lstat"
52 3 1.2 3 1.2 166 65.6 - SB-
IMPL::OPTIMIZED-DATA-VECTOR-REF
54 3 1.2 3 1.2 169 66.8 - SB-IMPL::%VECTOR-
WIDETAG-AND-N-BITS
56 3 1.2 3 1.2 172 68.0 - (SB-PCL::FAST-
METHOD SB-MOP:CLASS-PROTOTYPE (SB-PCL::STD-CLASS))
58 3 1.2 3 1.2 175 69.2 - "foreign
function stat"
60 3 1.2 3 1.2 178 70.4 - EQL
62 3 1.2 3 1.2 181 71.5 - SB-INT:MEMQ
64 3 1.2 3 1.2 184 72.7 - NCONC
66 3 1.2 3 1.2 187 73.9 - (FLET #:BODY-FUN-
[%PUTHASH]316)
68 3 1.2 3 1.2 190 75.1 - SB-PCL::FIND-
CLASS-FROM-CELL
70 2 0.8 86 34.0 192 75.9 - QL-DIST::MAKE-
LINE-INSTANCE
72 2 0.8 11 4.3 194 76.7 - SB-PCL::CHECK-MI-
INITARGS
74 2 0.8 5 2.0 196 77.5 - (FLET #:BODY-FUN-
[GETHASH3]221)
76 2 0.8 4 1.6 198 78.3 - SB-
KERNEL:SPECIFIER-TYPE
78 2 0.8 3 1.2 200 79.1 - SUBSEQ
80 2 0.8 3 1.2 202 79.8 - SB-KERNEL:LIST-
SUBSEQ*
82 2 0.8 2 0.8 204 80.6 - (LAMBDA (SB-
PCL::.ARG0.))
84 2 0.8 2 0.8 206 81.4 - GETF
86 2 0.8 2 0.8 208 82.2 - SB-KERNEL:%SP-
STRING-COMPARE
88 2 0.8 2 0.8 210 83.0 - (LAMBDA (SB-
PCL::.ARG0. SB-INT:&MORE SB-PCL::.MORE-CONTEXT. SB-PCL::.MORE-COUNT.))
90 2 0.8 2 0.8 212 83.8 - (SB-PCL::FAST-
METHOD INITIALIZE-INSTANCE (SB-PCL::SLOT-OBJECT))
92 2 0.8 2 0.8 214 84.6 - SB-IMPL::APPEND2
94 2 0.8 2 0.8 216 85.4 - (LAMBDA (SB-
PCL::.ARG0.))
96 1 0.4 230 90.9 217 85.8 - SB-IMPL::%MAP-
FOR-EFFECT-ARITY-1
98 1 0.4 191 75.5 218 86.2 - (LAMBDA (QL-
DIST::LINE))
100 1 0.4 50 19.8 219 86.6 - (SB-PCL::FAST-
METHOD MAKE-INSTANCE (CLASS))
------------------------------------------------------------------------
0 0.0 elsewhere
#<SB-SPROF::CALL-GRAPH 253 samples {1006311051}>
Any ideas what I should try?
Thanks!
Brian
--
You received this message because you are subscribed to the Google Groups
"weblocks" group.
To post to this group, send email to [email protected].
To unsubscribe from this group, send email to
[email protected].
For more options, visit this group at
http://groups.google.com/group/weblocks?hl=en.
