CUBE-MODELLER> (start-toolbox :new-process t) # CUBE-MODELLER> (progn (sb-profile:reset) (sb-profile:unprofile) (sb-profile:profile "CUBE" "CUBE-MODELLER" "SDL" "GL" "GLU") (cube-modeller:start) (sb-profile:report)) 0.5 frames per second 33.8 frames per second 37.5 frames per second 36.2 frames per second 37.1 frames per second 34.9 frames per second 36.3 frames per second 38.2 frames per second 31.6 frames per second 38.3 frames per second 36.7 frames per second 38.9 frames per second 37.3 frames per second 35.4 frames per second 38.8 frames per second 35.4 frames per second (sum: 546.39996, items: 15, average: 36.426662) seconds | consed | calls | sec/call | name ----------------------------------------------------------- 10.306 | 218,560 | 71,250 | 0.000145 | OPENGL:CALL-LIST 7.785 | 175,701,872 | 202 | 0.038538 | WRITE-STRING-CENTERED 1.232 | 15,663,160 | 570 | 0.002161 | SLEEP-FOR-DELAY 0.946 | 249,751,832 | 1,140 | 0.000830 | WRITE-CUBE-TO-DEVICE 0.090 | 12,267,576 | 71,250 | 0.000001 | DRAW-LED 0.052 | 1,002,464 | 202 | 0.000257 | SCROLL-CLIM-STREAM 0.047 | 982,752 | 570 | 0.000082 | SET-CUBE-SLIDER-VALUE 0.041 | 0 | 71,250 | 0.000001 | ENSURE-INTENSITY-TO-BE-OF-NUMBER 0.036 | 257,088 | 573 | 0.000062 | SDL:POLL-EVENT 0.031 | 4,869,232 | 212,040 | 0.0000001 | COPY-AND-UPDATE-IN-DIRECTION 0.017 | 0 | 71,262 | 0.0000002 | GET-LED-DISPLAY-LIST 0.012 | 0 | 1 | 0.011999 | SDL:SET-VIDEO-MODE 0.012 | 0 | 72,390 | 0.0000002 | OPENGL:PUSH-MATRIX 0.012 | 0 | 557 | 0.000021 | EVENT-PANE 0.012 | 0 | 570 | 0.000020 | SDL:GL-SWAP-BUFFERS 0.008 | 0 | 1 | 0.007999 | SDL:INIT 0.008 | 24,568 | 571 | 0.000013 | FIND-PROCESS-WITH-NAME 0.004 | 0 | 72,390 | 0.0000001 | OPENGL:POP-MATRIX 0.003 | 21,584 | 570 | 0.000006 | ANIMATION-STEP 0.003 | 73,384 | 570 | 0.000006 | CALCULATE-AND-PRINT-FRAMES-PER-SECOND 0.001 | 0 | 4,560 | 0.0000003 | OPENGL:LIGHT-FV 0.000 | 0 | 570 | 0.000000 | GLU:LOOK-AT 0.000 | 0 | 6 | 0.000000 | GLU:SPHERE 0.000 | 0 | 6 | 0.000000 | GLU:QUADRIC-NORMALS 0.000 | 0 | 1 | 0.000000 | GLU:PERSPECTIVE 0.000 | 0 | 6 | 0.000000 | GLU:NEW-QUADRIC 0.000 | 0 | 6 | 0.000000 | GLU:QUADRIC-DRAW-STYLE 0.000 | 0 | 6 | 0.000000 | GLU:DELETE-QUADRIC 0.000 | 0 | 1,140 | 0.000000 | OPENGL:COLOR-4F 0.000 | 0 | 571 | 0.000000 | OPENGL:LOAD-IDENTITY 0.000 | 0 | 6 | 0.000000 | OPENGL:GEN-LISTS 0.000 | 0 | 2,862 | 0.000000 | OPENGL:MATERIAL-FV 0.000 | 0 | 6 | 0.000000 | OPENGL:END-LIST 0.000 | 0 | 570 | 0.000000 | OPENGL:NORMAL-3F 0.000 | 0 | 1,715 | 0.000000 | OPENGL:ENABLE 0.000 | 0 | 6 | 0.000000 | OPENGL:NEW-LIST 0.000 | 0 | 1,710 | 0.000000 | OPENGL:END 0.000 | 0 | 570 | 0.000000 | OPENGL:NORMAL-3D 0.000 | 0 | 1,711 | 0.000000 | OPENGL:DISABLE 0.000 | 0 | 571 | 0.000000 | OPENGL:CLEAR-COLOR 0.000 | 0 | 6 | 0.000000 | OPENGL:DELETE-LISTS 0.000 | 0 | 571 | 0.000000 | OPENGL:MATRIX-MODE 0.000 | 7,880 | 570 | 0.000000 | OPENGL:CLEAR 0.000 | 0 | 1 | 0.000000 | OPENGL:VIEWPORT 0.000 | 0 | 1,710 | 0.000000 | OPENGL:BEGIN 0.000 | 0 | 570 | 0.000000 | OPENGL:COLOR-MATERIAL 0.000 | 0 | 1 | 0.000000 | OPENGL:BLEND-FUNC 0.000 | 0 | 6 | 0.000000 | SDL:GL-SET-ATTRIBUTE 0.000 | 0 | 1 | 0.000000 | SDL:SET-GL-ATTRIBUTES 0.000 | 0 | 1 | 0.000000 | SDL:WM-SET-CAPTION 0.000 | 0 | 1 | 0.000000 | SDL:QUIT 0.000 | 0 | 570 | 0.000000 | SDL:GET-TICKS 0.000 | 0 | 1 | 0.000000 | SDL::WM-SET-CAPTION1608 0.000 | 0 | 1 | 0.000000 | START 0.000 | 0 | 1 | 0.000000 | START-VIEWER 0.000 | 0 | 1 | 0.000000 | PROCESS-MOUSE-MOTION 0.000 | 0 | 1 | 0.000000 | DESTROY-PROCESS-WITH-NAME xo 0.000 | 1,312,352 | 570 | 0.000000 | DISPLAY-SCENE 0.000 | 0 | 1 | 0.000000 | INIT-GL 0.000 | 8,176 | 6 | 0.000000 | DRAW-UNTRANSLATED-LED 0.000 | 635,480 | 570 | 0.000000 | DRAW-COORDINATE-SYSTEM 0.000 | 2,410,960 | 141,930 | 0.000000 | MAKE-FAKECUBE 0.000 | 0 | 570 | 0.000000 | QUEUE-TOOLBOX-EVENT 0.000 | 13,020,048 | 141,930 | 0.000000 | DRAW-LEDS 0.000 | 81,920 | 1 | 0.000000 | RUN-SDL-EVENT-LOOP 0.000 | 82,544 | 1,140 | 0.000000 | DEGREE-TO-RADIAN 0.000 | 0 | 1 | 0.000000 | DESTROY-LED-DISPLAY-LISTS 0.000 | 0 | 1 | 0.000000 | CREATE-LED-DISPLAY-LISTS 0.000 | 0 | 1 | 0.000000 | INIT-SDL-WITH-GL 0.000 | 0 | 6 | 0.000000 | DRAW-SPHERE 0.000 | 0 | 1,127 | 0.000000 | PROCESSES-SUPPORTED-P 0.000 | 0 | 570 | 0.000000 | LED-CUBE:GOTO-CUBE 0.000 | 0 | 1 | 0.000000 | CLOSE-CUBE-DEVICE 0.000 | 0 | 1,140 | 0.000000 | LED-CUBE::NETWORK-SEND ----------------------------------------------------------- 20.655 | 478,393,432 | 958,106 | | Total estimated total profiling overhead: 1.40 seconds overhead estimation parameters: 2.4e-8s/call, 1.458e-6s total profiling, 6.1000003e-7s internal profiling These functions were not called: ; No value CUBE-MODELLER> (start-toolbox :new-process t) # CUBE-MODELLER> (progn (sb-profile:reset) (sb-profile:unprofile) (sb-profile:profile "CUBE" "CUBE-MODELLER" "SDL" "GL" "GLU") (cube-modeller:start) (sb-profile:report)) 0.3 frames per second 32.3 frames per second 34.1 frames per second 36.2 frames per second 35.3 frames per second 35.9 frames per second 37.5 frames per second 35.4 frames per second 37.1 frames per second 35.2 frames per second 36.2 frames per second 38.5 frames per second 36.7 frames per second 35.6 frames per second 36.4 frames per second 36.2 frames per second (sum: 538.60004, items: 15, average: 35.90667) seconds | consed | calls | sec/call | name ----------------------------------------------------------- 10.039 | 286,176 | 69,125 | 0.000145 | OPENGL:CALL-LIST 8.949 | 204,782,952 | 212 | 0.042211 | WRITE-STRING-CENTERED 1.128 | 16,278,336 | 553 | 0.002039 | SLEEP-FOR-DELAY 0.878 | 242,488,880 | 1,106 | 0.000794 | WRITE-CUBE-TO-DEVICE 0.135 | 995,280 | 553 | 0.000244 | SET-CUBE-SLIDER-VALUE 0.133 | 11,993,608 | 69,125 | 0.000002 | DRAW-LED 0.060 | 277,592 | 557 | 0.000107 | SDL:POLL-EVENT 0.037 | 0 | 70,231 | 0.000001 | OPENGL:PUSH-MATRIX 0.032 | 2,299,128 | 137,697 | 0.0000002 | MAKE-FAKECUBE 0.025 | 0 | 70,231 | 0.0000004 | OPENGL:POP-MATRIX 0.016 | 0 | 553 | 0.000028 | SDL:GL-SWAP-BUFFERS 0.014 | 0 | 69,137 | 0.0000002 | GET-LED-DISPLAY-LIST 0.012 | 0 | 1 | 0.011999 | SDL:SET-VIDEO-MODE 0.007 | 73,792 | 553 | 0.000013 | CALCULATE-AND-PRINT-FRAMES-PER-SECOND 0.006 | 0 | 69,125 | 0.0000001 | ENSURE-INTENSITY-TO-BE-OF-NUMBER 0.004 | 0 | 1 | 0.003999 | SDL:QUIT 0.004 | 0 | 1 | 0.003999 | SDL:INIT 0.004 | 0 | 212 | 0.000018 | SCROLL-CLIM-STREAM 0.004 | 0 | 553 | 0.000007 | SDL:GET-TICKS 0.004 | 32,752 | 554 | 0.000007 | FIND-PROCESS-WITH-NAME 0.003 | 0 | 1,106 | 0.000003 | LED-CUBE::NETWORK-SEND 0.000 | 0 | 553 | 0.000000 | GLU:LOOK-AT 0.000 | 0 | 6 | 0.000000 | GLU:SPHERE 0.000 | 0 | 6 | 0.000000 | GLU:QUADRIC-NORMALS 0.000 | 0 | 1 | 0.000000 | GLU:PERSPECTIVE 0.000 | 0 | 6 | 0.000000 | GLU:NEW-QUADRIC 0.000 | 0 | 6 | 0.000000 | GLU:QUADRIC-DRAW-STYLE 0.000 | 0 | 6 | 0.000000 | GLU:DELETE-QUADRIC 0.000 | 0 | 1,106 | 0.000000 | OPENGL:COLOR-4F 0.000 | 0 | 554 | 0.000000 | OPENGL:LOAD-IDENTITY 0.000 | 0 | 6 | 0.000000 | OPENGL:GEN-LISTS 0.000 | 0 | 2,777 | 0.000000 | OPENGL:MATERIAL-FV 0.000 | 0 | 6 | 0.000000 | OPENGL:END-LIST 0.000 | 0 | 553 | 0.000000 | OPENGL:NORMAL-3F 0.000 | 0 | 1,664 | 0.000000 | OPENGL:ENABLE 0.000 | 0 | 6 | 0.000000 | OPENGL:NEW-LIST 0.000 | 0 | 1,659 | 0.000000 | OPENGL:END 0.000 | 0 | 553 | 0.000000 | OPENGL:NORMAL-3D 0.000 | 0 | 4,424 | 0.000000 | OPENGL:LIGHT-FV 0.000 | 0 | 1,660 | 0.000000 | OPENGL:DISABLE 0.000 | 0 | 554 | 0.000000 | OPENGL:CLEAR-COLOR 0.000 | 0 | 6 | 0.000000 | OPENGL:DELETE-LISTS 0.000 | 0 | 554 | 0.000000 | OPENGL:MATRIX-MODE 0.000 | 0 | 553 | 0.000000 | OPENGL:CLEAR 0.000 | 0 | 1 | 0.000000 | OPENGL:VIEWPORT 0.000 | 0 | 1,659 | 0.000000 | OPENGL:BEGIN 0.000 | 0 | 553 | 0.000000 | OPENGL:COLOR-MATERIAL 0.000 | 0 | 1 | 0.000000 | OPENGL:BLEND-FUNC 0.000 | 0 | 6 | 0.000000 | SDL:GL-SET-ATTRIBUTE 0.000 | 0 | 1 | 0.000000 | SDL:SET-GL-ATTRIBUTES 0.000 | 0 | 1 | 0.000000 | SDL:WM-SET-CAPTION 0.000 | 0 | 1 | 0.000000 | SDL::WM-SET-CAPTION1608 0.000 | 0 | 1 | 0.000000 | START 0.000 | 0 | 1 | 0.000000 | START-VIEWER 0.000 | 0 | 2 | 0.000000 | PROCESS-MOUSE-MOTION 0.000 | 0 | 1 | 0.000000 | DESTROY-PROCESS-WITH-NAME 0.000 | 1,330,224 | 553 | 0.000000 | DISPLAY-SCENE 0.000 | 0 | 1 | 0.000000 | INIT-GL 0.000 | 0 | 552 | 0.000000 | EVENT-PANE 0.000 | 0 | 6 | 0.000000 | DRAW-UNTRANSLATED-LED 0.000 | 566,392 | 553 | 0.000000 | DRAW-COORDINATE-SYSTEM 0.000 | 0 | 553 | 0.000000 | QUEUE-TOOLBOX-EVENT 0.000 | 12,548,880 | 137,697 | 0.000000 | DRAW-LEDS 0.000 | 22,320 | 553 | 0.000000 | ANIMATION-STEP 0.000 | 65,536 | 1 | 0.000000 | RUN-SDL-EVENT-LOOP 0.000 | 139,656 | 1,106 | 0.000000 | DEGREE-TO-RADIAN 0.000 | 0 | 1 | 0.000000 | DESTROY-LED-DISPLAY-LISTS 0.000 | 4,585,984 | 205,716 | 0.000000 | COPY-AND-UPDATE-IN-DIRECTION 0.000 | 0 | 1 | 0.000000 | CREATE-LED-DISPLAY-LISTS 0.000 | 0 | 1 | 0.000000 | INIT-SDL-WITH-GL 0.000 | 0 | 6 | 0.000000 | DRAW-SPHERE 0.000 | 0 | 1,105 | 0.000000 | PROCESSES-SUPPORTED-P 0.000 | 0 | 553 | 0.000000 | LED-CUBE:GOTO-CUBE 0.000 | 0 | 1 | 0.000000 | CLOSE-CUBE-DEVICE ----------------------------------------------------------- 21.492 | 498,767,488 | 929,592 | | Total estimated total profiling overhead: 1.36 seconds overhead estimation parameters: 2.4e-8s/call, 1.458e-6s total profiling, 6.1000003e-7s internal profiling These functions were not called: ; No value code: (let* ((list '( 33.8 37.5 36.2 37.1 34.9 36.3 38.2 31.6 38.3 36.7 38.9 37.3 35.4 38.8 35.4 )) (length (length list)) (sum (reduce #'+ list))) (format t "(sum: ~a, items: ~a, average: ~a)~&" sum length (/ sum length)))