Hi Michael,
Thanks for this data; I (think I) designed log5 so that it can be fast but I haven't done anything to push on efficiency yet. I'll try to look at this sooner rather than later.
On Feb 4, 2007, at 7:11 PM, Michael Price wrote:
Here is a copy of some experimenting I did tonight with log5 using sbcl on an iBook. The times seem a bit slow and the memory use is disturbing.
Michael
; SLIME 2007-02-04 CL-USER> (require :log5) NIL CL-USER> (use-package :log5) T CL-USER> (start-sender my-test-sender (stream-sender :location *standard-output*) :category-spec (warn+) :output-spec (time message)) #<STREAM-SENDER MY-TEST-SENDER {1391A821}> CL-USER> (log-for (warn) "This is a warning.") 3379622724 "This is a warning." NIL CL-USER> (time (log-for (warn) "This is a warning.")) 3379622770 "This is a warning." Evaluation took: 0.059 seconds of real time 0.04454 seconds of user run time 0.005597 seconds of system run time 0 calls to %EVAL 0 page faults and 712,184 bytes consed. NIL CL-USER> (log-for (info) "This is some info.") NIL CL-USER> (time (log-for (info) "This is some info.")) Evaluation took: 0.118 seconds of real time 0.0883 seconds of user run time 0.010775 seconds of system run time 0 calls to %EVAL 0 page faults and 1,412,120 bytes consed. NIL CL-USER> (time (log-for (info) "This is some info.")) Evaluation took: 0.321 seconds of real time 0.254798 seconds of user run time 0.045183 seconds of system run time [Run times include 0.201 seconds GC run time.] 0 calls to %EVAL 0 page faults and 1,376,048 bytes consed. NIL CL-USER> (time (log-for (info) "This is some info.")) Evaluation took: 0.12 seconds of real time 0.085579 seconds of user run time 0.018949 seconds of system run time 0 calls to %EVAL 0 page faults and 1,387,352 bytes consed. NIL CL-USER> (time (log-for (info) "This is some info.")) Evaluation took: 0.121 seconds of real time 0.086583 seconds of user run time 0.020286 seconds of system run time 0 calls to %EVAL 0 page faults and 1,374,936 bytes consed. NIL CL-USER> (defcategory foo) #<category 13: FOO> CL-USER> (defcategory bar) #<category 14: BAR> CL-USER> (defcategory foobar (and foo bar)) #<category 15: FOOBAR -> (AND FOO BAR)> CL-USER> (start-sender my-test-sender2 (stream-sender :location *standard-output*) :category-spec (foobar) :output-spec (time message)) #<STREAM-SENDER MY-TEST-SENDER2 {13BE23B9}> CL-USER> (log-for (foobar) "FOOBAR!") 3379622899 "FOOBAR!" NIL CL-USER> (time (log-for (foobar) "FOOBAR!")) 3379622909 "FOOBAR!" Evaluation took: 0.367 seconds of real time 0.253236 seconds of user run time 0.031588 seconds of system run time 0 calls to %EVAL 0 page faults and 4,804,736 bytes consed. NIL CL-USER> (time (log-for (foobar) "FOOBAR!")) 3379622912 "FOOBAR!" Evaluation took: 0.379 seconds of real time 0.277797 seconds of user run time 0.03945 seconds of system run time [Run times include 0.049 seconds GC run time.] 0 calls to %EVAL 0 page faults and 4,939,712 bytes consed. NIL CL-USER> _______________________________________________ log5-devel mailing list log5-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/log5-devel
-- Gary Warren King, metabang.com Cell: (413) 885 9127 Fax: (206) 338-4052 gwkkwg on Skype * garethsan on AIM