summaryrefslogtreecommitdiff
path: root/.localrepo/log4e-20240123.1313.tar
blob: 45fe8e720e33ed031954134d84d767dec67e4be3 (plain)
ofshex dumpascii
0000 6c 6f 67 34 65 2d 32 30 32 34 30 31 32 33 2e 31 33 31 33 2f 00 00 00 00 00 00 00 00 00 00 00 00 log4e-20240123.1313/............
0020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0060 00 00 00 00 30 30 30 30 37 35 35 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000755.0000000.0000000.0000
0080 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 30 31 30 00 20 35 00 00 00 0000000.00000000000.012010..5...
00a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
00c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
00e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0100 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0120 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
01a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
01c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
01e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0200 6c 6f 67 34 65 2d 32 30 32 34 30 31 32 33 2e 31 33 31 33 2f 6c 6f 67 34 65 2d 70 6b 67 2e 65 6c log4e-20240123.1313/log4e-pkg.el
0220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0260 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
0280 30 30 30 30 36 31 37 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 31 32 37 00 20 30 00 00 00 0000617.00000000000.014127..0...
02a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
02c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
02e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0300 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0320 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
03a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
03c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
03e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0400 3b 3b 20 2d 2a 2d 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 3a 20 74 3b 20 6c 65 78 69 63 ;;.-*-.no-byte-compile:.t;.lexic
0420 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 6e 69 6c 20 2d 2a 2d 0a 28 64 65 66 69 6e 65 2d 70 61 63 6b al-binding:.nil.-*-.(define-pack
0440 61 67 65 20 22 6c 6f 67 34 65 22 20 22 32 30 32 34 30 31 32 33 2e 31 33 31 33 22 0a 20 20 22 50 age."log4e"."20240123.1313"..."P
0460 72 6f 76 69 64 65 20 6c 6f 67 67 69 6e 67 20 66 72 61 6d 65 77 6f 72 6b 20 66 6f 72 20 65 6c 69 rovide.logging.framework.for.eli
0480 73 70 2e 22 0a 20 20 28 29 0a 20 20 3a 75 72 6c 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 sp."...()...:url."https://github
04a0 2e 63 6f 6d 2f 61 6b 69 32 6f 2f 6c 6f 67 34 65 22 0a 20 20 3a 63 6f 6d 6d 69 74 20 22 36 64 37 .com/aki2o/log4e"...:commit."6d7
04c0 31 34 36 32 64 66 39 62 66 35 39 35 64 33 38 36 31 62 66 62 33 32 38 33 37 37 33 34 36 61 63 65 1462df9bf595d3861bfb328377346ace
04e0 65 64 34 32 32 22 0a 20 20 3a 72 65 76 64 65 73 63 20 22 36 64 37 31 34 36 32 64 66 39 62 66 22 ed422"...:revdesc."6d71462df9bf"
0500 0a 20 20 3a 6b 65 79 77 6f 72 64 73 20 27 28 22 6c 6f 67 22 29 0a 20 20 3a 61 75 74 68 6f 72 73 ...:keywords.'("log")...:authors
0520 20 27 28 28 22 48 69 72 6f 61 6b 69 20 4f 74 73 75 22 20 2e 20 22 6f 6f 74 73 75 68 69 72 6f 61 .'(("Hiroaki.Otsu"..."ootsuhiroa
0540 6b 69 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 29 0a 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 73 20 27 ki@gmail.com"))...:maintainers.'
0560 28 28 22 48 69 72 6f 61 6b 69 20 4f 74 73 75 22 20 2e 20 22 6f 6f 74 73 75 68 69 72 6f 61 6b 69 (("Hiroaki.Otsu"..."ootsuhiroaki
0580 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 29 29 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 @gmail.com")))..................
05a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
05c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
05e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0600 6c 6f 67 34 65 2d 32 30 32 34 30 31 32 33 2e 31 33 31 33 2f 6c 6f 67 34 65 2e 65 6c 00 00 00 00 log4e-20240123.1313/log4e.el....
0620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0660 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
0680 30 30 35 36 36 33 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 33 36 30 00 20 30 00 00 00 0056632.00000000000.013360..0...
06a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
06c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
06e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0700 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0720 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
07a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
07c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
07e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0800 3b 3b 3b 20 6c 6f 67 34 65 2e 65 6c 20 2d 2d 2d 20 70 72 6f 76 69 64 65 20 6c 6f 67 67 69 6e 67 ;;;.log4e.el.---.provide.logging
0820 20 66 72 61 6d 65 77 6f 72 6b 20 66 6f 72 20 65 6c 69 73 70 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 .framework.for.elisp..;;.Copyrig
0840 68 74 20 28 43 29 20 32 30 31 33 20 20 48 69 72 6f 61 6b 69 20 4f 74 73 75 0a 0a 3b 3b 20 41 75 ht.(C).2013..Hiroaki.Otsu..;;.Au
0860 74 68 6f 72 3a 20 48 69 72 6f 61 6b 69 20 4f 74 73 75 20 3c 6f 6f 74 73 75 68 69 72 6f 61 6b 69 thor:.Hiroaki.Otsu.<ootsuhiroaki
0880 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 6c 6f 67 0a 3b 3b 20 @gmail.com>.;;.Keywords:.log.;;.
08a0 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6b 69 32 6f 2f 6c 6f URL:.https://github.com/aki2o/lo
08c0 67 34 65 0a 3b 3b 20 50 61 63 6b 61 67 65 2d 56 65 72 73 69 6f 6e 3a 20 32 30 32 34 30 31 32 33 g4e.;;.Package-Version:.20240123
08e0 2e 31 33 31 33 0a 3b 3b 20 50 61 63 6b 61 67 65 2d 52 65 76 69 73 69 6f 6e 3a 20 36 64 37 31 34 .1313.;;.Package-Revision:.6d714
0900 36 32 64 66 39 62 66 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 62df9bf..;;.This.program.is.free
0920 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 .software;.you.can.redistribute.
0940 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 it.and/or.modify.;;.it.under.the
0960 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 .terms.of.the.GNU.General.Public
0980 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 .License.as.published.by.;;.the.
09a0 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 Free.Software.Foundation,.either
09c0 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b .version.3.of.the.License,.or.;;
09e0 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 .(at.your.option).any.later.vers
0a00 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 64 69 73 74 72 69 62 75 74 65 ion...;;.This.file.is.distribute
0a20 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 d.in.the.hope.that.it.will.be.us
0a40 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 eful,.;;.but.WITHOUT.ANY.WARRANT
0a60 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 Y;.without.even.the.implied.warr
0a80 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 anty.of.;;.MERCHANTABILITY.or.FI
0aa0 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 TNESS.FOR.A.PARTICULAR.PURPOSE..
0ac0 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c .See.the.;;.GNU.General.Public.L
0ae0 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 icense.for.more.details...;;.You
0b00 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 .should.have.received.a.copy.of.
0b20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b the.GNU.General.Public.License.;
0b40 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e ;.along.with.this.program...If.n
0b60 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 ot,.see.<http://www.gnu.org/lice
0b80 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 3b 3b 0a 3b 3b 20 54 nses/>...;;;.Commentary:.;;.;;.T
0ba0 68 69 73 20 65 78 74 65 6e 73 69 6f 6e 20 70 72 6f 76 69 64 65 73 20 6c 6f 67 67 69 6e 67 20 66 his.extension.provides.logging.f
0bc0 72 61 6d 65 77 6f 72 6b 20 66 6f 72 20 65 6c 69 73 70 2e 0a 3b 3b 0a 3b 3b 20 46 6f 72 20 64 65 ramework.for.elisp..;;.;;.For.de
0be0 74 61 69 6c 2c 20 73 65 65 20 3c 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6b tail,.see.<https://github.com/ak
0c00 69 32 6f 2f 6c 6f 67 34 65 2f 62 6c 6f 62 2f 6d 61 73 74 65 72 2f 52 45 41 44 4d 45 2e 6d 64 3e i2o/log4e/blob/master/README.md>
0c20 0a 3b 3b 0a 3b 3b 20 45 6e 6a 6f 79 21 21 21 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 .;;.;;.Enjoy!!!..;;;.Code:..(req
0c40 75 69 72 65 20 27 63 6c 2d 6c 69 62 29 0a 28 72 65 71 75 69 72 65 20 27 72 78 29 0a 0a 0a 28 64 uire.'cl-lib).(require.'rx)...(d
0c60 65 66 63 6f 6e 73 74 20 6c 6f 67 34 65 2d 6c 6f 67 2d 6c 65 76 65 6c 2d 61 6c 69 73 74 20 27 28 efconst.log4e-log-level-alist.'(
0c80 28 66 61 74 61 6c 20 2e 20 36 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (fatal...6).....................
0ca0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 2e 20 35 29 0a 20 20 20 20 20 20 ..............(error...5).......
0cc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 61 72 ............................(war
0ce0 6e 20 20 2e 20 34 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 n....4).........................
0d00 20 20 20 20 20 20 20 20 20 20 28 69 6e 66 6f 20 20 2e 20 33 29 0a 20 20 20 20 20 20 20 20 20 20 ..........(info....3)...........
0d20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 62 75 67 20 2e ........................(debug..
0d40 20 32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .2).............................
0d60 20 20 20 20 20 20 28 74 72 61 63 65 20 2e 20 31 29 29 0a 20 20 22 41 6c 69 73 74 20 6f 66 20 6c ......(trace...1))..."Alist.of.l
0d80 6f 67 20 6c 65 76 65 6c 20 76 61 6c 75 65 2e 22 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 6c 6f 67 og.level.value.")..(defconst.log
0da0 34 65 2d 64 65 66 61 75 6c 74 2d 6c 6f 67 67 69 6e 67 2d 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 4e-default-logging-function-name
0dc0 2d 61 6c 69 73 74 20 27 28 28 66 61 74 61 6c 20 2e 20 22 6c 6f 67 2d 66 61 74 61 6c 22 29 0a 20 -alist.'((fatal..."log-fatal")..
0de0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
0e00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 2e 20 22 6c .....................(error..."l
0e20 6f 67 2d 65 72 72 6f 72 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 og-error")......................
0e40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
0e60 20 28 77 61 72 6e 20 20 2e 20 22 6c 6f 67 2d 77 61 72 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 .(warn...."log-warn")...........
0e80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
0ea0 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 66 6f 20 20 2e 20 22 6c 6f 67 2d 69 6e 66 6f 22 29 ............(info...."log-info")
0ec0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
0ee0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 62 75 67 20 2e 20 .......................(debug...
0f00 22 6c 6f 67 2d 64 65 62 75 67 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 "log-debug")....................
0f20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
0f40 20 20 20 28 74 72 61 63 65 20 2e 20 22 6c 6f 67 2d 74 72 61 63 65 22 29 29 0a 20 20 22 41 6c 69 ...(trace..."log-trace"))..."Ali
0f60 73 74 20 6f 66 20 6c 6f 67 67 69 6e 67 20 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 20 61 74 20 64 st.of.logging.function.name.at.d
0f80 65 66 61 75 6c 74 2e 22 29 0a 0a 0a 28 64 65 66 6d 61 63 72 6f 20 6c 6f 67 34 65 2d 2d 64 65 66 efault.")...(defmacro.log4e--def
0fa0 2d 73 79 6d 6d 61 6b 65 72 20 28 73 79 6d 6e 6d 29 0a 20 20 60 28 70 72 6f 67 6e 0a 20 20 20 20 -symmaker.(symnm)...`(progn.....
0fc0 20 28 64 65 66 73 75 62 73 74 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 22 6c 6f 67 .(defsubst.,(intern.(concat."log
0fe0 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 22 20 73 79 6d 6e 6d 29 29 20 28 70 72 65 66 69 4e--make-symbol-".symnm)).(prefi
1000 78 29 0a 20 20 20 20 20 20 20 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 2c 28 66 6f 72 6d x)........(intern.(concat.,(form
1020 61 74 20 22 6c 6f 67 34 65 2d 2d 25 73 2d 22 20 73 79 6d 6e 6d 29 20 70 72 65 66 69 78 29 29 29 at."log4e--%s-".symnm).prefix)))
1040 29 29 0a 0a 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 73 79 6d 6d 61 6b 65 72 20 22 6c 6f 67 2d 62 75 ))..(log4e--def-symmaker."log-bu
1060 66 66 65 72 22 29 0a 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 73 79 6d 6d 61 6b 65 72 20 22 6d 73 67 ffer").(log4e--def-symmaker."msg
1080 2d 62 75 66 66 65 72 22 29 0a 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 73 79 6d 6d 61 6b 65 72 20 22 -buffer").(log4e--def-symmaker."
10a0 6c 6f 67 2d 74 65 6d 70 6c 61 74 65 22 29 0a 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 73 79 6d 6d 61 log-template").(log4e--def-symma
10c0 6b 65 72 20 22 74 69 6d 65 2d 74 65 6d 70 6c 61 74 65 22 29 0a 28 6c 6f 67 34 65 2d 2d 64 65 66 ker."time-template").(log4e--def
10e0 2d 73 79 6d 6d 61 6b 65 72 20 22 6d 69 6e 2d 6c 65 76 65 6c 22 29 0a 28 6c 6f 67 34 65 2d 2d 64 -symmaker."min-level").(log4e--d
1100 65 66 2d 73 79 6d 6d 61 6b 65 72 20 22 6d 61 78 2d 6c 65 76 65 6c 22 29 0a 28 6c 6f 67 34 65 2d ef-symmaker."max-level").(log4e-
1120 2d 64 65 66 2d 73 79 6d 6d 61 6b 65 72 20 22 74 6f 67 67 6c 65 2d 6c 6f 67 67 69 6e 67 22 29 0a -def-symmaker."toggle-logging").
1140 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 73 79 6d 6d 61 6b 65 72 20 22 74 6f 67 67 6c 65 2d 64 65 62 (log4e--def-symmaker."toggle-deb
1160 75 67 67 69 6e 67 22 29 0a 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 73 79 6d 6d 61 6b 65 72 20 22 62 ugging").(log4e--def-symmaker."b
1180 75 66 66 65 72 2d 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 22 29 0a 28 6c 6f 67 34 65 2d 2d 64 65 uffer-coding-system").(log4e--de
11a0 66 2d 73 79 6d 6d 61 6b 65 72 20 22 61 75 74 68 6f 72 2d 6d 61 69 6c 2d 61 64 64 72 65 73 73 22 f-symmaker."author-mail-address"
11c0 29 0a 0a 28 64 65 66 6d 61 63 72 6f 20 6c 6f 67 34 65 2d 2d 64 65 66 2d 6c 65 76 65 6c 2d 6c 6f )..(defmacro.log4e--def-level-lo
11e0 67 67 65 72 20 28 70 72 65 66 69 78 20 73 75 66 66 69 78 20 6c 65 76 65 6c 29 0a 20 20 28 6c 65 gger.(prefix.suffix.level)...(le
1200 74 20 28 28 61 72 67 66 6f 72 6d 20 28 69 66 20 73 75 66 66 69 78 0a 20 20 20 20 20 20 20 20 20 t.((argform.(if.suffix..........
1220 20 20 20 20 20 20 20 20 20 20 20 20 27 28 6d 73 67 20 26 72 65 73 74 20 6d 73 67 61 72 67 73 29 ............'(msg.&rest.msgargs)
1240 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 28 6c 65 76 65 6c 20 6d 73 67 20 ....................'(level.msg.
1260 26 72 65 73 74 20 6d 73 67 61 72 67 73 29 29 29 0a 20 20 20 20 20 20 20 20 28 62 75 66 66 20 28 &rest.msgargs))).........(buff.(
1280 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6c 6f 67 2d 62 75 66 66 65 72 20 70 72 log4e--make-symbol-log-buffer.pr
12a0 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 28 6d 73 67 62 75 66 66 20 28 6c 6f 67 34 65 2d 2d efix)).........(msgbuff.(log4e--
12c0 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6d 73 67 2d 62 75 66 66 65 72 20 70 72 65 66 69 78 29 29 0a make-symbol-msg-buffer.prefix)).
12e0 20 20 20 20 20 20 20 20 28 63 6f 64 73 79 73 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d ........(codsys.(log4e--make-sym
1300 62 6f 6c 2d 62 75 66 66 65 72 2d 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 20 70 72 65 66 69 78 29 bol-buffer-coding-system.prefix)
1320 29 0a 20 20 20 20 20 20 20 20 28 6c 6f 67 74 6d 70 6c 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d ).........(logtmpl.(log4e--make-
1340 73 79 6d 62 6f 6c 2d 6c 6f 67 2d 74 65 6d 70 6c 61 74 65 20 70 72 65 66 69 78 29 29 0a 20 20 20 symbol-log-template.prefix))....
1360 20 20 20 20 20 28 74 69 6d 65 74 6d 70 6c 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 .....(timetmpl.(log4e--make-symb
1380 6f 6c 2d 74 69 6d 65 2d 74 65 6d 70 6c 61 74 65 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 ol-time-template.prefix)).......
13a0 20 20 28 6d 69 6e 6c 76 6c 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6d 69 ..(minlvl.(log4e--make-symbol-mi
13c0 6e 2d 6c 65 76 65 6c 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 28 6d 61 78 6c 76 6c n-level.prefix)).........(maxlvl
13e0 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6d 61 78 2d 6c 65 76 65 6c 20 70 .(log4e--make-symbol-max-level.p
1400 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 28 6c 6f 67 67 69 6e 67 2d 70 20 28 6c 6f 67 34 refix)).........(logging-p.(log4
1420 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 74 6f 67 67 6c 65 2d 6c 6f 67 67 69 6e 67 20 70 72 e--make-symbol-toggle-logging.pr
1440 65 66 69 78 29 29 29 0a 20 20 20 20 60 28 70 72 6f 67 6e 0a 0a 20 20 20 20 20 20 20 3b 3b 20 44 efix))).....`(progn.........;;.D
1460 65 66 69 6e 65 20 6c 6f 67 67 69 6e 67 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 28 64 efine.logging.function........(d
1480 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d efun.,(intern.(concat.prefix."--
14a0 22 20 28 6f 72 20 73 75 66 66 69 78 20 22 6c 6f 67 22 29 29 29 20 2c 61 72 67 66 6f 72 6d 0a 20 ".(or.suffix."log"))).,argform..
14c0 20 20 20 20 20 20 20 20 2c 28 66 6f 72 6d 61 74 20 22 44 6f 20 6c 6f 67 67 69 6e 67 20 66 6f 72 ........,(format."Do.logging.for
14e0 20 25 73 20 6c 65 76 65 6c 20 6c 6f 67 2e 0a 25 73 4d 53 47 2f 4d 53 47 41 52 47 53 20 61 72 65 .%s.level.log..%sMSG/MSGARGS.are
1500 20 70 61 73 73 65 64 20 74 6f 20 60 66 6f 72 6d 61 74 27 2e 22 0a 20 20 20 20 20 20 20 20 20 20 .passed.to.`format'."...........
1520 20 20 20 20 20 20 20 20 28 69 66 20 73 75 66 66 69 78 20 6c 65 76 65 6c 20 22 61 6e 79 22 29 0a ........(if.suffix.level."any").
1540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 73 75 66 66 69 78 20 22 22 20 ..................(if.suffix."".
1560 22 4c 45 56 45 4c 20 69 73 20 73 79 6d 62 6f 6c 20 74 68 61 74 20 69 73 20 6f 6e 65 20 6f 66 20 "LEVEL.is.symbol.that.is.one.of.
1580 74 72 61 63 65 20 64 65 62 75 67 20 69 6e 66 6f 20 77 61 72 6e 20 65 72 72 6f 72 20 66 61 74 61 trace.debug.info.warn.error.fata
15a0 6c 2e 5c 6e 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6c 6f 67 34 65 2d 2d 63 l.\n"))..........(let.((log4e--c
15c0 75 72 72 65 6e 74 2d 6d 73 67 2d 62 75 66 66 65 72 20 2c 6d 73 67 62 75 66 66 29 29 0a 20 20 20 urrent-msg-buffer.,msgbuff))....
15e0 20 20 20 20 20 20 20 20 2c 28 69 66 20 73 75 66 66 69 78 0a 20 20 20 20 20 20 20 20 20 20 20 20 ........,(if.suffix.............
1600 20 20 20 20 60 28 61 70 70 6c 79 20 27 6c 6f 67 34 65 2d 2d 6c 6f 67 67 69 6e 67 20 2c 62 75 66 ....`(apply.'log4e--logging.,buf
1620 66 20 2c 63 6f 64 73 79 73 20 2c 6c 6f 67 74 6d 70 6c 20 2c 74 69 6d 65 74 6d 70 6c 20 2c 6d 69 f.,codsys.,logtmpl.,timetmpl.,mi
1640 6e 6c 76 6c 20 2c 6d 61 78 6c 76 6c 20 2c 6c 6f 67 67 69 6e 67 2d 70 20 27 2c 6c 65 76 65 6c 20 nlvl.,maxlvl.,logging-p.',level.
1660 6d 73 67 20 6d 73 67 61 72 67 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 61 70 70 msg.msgargs)...............`(app
1680 6c 79 20 27 6c 6f 67 34 65 2d 2d 6c 6f 67 67 69 6e 67 20 2c 62 75 66 66 20 2c 63 6f 64 73 79 73 ly.'log4e--logging.,buff.,codsys
16a0 20 2c 6c 6f 67 74 6d 70 6c 20 2c 74 69 6d 65 74 6d 70 6c 20 2c 6d 69 6e 6c 76 6c 20 2c 6d 61 78 .,logtmpl.,timetmpl.,minlvl.,max
16c0 6c 76 6c 20 2c 6c 6f 67 67 69 6e 67 2d 70 20 6c 65 76 65 6c 20 6d 73 67 20 6d 73 67 61 72 67 73 lvl.,logging-p.level.msg.msgargs
16e0 29 29 29 29 0a 0a 20 20 20 20 20 20 20 3b 3b 20 44 65 66 69 6e 65 20 6c 6f 67 67 69 6e 67 20 6d )))).........;;.Define.logging.m
1700 61 63 72 6f 0a 20 20 20 20 20 20 20 28 64 65 66 6d 61 63 72 6f 20 2c 28 69 6e 74 65 72 6e 20 28 acro........(defmacro.,(intern.(
1720 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 22 20 28 6f 72 20 73 75 66 66 69 78 20 22 6c concat.prefix."--".(or.suffix."l
1740 6f 67 22 29 20 22 2a 22 29 29 20 2c 61 72 67 66 6f 72 6d 0a 20 20 20 20 20 20 20 20 20 2c 28 66 og")."*")).,argform..........,(f
1760 6f 72 6d 61 74 20 22 44 6f 20 6c 6f 67 67 69 6e 67 20 66 6f 72 20 25 73 20 6c 65 76 65 6c 20 6c ormat."Do.logging.for.%s.level.l
1780 6f 67 2e 0a 25 73 4d 53 47 2f 4d 53 47 41 52 47 53 20 61 72 65 20 70 61 73 73 65 64 20 74 6f 20 og..%sMSG/MSGARGS.are.passed.to.
17a0 60 66 6f 72 6d 61 74 27 2e 0a 45 76 61 6c 75 61 74 69 6f 6e 20 6f 66 20 4d 53 47 41 52 47 53 20 `format'..Evaluation.of.MSGARGS.
17c0 69 73 20 69 6e 76 6f 6b 65 64 20 6f 6e 6c 79 20 69 66 20 25 73 20 6c 65 76 65 6c 20 6c 6f 67 20 is.invoked.only.if.%s.level.log.
17e0 73 68 6f 75 6c 64 20 62 65 20 70 72 69 6e 74 65 64 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 should.be.printed.".............
1800 20 20 20 20 20 20 28 69 66 20 73 75 66 66 69 78 20 6c 65 76 65 6c 20 22 61 6e 79 22 29 0a 20 20 ......(if.suffix.level."any")...
1820 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 73 75 66 66 69 78 20 22 22 20 22 4c ................(if.suffix.""."L
1840 45 56 45 4c 20 69 73 20 73 79 6d 62 6f 6c 20 74 68 61 74 20 69 73 20 6f 6e 65 20 6f 66 20 74 72 EVEL.is.symbol.that.is.one.of.tr
1860 61 63 65 20 64 65 62 75 67 20 69 6e 66 6f 20 77 61 72 6e 20 65 72 72 6f 72 20 66 61 74 61 6c 2e ace.debug.info.warn.error.fatal.
1880 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 73 75 66 66 69 \n")...................(if.suffi
18a0 78 20 6c 65 76 65 6c 20 22 74 68 65 22 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 2c x.level."the"))..........(let.(,
18c0 40 28 69 66 20 73 75 66 66 69 78 20 28 6c 69 73 74 20 60 28 6c 65 76 65 6c 20 27 2c 6c 65 76 65 @(if.suffix.(list.`(level.',leve
18e0 6c 29 29 20 27 28 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 20 28 6c l)).'())................(buff.(l
1900 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6c 6f 67 2d 62 75 66 66 65 72 20 2c 70 72 og4e--make-symbol-log-buffer.,pr
1920 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 73 67 62 75 66 66 20 28 efix))................(msgbuff.(
1940 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6d 73 67 2d 62 75 66 66 65 72 20 2c 70 log4e--make-symbol-msg-buffer.,p
1960 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 64 73 79 73 20 28 refix))................(codsys.(
1980 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 62 75 66 66 65 72 2d 63 6f 64 69 6e 67 log4e--make-symbol-buffer-coding
19a0 2d 73 79 73 74 65 6d 20 2c 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -system.,prefix))...............
19c0 20 28 6c 6f 67 74 6d 70 6c 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6c 6f .(logtmpl.(log4e--make-symbol-lo
19e0 67 2d 74 65 6d 70 6c 61 74 65 20 2c 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 g-template.,prefix))............
1a00 20 20 20 20 28 74 69 6d 65 74 6d 70 6c 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f ....(timetmpl.(log4e--make-symbo
1a20 6c 2d 74 69 6d 65 2d 74 65 6d 70 6c 61 74 65 20 2c 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 l-time-template.,prefix)).......
1a40 20 20 20 20 20 20 20 20 20 28 6d 69 6e 6c 76 6c 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 .........(minlvl.(log4e--make-sy
1a60 6d 62 6f 6c 2d 6d 69 6e 2d 6c 65 76 65 6c 20 2c 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 mbol-min-level.,prefix))........
1a80 20 20 20 20 20 20 20 20 28 6d 61 78 6c 76 6c 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d ........(maxlvl.(log4e--make-sym
1aa0 62 6f 6c 2d 6d 61 78 2d 6c 65 76 65 6c 20 2c 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 bol-max-level.,prefix)).........
1ac0 20 20 20 20 20 20 20 28 6c 6f 67 67 69 6e 67 2d 70 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 .......(logging-p.(log4e--make-s
1ae0 79 6d 62 6f 6c 2d 74 6f 67 67 6c 65 2d 6c 6f 67 67 69 6e 67 20 2c 70 72 65 66 69 78 29 29 29 0a ymbol-toggle-logging.,prefix))).
1b00 20 20 20 20 20 20 20 20 20 20 20 60 28 6c 65 74 20 28 28 6c 6f 67 34 65 2d 2d 63 75 72 72 65 6e ...........`(let.((log4e--curren
1b20 74 2d 6d 73 67 2d 62 75 66 66 65 72 20 2c 6d 73 67 62 75 66 66 29 29 0a 20 20 20 20 20 20 20 20 t-msg-buffer.,msgbuff)).........
1b40 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 2c 6c 6f 67 67 69 6e 67 2d 70 0a 20 20 20 20 ......(when.(and.,logging-p.....
1b60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 6c 6f 67 .....................(log4e--log
1b80 67 69 6e 67 2d 6c 65 76 65 6c 2d 70 20 2c 6d 69 6e 6c 76 6c 20 2c 6d 61 78 6c 76 6c 20 27 2c 6c ging-level-p.,minlvl.,maxlvl.',l
1ba0 65 76 65 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 6c evel)).................(log4e--l
1bc0 6f 67 67 69 6e 67 20 2c 62 75 66 66 20 2c 63 6f 64 73 79 73 20 2c 6c 6f 67 74 6d 70 6c 20 2c 74 ogging.,buff.,codsys.,logtmpl.,t
1be0 69 6d 65 74 6d 70 6c 20 2c 6d 69 6e 6c 76 6c 20 2c 6d 61 78 6c 76 6c 20 2c 6c 6f 67 67 69 6e 67 imetmpl.,minlvl.,maxlvl.,logging
1c00 2d 70 20 27 2c 6c 65 76 65 6c 20 2c 6d 73 67 20 2c 40 6d 73 67 61 72 67 73 29 29 29 29 29 0a 20 -p.',level.,msg.,@msgargs)))))..
1c20 20 20 20 20 20 20 0a 20 20 20 20 20 20 20 29 29 29 0a 0a 28 64 65 66 73 75 62 73 74 20 6c 6f 67 ..............)))..(defsubst.log
1c40 34 65 2d 2d 6c 6f 67 67 69 6e 67 2d 6c 65 76 65 6c 2d 70 20 28 6d 69 6e 6c 65 76 65 6c 20 6d 61 4e--logging-level-p.(minlevel.ma
1c60 78 6c 65 76 65 6c 20 63 75 72 72 6c 65 76 65 6c 29 0a 20 20 28 6c 65 74 20 28 28 6d 69 6e 6c 76 xlevel.currlevel)...(let.((minlv
1c80 6c 76 61 6c 75 65 20 28 6f 72 20 28 61 73 73 6f 63 2d 64 65 66 61 75 6c 74 20 6d 69 6e 6c 65 76 lvalue.(or.(assoc-default.minlev
1ca0 65 6c 20 6c 6f 67 34 65 2d 6c 6f 67 2d 6c 65 76 65 6c 2d 61 6c 69 73 74 29 0a 20 20 20 20 20 20 el.log4e-log-level-alist).......
1cc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 29 29 0a 20 20 20 20 20 20 20 20 28 ...................1)).........(
1ce0 6d 61 78 6c 76 6c 76 61 6c 75 65 20 28 6f 72 20 28 61 73 73 6f 63 2d 64 65 66 61 75 6c 74 20 6d maxlvlvalue.(or.(assoc-default.m
1d00 61 78 6c 65 76 65 6c 20 6c 6f 67 34 65 2d 6c 6f 67 2d 6c 65 76 65 6c 2d 61 6c 69 73 74 29 0a 20 axlevel.log4e-log-level-alist)..
1d20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 36 29 29 0a 20 20 20 20 ........................6)).....
1d40 20 20 20 20 28 63 75 72 72 6c 76 6c 76 61 6c 75 65 20 28 6f 72 20 28 61 73 73 6f 63 2d 64 65 66 ....(currlvlvalue.(or.(assoc-def
1d60 61 75 6c 74 20 63 75 72 72 6c 65 76 65 6c 20 6c 6f 67 34 65 2d 6c 6f 67 2d 6c 65 76 65 6c 2d 61 ault.currlevel.log4e-log-level-a
1d80 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 list)...........................
1da0 30 29 29 29 0a 20 20 20 20 28 61 6e 64 20 28 3e 3d 20 63 75 72 72 6c 76 6c 76 61 6c 75 65 20 6d 0))).....(and.(>=.currlvlvalue.m
1dc0 69 6e 6c 76 6c 76 61 6c 75 65 29 0a 20 20 20 20 20 20 20 20 20 28 3c 3d 20 63 75 72 72 6c 76 6c inlvlvalue)..........(<=.currlvl
1de0 76 61 6c 75 65 20 6d 61 78 6c 76 6c 76 61 6c 75 65 29 29 29 29 0a 0a 28 64 65 66 73 75 62 73 74 value.maxlvlvalue))))..(defsubst
1e00 20 6c 6f 67 34 65 2d 2d 67 65 74 2d 6f 72 2d 63 72 65 61 74 65 2d 6c 6f 67 2d 62 75 66 66 65 72 .log4e--get-or-create-log-buffer
1e20 20 28 62 75 66 66 6e 6d 20 26 6f 70 74 69 6f 6e 61 6c 20 63 6f 64 65 73 79 73 29 0a 20 20 28 6f .(buffnm.&optional.codesys)...(o
1e40 72 20 28 67 65 74 2d 62 75 66 66 65 72 20 62 75 66 66 6e 6d 29 0a 20 20 20 20 20 20 28 6c 65 74 r.(get-buffer.buffnm).......(let
1e60 20 28 28 62 75 66 66 20 28 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 62 75 66 66 6e .((buff.(get-buffer-create.buffn
1e80 6d 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 m))).........(with-current-buffe
1ea0 72 20 62 75 66 66 0a 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 6d 6f 64 65 29 0a 20 20 r.buff...........(log4e-mode)...
1ec0 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 63 6f 64 65 73 79 73 0a 20 20 20 20 20 20 20 20 20 20 ........(when.codesys...........
1ee0 20 20 28 73 65 74 71 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 63 6f 64 69 6e 67 2d 73 79 73 74 65 ..(setq.buffer-file-coding-syste
1f00 6d 20 63 6f 64 65 73 79 73 29 29 29 0a 20 20 20 20 20 20 20 20 62 75 66 66 29 29 29 0a 0a 28 64 m.codesys))).........buff)))..(d
1f20 65 66 76 61 72 20 6c 6f 67 34 65 2d 2d 72 65 67 65 78 70 2d 6d 73 67 2d 66 6f 72 6d 61 74 0a 20 efvar.log4e--regexp-msg-format..
1f40 20 28 72 78 2d 74 6f 2d 73 74 72 69 6e 67 20 60 28 61 6e 64 20 22 25 22 0a 20 20 20 20 20 20 20 .(rx-to-string.`(and."%"........
1f60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2a 20 28 61 6e 79 20 22 2b 23 2d 30 22 29 29 20 ...............(*.(any."+#-0")).
1f80 20 20 20 20 20 20 20 3b 20 66 6c 61 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .......;.flags..................
1fa0 20 20 20 20 20 28 2a 20 28 61 6e 79 20 22 30 2d 39 22 29 29 20 20 20 20 20 20 20 20 20 3b 20 77 .....(*.(any."0-9")).........;.w
1fc0 69 64 74 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3f 20 22 2e idth.......................(?.".
1fe0 22 20 28 2b 20 28 61 6e 79 20 22 30 2d 39 22 29 29 29 20 3b 20 70 72 65 63 69 73 69 6f 6e 0a 20 ".(+.(any."0-9"))).;.precision..
2000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 79 20 22 61 2d 7a 41 2d .....................(any."a-zA-
2020 5a 22 29 29 29 29 0a 0a 28 64 65 66 73 75 62 73 74 20 6c 6f 67 34 65 2d 2d 69 6e 73 65 72 74 2d Z"))))..(defsubst.log4e--insert-
2040 6c 6f 67 20 28 6c 6f 67 74 6d 70 6c 20 74 69 6d 65 74 6d 70 6c 20 6c 65 76 65 6c 20 6d 73 67 20 log.(logtmpl.timetmpl.level.msg.
2060 6d 73 67 61 72 67 73 20 70 72 6f 70 65 72 74 69 7a 65 2d 70 29 0a 20 20 28 6c 65 74 20 28 28 74 msgargs.propertize-p)...(let.((t
2080 69 6d 65 74 65 78 74 20 28 66 6f 72 6d 61 74 2d 74 69 6d 65 2d 73 74 72 69 6e 67 20 74 69 6d 65 imetext.(format-time-string.time
20a0 74 6d 70 6c 29 29 0a 20 20 20 20 20 20 20 20 28 6c 76 6c 74 65 78 74 20 28 66 6f 72 6d 61 74 20 tmpl)).........(lvltext.(format.
20c0 22 25 2d 30 35 73 22 20 28 75 70 63 61 73 65 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 6c 65 76 "%-05s".(upcase.(symbol-name.lev
20e0 65 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 el)))).........(buffer-read-only
2100 20 6e 69 6c 29 29 0a 20 20 20 20 28 77 68 65 6e 20 70 72 6f 70 65 72 74 69 7a 65 2d 70 0a 20 20 .nil)).....(when.propertize-p...
2120 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 28 6c 65 6e 67 74 68 ....(put-text-property.0.(length
2140 20 74 69 6d 65 74 65 78 74 29 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 6f 63 2d .timetext).'face.'font-lock-doc-
2160 66 61 63 65 20 74 69 6d 65 74 65 78 74 29 0a 20 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 face.timetext).......(put-text-p
2180 72 6f 70 65 72 74 79 20 30 20 28 6c 65 6e 67 74 68 20 6c 76 6c 74 65 78 74 29 20 27 66 61 63 65 roperty.0.(length.lvltext).'face
21a0 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 6b 65 79 77 6f 72 64 2d 66 61 63 65 20 6c 76 6c 74 65 78 74 .'font-lock-keyword-face.lvltext
21c0 29 29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 6c 6f 67 74 65 78 74 20 6c 6f 67 74 6d 70 6c 29 0a )).....(let*.((logtext.logtmpl).
21e0 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 74 65 78 74 20 28 72 65 70 6c 61 63 65 2d 72 65 67 ...........(logtext.(replace-reg
2200 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 25 74 22 20 74 69 6d 65 74 65 78 74 20 6c 6f 67 74 exp-in-string."%t".timetext.logt
2220 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 74 65 78 74 20 28 72 65 70 6c 61 ext))............(logtext.(repla
2240 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 25 6c 22 20 6c 76 6c 74 65 78 74 ce-regexp-in-string."%l".lvltext
2260 20 6c 6f 67 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 74 65 78 74 20 28 .logtext))............(logtext.(
2280 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 25 6d 22 20 6d 73 replace-regexp-in-string."%m".ms
22a0 67 20 6c 6f 67 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 62 65 67 69 6e 20 28 70 g.logtext))............(begin.(p
22c0 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 6c 6f 67 74 65 78 74 20 22 5c oint))).......(insert.logtext."\
22e0 6e 22 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 70 72 6f 70 65 72 74 69 7a 65 2d 70 0a 20 20 20 n").......(when.propertize-p....
2300 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 62 65 67 69 6e 20 28 2b .....(put-text-property.begin.(+
2320 20 62 65 67 69 6e 20 31 29 20 27 6c 6f 67 34 65 2d 2d 6c 65 76 65 6c 20 6c 65 76 65 6c 29 29 0a .begin.1).'log4e--level.level)).
2340 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 69 6e 69 74 69 61 6c 6c 79 20 28 67 6f 74 6f 2d 63 ......(cl-loop.initially.(goto-c
2360 68 61 72 20 62 65 67 69 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 68 69 6c 65 20 har.begin)................while.
2380 28 61 6e 64 20 6d 73 67 61 72 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (and.msgargs....................
23a0 20 20 20 20 20 20 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 6c 6f 67 34 65 2d .......(re-search-forward.log4e-
23c0 2d 72 65 67 65 78 70 2d 6d 73 67 2d 66 6f 72 6d 61 74 20 6e 69 6c 20 74 29 29 0a 20 20 20 20 20 -regexp-msg-format.nil.t))......
23e0 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 6c 65 74 2a 20 28 28 63 75 72 72 74 79 70 65 20 28 6d ..........do.(let*.((currtype.(m
2400 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 30 29 29 0a 20 20 atch-string-no-properties.0))...
2420 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 75 72 72 61 72 67 20 .......................(currarg.
2440 28 70 6f 70 20 6d 73 67 61 72 67 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (pop.msgargs))..................
2460 20 20 20 20 20 20 20 20 28 66 61 69 6c 66 6d 74 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 ........(failfmt.nil)...........
2480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 75 72 72 74 65 78 74 20 28 63 6f 6e 64 69 74 ...............(currtext.(condit
24a0 69 6f 6e 2d 63 61 73 65 20 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ion-case.e......................
24c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 63 75 72 72 74 79 ..................(format.currty
24e0 70 65 20 63 75 72 72 61 72 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 pe.currarg).....................
2500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 28 73 65 74 71 20 66 61 .................(error.(setq.fa
2520 69 6c 66 6d 74 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ilfmt.t)........................
2540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 3d 25 .....................(format."=%
2560 73 3d 22 20 28 65 72 72 6f 72 2d 6d 65 73 73 61 67 65 2d 73 74 72 69 6e 67 20 65 29 29 29 29 29 s=".(error-message-string.e)))))
2580 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 6d 61 74 63 ).....................(save-matc
25a0 68 2d 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 h-data.......................(wh
25c0 65 6e 20 70 72 6f 70 65 72 74 69 7a 65 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 en.propertize-p.................
25e0 20 20 20 20 20 20 20 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 0a 20 20 20 20 20 20 20 20 20 ........(ignore-errors..........
2600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 64 20 28 66 61 69 6c 66 6d 74 20 .................(cond.(failfmt.
2620 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 28 6c 65 6e 67 74 68 20 63 75 72 (put-text-property.0.(length.cur
2640 72 74 65 78 74 29 20 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 77 61 72 6e 69 6e 67 2d rtext).'face.'font-lock-warning-
2660 66 61 63 65 20 63 75 72 72 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 face.currtext)).................
2680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 20 20 20 20 20 20 28 70 75 74 2d 74 65 ................(t.......(put-te
26a0 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 28 6c 65 6e 67 74 68 20 63 75 72 72 74 65 78 74 29 20 xt-property.0.(length.currtext).
26c0 27 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 73 74 72 69 6e 67 2d 66 61 63 65 20 63 75 72 'face.'font-lock-string-face.cur
26e0 72 74 65 78 74 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rtext)))))).....................
2700 28 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 20 63 75 72 72 74 65 78 74 20 74 20 74 29 29 29 0a 20 (replace-match.currtext.t.t)))..
2720 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 62 65 67 69 6e 29 29 29 29 0a 0a 28 64 65 66 76 .....(goto-char.begin))))..(defv
2740 61 72 20 6c 6f 67 34 65 2d 2d 63 75 72 72 65 6e 74 2d 6d 73 67 2d 62 75 66 66 65 72 20 6e 69 6c ar.log4e--current-msg-buffer.nil
2760 29 0a 0a 3b 3b 20 57 65 20 6e 65 65 64 73 20 74 68 69 73 20 73 69 67 6e 61 74 75 72 65 20 62 65 )..;;.We.needs.this.signature.be
2780 20 73 74 61 79 20 66 6f 72 20 6f 74 68 65 72 20 63 6f 6d 70 69 6c 65 64 20 70 6c 75 67 69 6e 73 .stay.for.other.compiled.plugins
27a0 20 75 73 69 6e 67 20 6f 6c 64 20 76 65 72 73 69 6f 6e 0a 28 64 65 66 75 6e 20 6c 6f 67 34 65 2d .using.old.version.(defun.log4e-
27c0 2d 6c 6f 67 67 69 6e 67 20 28 62 75 66 66 6e 6d 20 63 6f 64 73 79 73 20 6c 6f 67 74 6d 70 6c 20 -logging.(buffnm.codsys.logtmpl.
27e0 74 69 6d 65 74 6d 70 6c 20 6d 69 6e 6c 65 76 65 6c 20 6d 61 78 6c 65 76 65 6c 20 6c 6f 67 67 69 timetmpl.minlevel.maxlevel.loggi
2800 6e 67 2d 70 20 6c 65 76 65 6c 20 6d 73 67 20 26 72 65 73 74 20 6d 73 67 61 72 67 73 29 0a 20 20 ng-p.level.msg.&rest.msgargs)...
2820 28 77 68 65 6e 20 28 61 6e 64 20 6c 6f 67 67 69 6e 67 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 (when.(and.logging-p............
2840 20 20 28 6c 6f 67 34 65 2d 2d 6c 6f 67 67 69 6e 67 2d 6c 65 76 65 6c 2d 70 20 6d 69 6e 6c 65 76 ..(log4e--logging-level-p.minlev
2860 65 6c 20 6d 61 78 6c 65 76 65 6c 20 6c 65 76 65 6c 29 29 0a 20 20 20 20 28 73 61 76 65 2d 6d 61 el.maxlevel.level)).....(save-ma
2880 74 63 68 2d 64 61 74 61 0a 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 tch-data.......(with-current-buf
28a0 66 65 72 20 28 6c 6f 67 34 65 2d 2d 67 65 74 2d 6f 72 2d 63 72 65 61 74 65 2d 6c 6f 67 2d 62 75 fer.(log4e--get-or-create-log-bu
28c0 66 66 65 72 20 62 75 66 66 6e 6d 20 63 6f 64 73 79 73 29 0a 20 20 20 20 20 20 20 20 28 67 6f 74 ffer.buffnm.codsys).........(got
28e0 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 20 20 20 20 28 6c 65 74 o-char.(point-max)).........(let
2900 2a 20 28 28 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 6e 69 6c 29 0a 20 20 20 20 20 20 *.((buffer-read-only.nil).......
2920 20 20 20 20 20 20 20 20 20 28 62 65 67 69 6e 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 .........(begin.(point))........
2940 20 20 20 20 20 20 20 20 28 63 75 72 72 6c 6f 67 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 ........(currlog.(progn.........
2960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 69 6e 73 65 72 74 ..................(log4e--insert
2980 2d 6c 6f 67 20 6c 6f 67 74 6d 70 6c 20 74 69 6d 65 74 6d 70 6c 20 6c 65 76 65 6c 20 6d 73 67 20 -log.logtmpl.timetmpl.level.msg.
29a0 6d 73 67 61 72 67 73 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 msgargs.t)......................
29c0 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 .....(goto-char.(point-max))....
29e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 .......................(buffer-s
2a00 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 62 65 67 69 6e 20 28 70 6f ubstring-no-properties.begin.(po
2a20 69 6e 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 73 67 62 75 66 20 28 int))))................(msgbuf.(
2a40 6f 72 20 28 77 68 65 6e 20 28 61 6e 64 20 6c 6f 67 34 65 2d 2d 63 75 72 72 65 6e 74 2d 6d 73 67 or.(when.(and.log4e--current-msg
2a60 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -buffer.........................
2a80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 65 71 20 6c 6f 67 34 65 2d 2d 63 75 ..............(not.(eq.log4e--cu
2aa0 72 72 65 6e 74 2d 6d 73 67 2d 62 75 66 66 65 72 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 rrent-msg-buffer.t)))...........
2ac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 ...................(ignore-error
2ae0 73 20 28 67 65 74 2d 62 75 66 66 65 72 20 6c 6f 67 34 65 2d 2d 63 75 72 72 65 6e 74 2d 6d 73 67 s.(get-buffer.log4e--current-msg
2b00 2d 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -buffer)))......................
2b20 20 20 20 20 20 20 6c 6f 67 34 65 2d 2d 63 75 72 72 65 6e 74 2d 6d 73 67 2d 62 75 66 66 65 72 29 ......log4e--current-msg-buffer)
2b40 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 6d 73 67 62 75 66 0a 20 20 20 20 20 20 ))...........(when.msgbuf.......
2b60 20 20 20 20 20 20 28 6c 65 74 20 28 28 73 74 61 6e 64 61 72 64 2d 6f 75 74 70 75 74 20 28 69 66 ......(let.((standard-output.(if
2b80 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 6d 73 67 62 75 66 29 0a 20 20 20 20 20 20 20 20 .(buffer-live-p.msgbuf).........
2ba0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d ...............................m
2bc0 73 67 62 75 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 sgbuf...........................
2be0 20 20 20 20 20 20 20 20 20 20 20 73 74 61 6e 64 61 72 64 2d 6f 75 74 70 75 74 29 29 29 0a 20 20 ...........standard-output)))...
2c00 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 69 6e 63 20 63 75 72 72 6c 6f 67 29 29 29 29 0a 20 ............(princ.currlog))))..
2c20 20 20 20 20 20 20 20 6e 69 6c 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 6c 6f 67 34 65 2d 2d 67 65 .......nil))))..(defun.log4e--ge
2c40 74 2d 63 75 72 72 65 6e 74 2d 6c 6f 67 2d 6c 69 6e 65 2d 6c 65 76 65 6c 20 28 29 0a 20 20 28 73 t-current-log-line-level.()...(s
2c60 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d ave-excursion.....(beginning-of-
2c80 6c 69 6e 65 29 0a 20 20 20 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 70 6f line).....(get-text-property.(po
2ca0 69 6e 74 29 20 27 6c 6f 67 34 65 2d 2d 6c 65 76 65 6c 29 29 29 0a 0a 3b 3b 20 57 65 20 6e 65 65 int).'log4e--level)))..;;.We.nee
2cc0 64 73 20 74 68 69 73 20 73 69 67 6e 61 74 75 72 65 20 62 65 20 73 74 61 79 20 66 6f 72 20 6f 74 ds.this.signature.be.stay.for.ot
2ce0 68 65 72 20 70 6c 75 67 69 6e 73 20 63 6f 6d 70 69 6c 65 64 20 77 69 74 68 20 74 68 69 73 20 6f her.plugins.compiled.with.this.o
2d00 6c 64 20 76 65 72 73 69 6f 6e 0a 28 64 65 66 75 6e 20 6c 6f 67 34 65 2d 2d 63 6c 65 61 72 2d 6c ld.version.(defun.log4e--clear-l
2d20 6f 67 20 28 62 75 66 66 6e 6d 29 0a 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 og.(buffnm)...(with-current-buff
2d40 65 72 20 28 6c 6f 67 34 65 2d 2d 67 65 74 2d 6f 72 2d 63 72 65 61 74 65 2d 6c 6f 67 2d 62 75 66 er.(log4e--get-or-create-log-buf
2d60 66 65 72 20 62 75 66 66 6e 6d 29 0a 20 20 20 20 28 73 65 74 71 20 62 75 66 66 65 72 2d 72 65 61 fer.buffnm).....(setq.buffer-rea
2d80 64 2d 6f 6e 6c 79 20 6e 69 6c 29 0a 20 20 20 20 28 65 72 61 73 65 2d 62 75 66 66 65 72 29 29 29 d-only.nil).....(erase-buffer)))
2da0 0a 0a 3b 3b 20 57 65 20 6e 65 65 64 73 20 74 68 69 73 20 73 69 67 6e 61 74 75 72 65 20 62 65 20 ..;;.We.needs.this.signature.be.
2dc0 73 74 61 79 20 66 6f 72 20 6f 74 68 65 72 20 70 6c 75 67 69 6e 73 20 63 6f 6d 70 69 6c 65 64 20 stay.for.other.plugins.compiled.
2de0 77 69 74 68 20 74 68 69 73 20 6f 6c 64 20 76 65 72 73 69 6f 6e 0a 28 64 65 66 75 6e 20 6c 6f 67 with.this.old.version.(defun.log
2e00 34 65 2d 2d 6f 70 65 6e 2d 6c 6f 67 20 28 62 75 66 66 6e 6d 29 0a 20 20 28 6c 65 74 2a 20 28 28 4e--open-log.(buffnm)...(let*.((
2e20 62 75 66 66 20 28 67 65 74 2d 62 75 66 66 65 72 20 62 75 66 66 6e 6d 29 29 29 0a 20 20 20 20 28 buff.(get-buffer.buffnm))).....(
2e40 69 66 20 28 6e 6f 74 20 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 75 66 66 29 29 0a 20 20 if.(not.(buffer-live-p.buff))...
2e60 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 5b 4c 6f 67 34 45 5d 20 4e 6f 74 20 65 78 69 73 ......(message."[Log4E].Not.exis
2e80 74 20 6c 6f 67 20 62 75 66 66 65 72 2e 22 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 t.log.buffer.").......(with-curr
2ea0 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 66 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 62 75 ent-buffer.buff.........(setq.bu
2ec0 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 29 29 0a 20 20 20 20 20 20 28 70 6f 70 2d 74 6f ffer-read-only.t)).......(pop-to
2ee0 2d 62 75 66 66 65 72 20 62 75 66 66 29 29 29 29 0a 0a 3b 3b 20 57 65 20 6e 65 65 64 73 20 74 68 -buffer.buff))))..;;.We.needs.th
2f00 69 73 20 73 69 67 6e 61 74 75 72 65 20 62 65 20 73 74 61 79 20 66 6f 72 20 6f 74 68 65 72 20 70 is.signature.be.stay.for.other.p
2f20 6c 75 67 69 6e 73 20 63 6f 6d 70 69 6c 65 64 20 77 69 74 68 20 74 68 69 73 20 6f 6c 64 20 76 65 lugins.compiled.with.this.old.ve
2f40 72 73 69 6f 6e 0a 28 64 65 66 75 6e 20 6c 6f 67 34 65 2d 2d 6f 70 65 6e 2d 6c 6f 67 2d 69 66 2d rsion.(defun.log4e--open-log-if-
2f60 64 65 62 75 67 20 28 62 75 66 66 6e 6d 20 64 62 67 29 0a 20 20 28 77 68 65 6e 20 64 62 67 0a 20 debug.(buffnm.dbg)...(when.dbg..
2f80 20 20 20 28 6c 6f 67 34 65 2d 2d 6f 70 65 6e 2d 6c 6f 67 20 62 75 66 66 6e 6d 29 29 29 0a 0a 3b ...(log4e--open-log.buffnm)))..;
2fa0 3b 20 28 64 65 66 75 6e 20 6c 6f 67 34 65 2d 2d 73 65 6e 64 2d 72 65 70 6f 72 74 2d 69 66 2d 6e ;.(defun.log4e--send-report-if-n
2fc0 6f 74 2d 64 65 62 75 67 20 28 62 75 66 66 6e 6d 20 64 62 67 20 61 64 64 72 20 70 72 65 66 69 78 ot-debug.(buffnm.dbg.addr.prefix
2fe0 29 0a 3b 3b 20 20 20 28 6c 65 74 2a 20 28 28 62 75 66 66 20 28 67 65 74 2d 62 75 66 66 65 72 20 ).;;...(let*.((buff.(get-buffer.
3000 62 75 66 66 6e 6d 29 29 29 0a 3b 3b 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 6e 6f 74 buffnm))).;;.....(when.(and.(not
3020 20 64 62 67 29 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 70 .dbg).;;................(stringp
3040 20 61 64 64 72 29 0a 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 .addr).;;................(buffer
3060 2d 6c 69 76 65 2d 70 20 62 75 66 66 29 29 0a 3b 3b 20 20 20 20 20 20 20 28 72 65 70 6f 72 74 65 -live-p.buff)).;;.......(reporte
3080 72 2d 73 75 62 6d 69 74 2d 62 75 67 2d 72 65 70 6f 72 74 20 61 64 64 72 20 70 72 65 66 69 78 20 r-submit-bug-report.addr.prefix.
30a0 6e 69 6c 20 6e 69 6c 20 6e 69 6c 20 6e 69 6c 29 29 29 29 0a 0a 0a 28 64 65 66 6d 61 63 72 6f 20 nil.nil.nil.nil))))...(defmacro.
30c0 6c 6f 67 34 65 3a 64 65 66 6c 6f 67 67 65 72 20 28 70 72 65 66 69 78 20 6d 73 67 74 6d 70 6c 20 log4e:deflogger.(prefix.msgtmpl.
30e0 74 69 6d 65 74 6d 70 6c 20 26 6f 70 74 69 6f 6e 61 6c 20 6c 6f 67 2d 66 75 6e 63 74 69 6f 6e 2d timetmpl.&optional.log-function-
3100 6e 61 6d 65 2d 63 75 73 74 6f 6d 2d 61 6c 69 73 74 29 0a 20 20 22 44 65 66 69 6e 65 20 74 68 65 name-custom-alist)..."Define.the
3120 20 66 75 6e 63 74 69 6f 6e 73 20 6f 66 20 6c 6f 67 67 69 6e 67 20 66 6f 72 20 79 6f 75 72 20 65 .functions.of.logging.for.your.e
3140 6c 69 73 70 2e 0a 0a 53 70 65 63 69 66 69 63 61 74 69 6f 6e 3a 0a 20 54 68 65 20 66 6f 6c 6c 6f lisp...Specification:..The.follo
3160 77 69 6e 67 20 66 65 61 74 75 72 65 73 20 61 72 65 20 70 72 6f 76 69 64 65 64 20 62 79 20 65 76 wing.features.are.provided.by.ev
3180 61 6c 75 61 74 69 6e 67 20 74 68 69 73 2e 0a 20 2d 20 64 6f 20 6c 6f 67 67 69 6e 67 20 66 6f 72 aluating.this...-.do.logging.for
31a0 20 65 61 63 68 20 6c 6f 67 20 6c 65 76 65 6c 2e 0a 20 2d 20 73 65 74 20 6d 61 78 20 61 6e 64 20 .each.log.level...-.set.max.and.
31c0 6d 69 6e 20 6c 6f 67 20 6c 65 76 65 6c 2e 0a 20 2d 20 73 77 69 74 63 68 20 6c 6f 67 67 69 6e 67 min.log.level...-.switch.logging
31e0 2e 0a 20 2d 20 73 77 69 74 63 68 20 64 65 62 75 67 67 69 6e 67 2e 0a 20 2d 20 6f 70 65 6e 20 61 ...-.switch.debugging...-.open.a
3200 6e 64 20 63 6c 65 61 72 20 6c 6f 67 20 62 75 66 66 65 72 2e 0a 20 2d 20 73 65 6e 64 20 62 75 67 nd.clear.log.buffer...-.send.bug
3220 20 72 65 70 6f 72 74 20 66 6f 72 20 79 6f 75 2e 0a 20 46 6f 72 20 64 65 74 61 69 6c 73 2c 20 73 .report.for.you...For.details,.s
3240 65 65 20 46 75 6e 63 74 69 6f 6e 73 20 73 65 63 74 69 6f 6e 2e 0a 0a 41 72 67 75 6d 65 6e 74 3a ee.Functions.section...Argument:
3260 0a 20 2d 20 50 52 45 46 49 58 20 69 73 20 73 74 72 69 6e 67 20 61 73 20 79 6f 75 72 20 65 6c 69 ..-.PREFIX.is.string.as.your.eli
3280 73 70 20 70 72 65 66 69 78 2e 0a 20 2d 20 4d 53 47 54 4d 50 4c 20 69 73 20 73 74 72 69 6e 67 20 sp.prefix...-.MSGTMPL.is.string.
32a0 61 73 20 66 6f 72 6d 61 74 20 6f 66 20 6c 6f 67 2e 0a 20 20 20 2d 20 25 74 20 3a 20 52 65 70 6c as.format.of.log.....-.%t.:.Repl
32c0 61 63 65 64 20 77 69 74 68 20 74 69 6d 65 20 73 74 72 69 6e 67 2e 20 41 62 6f 75 74 20 69 74 2c aced.with.time.string..About.it,
32e0 20 73 65 65 20 54 49 4d 45 54 4d 50 4c 20 61 72 67 75 6d 65 6e 74 2e 0a 20 20 20 2d 20 25 6c 20 .see.TIMETMPL.argument.....-.%l.
3300 3a 20 52 65 70 6c 61 63 65 64 20 77 69 74 68 20 6c 6f 67 20 6c 65 76 65 6c 20 74 68 61 74 27 73 :.Replaced.with.log.level.that's
3320 20 54 52 41 43 45 2c 20 44 45 42 55 47 2c 20 49 4e 46 4f 2c 20 57 41 52 4e 2c 20 45 52 52 4f 52 .TRACE,.DEBUG,.INFO,.WARN,.ERROR
3340 2c 20 46 41 54 41 4c 2e 0a 20 20 20 2d 20 25 6d 20 3a 20 52 65 70 6c 61 63 65 64 20 77 69 74 68 ,.FATAL.....-.%m.:.Replaced.with
3360 20 6c 6f 67 20 6d 65 73 73 61 67 65 20 74 68 61 74 20 70 61 73 73 65 64 20 62 79 20 79 6f 75 2e .log.message.that.passed.by.you.
3380 0a 20 2d 20 54 49 4d 45 54 4d 50 4c 20 69 73 20 73 74 72 69 6e 67 20 61 73 20 66 6f 72 6d 61 74 ..-.TIMETMPL.is.string.as.format
33a0 20 6f 66 20 74 69 6d 65 20 74 68 61 74 27 73 20 70 61 73 73 65 64 20 74 6f 20 60 66 6f 72 6d 61 .of.time.that's.passed.to.`forma
33c0 74 2d 74 69 6d 65 2d 73 74 72 69 6e 67 27 2e 0a 20 2d 20 4c 4f 47 2d 46 55 4e 43 54 49 4f 4e 2d t-time-string'...-.LOG-FUNCTION-
33e0 4e 41 4d 45 2d 43 55 53 54 4f 4d 2d 41 4c 49 53 54 20 69 73 20 61 6c 69 73 74 20 61 73 20 74 68 NAME-CUSTOM-ALIST.is.alist.as.th
3400 65 20 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 20 6f 66 20 6c 6f 67 67 69 6e 67 2e 0a 20 20 20 2d e.function.name.of.logging.....-
3420 20 49 66 20 74 68 69 73 20 76 61 6c 75 65 20 69 73 20 6e 69 6c 2c 20 64 65 66 69 6e 65 20 74 68 .If.this.value.is.nil,.define.th
3440 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 79 6f 75 e.following.functions........you
3460 72 70 72 65 66 69 78 2d 2d 6c 6f 67 2d 74 72 61 63 65 0a 20 20 20 20 20 20 79 6f 75 72 70 72 65 rprefix--log-trace.......yourpre
3480 66 69 78 2d 2d 6c 6f 67 2d 64 65 62 75 67 0a 20 20 20 20 20 20 2e 2e 2e 0a 20 20 20 20 20 20 79 fix--log-debug.................y
34a0 6f 75 72 70 72 65 66 69 78 2d 2d 6c 6f 67 2d 66 61 74 61 6c 0a 20 20 20 2d 20 49 66 20 79 6f 75 ourprefix--log-fatal....-.If.you
34c0 20 77 61 6e 74 20 74 6f 20 63 75 73 74 6f 6d 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 6d .want.to.custom.the.name.of.them
34e0 2c 20 67 69 76 65 20 6c 69 6b 65 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 76 61 6c 75 65 2e ,.give.like.the.following.value.
3500 0a 20 20 20 20 20 20 5c 5c 3d 27 28 28 66 61 74 61 6c 20 2e 20 5c 22 66 61 74 61 6c 5c 22 29 0a .......\\='((fatal...\"fatal\").
3520 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 2e 20 5c 22 65 72 72 6f 72 5c 22 29 0a 20 20 20 20 ........(error...\"error\").....
3540 20 20 20 20 28 77 61 72 6e 20 20 2e 20 5c 22 77 61 72 6e 5c 22 29 0a 20 20 20 20 20 20 20 20 28 ....(warn....\"warn\").........(
3560 69 6e 66 6f 20 20 2e 20 5c 22 69 6e 66 6f 5c 22 29 0a 20 20 20 20 20 20 20 20 28 64 65 62 75 67 info....\"info\").........(debug
3580 20 2e 20 5c 22 64 65 62 75 67 5c 22 29 0a 20 20 20 20 20 20 20 20 28 74 72 61 63 65 20 2e 20 5c ...\"debug\").........(trace...\
35a0 22 74 72 61 63 65 5c 22 29 29 0a 20 20 20 20 20 54 68 65 6e 2c 20 64 65 66 69 6e 65 20 74 68 65 "trace\"))......Then,.define.the
35c0 20 66 6f 6c 6c 6f 77 69 6e 67 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 20 20 20 20 20 20 79 6f 75 72 .following.functions........your
35e0 70 72 65 66 69 78 2d 2d 74 72 61 63 65 0a 20 20 20 20 20 20 79 6f 75 72 70 72 65 66 69 78 2d 2d prefix--trace.......yourprefix--
3600 64 65 62 75 67 0a 20 20 20 20 20 20 2e 2e 2e 0a 20 20 20 20 20 20 79 6f 75 72 70 72 65 66 69 78 debug.................yourprefix
3620 2d 2d 66 61 74 61 6c 0a 0a 46 75 6e 63 74 69 6f 6e 73 3a 0a 20 4c 69 73 74 20 61 6c 6c 20 66 75 --fatal..Functions:..List.all.fu
3640 6e 63 74 69 6f 6e 73 20 64 65 66 69 6e 65 64 20 62 65 6c 6f 77 2e 20 50 52 45 46 49 58 20 69 73 nctions.defined.below..PREFIX.is
3660 20 79 6f 75 72 20 70 72 65 66 69 78 2e 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 66 61 74 .your.prefix...-.PREFIX--log-fat
3680 61 6c 20 20 20 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 65 72 72 6f al........#1..-.PREFIX--log-erro
36a0 72 20 20 20 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 77 61 72 6e 20 r........#1..-.PREFIX--log-warn.
36c0 20 20 20 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 69 6e 66 6f 20 20 ........#1..-.PREFIX--log-info..
36e0 20 20 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 64 65 62 75 67 20 20 .......#1..-.PREFIX--log-debug..
3700 20 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 74 72 61 63 65 20 20 20 ......#1..-.PREFIX--log-trace...
3720 20 2e 2e 2e 20 23 31 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 66 61 74 61 6c 2a 20 20 20 .....#1..-.PREFIX--log-fatal*...
3740 2e 2e 2e 20 23 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 65 72 72 6f 72 2a 20 20 20 2e ....#2..-.PREFIX--log-error*....
3760 2e 2e 20 23 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 77 61 72 6e 2a 20 20 20 20 2e 2e ...#2..-.PREFIX--log-warn*......
3780 2e 20 23 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 69 6e 66 6f 2a 20 20 20 20 2e 2e 2e ..#2..-.PREFIX--log-info*.......
37a0 20 23 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 64 65 62 75 67 2a 20 20 20 2e 2e 2e 20 .#2..-.PREFIX--log-debug*.......
37c0 23 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 74 72 61 63 65 2a 20 20 20 2e 2e 2e 20 23 #2..-.PREFIX--log-trace*.......#
37e0 32 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 2..-.PREFIX--log..-.PREFIX--log-
3800 73 65 74 2d 6c 65 76 65 6c 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 65 6e 61 62 6c 65 2d set-level..-.PREFIX--log-enable-
3820 6c 6f 67 67 69 6e 67 20 20 20 20 20 20 20 20 20 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 logging................#3..-.PRE
3840 46 49 58 2d 2d 6c 6f 67 2d 64 69 73 61 62 6c 65 2d 6c 6f 67 67 69 6e 67 20 20 20 20 20 20 20 20 FIX--log-disable-logging........
3860 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 65 6e 61 62 6c 65 2d .......#3..-.PREFIX--log-enable-
3880 6d 65 73 73 61 67 69 6e 67 20 20 20 20 20 20 20 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 messaging..............#3..-.PRE
38a0 46 49 58 2d 2d 6c 6f 67 2d 64 69 73 61 62 6c 65 2d 6d 65 73 73 61 67 69 6e 67 20 20 20 20 20 20 FIX--log-disable-messaging......
38c0 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 65 6e 61 62 6c 65 2d .......#3..-.PREFIX--log-enable-
38e0 64 65 62 75 67 67 69 6e 67 20 20 20 20 20 20 20 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 debugging..............#3..-.PRE
3900 46 49 58 2d 2d 6c 6f 67 2d 64 69 73 61 62 6c 65 2d 64 65 62 75 67 67 69 6e 67 20 20 20 20 20 20 FIX--log-disable-debugging......
3920 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 64 65 62 75 67 67 69 .......#3..-.PREFIX--log-debuggi
3940 6e 67 2d 70 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 73 65 74 2d 63 6f 64 69 6e 67 2d 73 ng-p..-.PREFIX--log-set-coding-s
3960 79 73 74 65 6d 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 73 65 74 2d 61 75 74 68 6f 72 2d ystem..-.PREFIX--log-set-author-
3980 6d 61 69 6c 2d 61 64 64 72 65 73 73 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 63 6c 65 61 mail-address..-.PREFIX--log-clea
39a0 72 2d 6c 6f 67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 r-log.....................#3..-.
39c0 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 6f 70 65 6e 2d 6c 6f 67 20 20 20 20 20 20 20 20 20 20 20 20 PREFIX--log-open-log............
39e0 20 20 20 20 20 20 2e 2e 2e 20 23 33 0a 20 2d 20 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 6f 70 65 6e ..........#3..-.PREFIX--log-open
3a00 2d 6c 6f 67 2d 69 66 2d 64 65 62 75 67 0a 0a 20 23 31 20 3a 20 59 6f 75 20 63 61 6e 20 63 75 73 -log-if-debug...#1.:.You.can.cus
3a20 74 6f 6d 69 7a 65 20 74 68 69 73 20 6e 61 6d 65 0a 20 23 32 20 3a 20 4e 61 6d 65 20 69 73 20 61 tomize.this.name..#2.:.Name.is.a
3a40 20 23 31 20 6e 61 6d 65 20 2b 20 5c 22 2a 5c 22 0a 20 23 33 20 3a 20 54 68 69 73 20 69 73 20 63 .#1.name.+.\"*\"..#3.:.This.is.c
3a60 6f 6d 6d 61 6e 64 0a 0a 45 78 61 6d 70 6c 65 3a 0a 3b 3b 20 49 66 20 79 6f 75 20 64 65 76 65 6c ommand..Example:.;;.If.you.devel
3a80 6f 70 20 65 6c 69 73 70 20 74 68 61 74 20 68 61 73 20 70 72 65 66 69 78 20 5c 22 68 6f 67 65 5c op.elisp.that.has.prefix.\"hoge\
3aa0 22 2c 0a 3b 3b 20 77 72 69 74 65 20 61 6e 64 20 65 76 61 6c 20 74 68 65 20 66 6f 6c 6c 6f 77 69 ",.;;.write.and.eval.the.followi
3ac0 6e 67 20 73 65 78 70 20 69 6e 20 79 6f 75 72 20 65 6c 69 73 70 20 66 69 6c 65 2e 0a 0a 20 28 72 ng.sexp.in.your.elisp.file....(r
3ae0 65 71 75 69 72 65 20 5c 5c 3d 27 6c 6f 67 34 65 29 0a 20 28 6c 6f 67 34 65 3a 64 65 66 6c 6f 67 equire.\\='log4e)..(log4e:deflog
3b00 67 65 72 20 5c 22 68 6f 67 65 5c 22 20 5c 22 25 74 20 5b 25 6c 5d 20 25 6d 5c 22 20 5c 22 25 48 ger.\"hoge\".\"%t.[%l].%m\".\"%H
3b20 3a 25 4d 3a 25 53 5c 22 29 0a 0a 3b 3b 20 45 76 61 6c 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 :%M:%S\")..;;.Eval.the.following
3b40 0a 20 28 68 6f 67 65 2d 2d 6c 6f 67 2d 65 6e 61 62 6c 65 2d 6c 6f 67 67 69 6e 67 29 0a 0a 3b 3b ..(hoge--log-enable-logging)..;;
3b60 20 54 68 65 6e 2c 20 77 72 69 74 65 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 0a 0a 20 28 64 65 .Then,.write.the.following...(de
3b80 66 75 6e 20 68 6f 67 65 2d 64 6f 2d 68 6f 67 65 20 28 68 6f 67 65 29 0a 20 20 20 28 69 66 20 28 fun.hoge-do-hoge.(hoge)....(if.(
3ba0 6e 6f 74 20 28 73 74 72 69 6e 67 70 20 68 6f 67 65 29 29 0a 20 20 20 20 20 20 20 28 68 6f 67 65 not.(stringp.hoge))........(hoge
3bc0 2d 2d 6c 6f 67 2d 66 61 74 61 6c 20 5c 22 66 61 69 6c 65 64 20 64 6f 20 68 6f 67 65 20 3a 20 68 --log-fatal.\"failed.do.hoge.:.h
3be0 6f 67 65 20 69 73 20 25 73 5c 22 20 68 6f 67 65 29 0a 20 20 20 20 20 28 68 6f 67 65 2d 2d 6c 6f oge.is.%s\".hoge)......(hoge--lo
3c00 67 2d 64 65 62 75 67 20 5c 22 73 74 61 72 74 20 64 6f 20 68 6f 67 65 20 61 62 6f 75 74 20 25 73 g-debug.\"start.do.hoge.about.%s
3c20 5c 22 20 68 6f 67 65 29 0a 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 5c 22 68 6f 67 65 21 5c 22 \".hoge)......(message.\"hoge!\"
3c40 29 0a 20 20 20 20 20 28 68 6f 67 65 2d 2d 6c 6f 67 2d 69 6e 66 6f 20 5c 22 64 6f 6e 65 20 68 6f )......(hoge--log-info.\"done.ho
3c60 67 65 20 61 62 6f 75 74 20 25 73 5c 22 20 68 6f 67 65 29 29 29 0a 0a 3b 3b 20 45 76 61 6c 20 74 ge.about.%s\".hoge)))..;;.Eval.t
3c80 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 0a 20 28 68 6f 67 65 2d 64 6f 2d 68 6f 67 65 20 5c 22 48 4f he.following..(hoge-do-hoge.\"HO
3ca0 47 45 47 45 5c 22 29 0a 0a 3b 3b 20 44 6f 20 4d 2d 78 20 68 6f 67 65 2d 2d 6c 6f 67 2d 6f 70 65 GEGE\")..;;.Do.M-x.hoge--log-ope
3cc0 6e 2d 6c 6f 67 0a 3b 3b 20 4f 70 65 6e 20 74 68 65 20 62 75 66 66 65 72 20 77 68 69 63 68 20 6e n-log.;;.Open.the.buffer.which.n
3ce0 61 6d 65 20 69 73 20 5c 22 20 2a 6c 6f 67 34 65 2d 68 6f 67 65 2a 5c 22 2e 20 54 68 65 20 62 75 ame.is.\".*log4e-hoge*\"..The.bu
3d00 66 66 65 72 20 73 74 72 69 6e 67 20 69 73 20 62 65 6c 6f 77 0a 31 32 3a 33 34 3a 35 36 20 5b 49 ffer.string.is.below.12:34:56.[I
3d20 4e 46 4f 20 5d 20 64 6f 6e 65 20 68 6f 67 65 20 61 62 6f 75 74 20 48 4f 47 45 47 45 0a 0a 3b 3b NFO.].done.hoge.about.HOGEGE..;;
3d40 20 45 76 61 6c 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 0a 20 28 68 6f 67 65 2d 2d 6c 6f 67 2d .Eval.the.following..(hoge--log-
3d60 73 65 74 2d 6c 65 76 65 6c 20 5c 5c 3d 27 74 72 61 63 65 29 0a 20 28 68 6f 67 65 2d 64 6f 2d 68 set-level.\\='trace)..(hoge-do-h
3d80 6f 67 65 20 5c 22 46 55 47 41 47 41 5c 22 29 0a 0a 3b 3b 20 44 6f 20 4d 2d 78 20 68 6f 67 65 2d oge.\"FUGAGA\")..;;.Do.M-x.hoge-
3da0 2d 6c 6f 67 2d 6f 70 65 6e 2d 6c 6f 67 0a 3b 3b 20 4f 70 65 6e 20 74 68 65 20 62 75 66 66 65 72 -log-open-log.;;.Open.the.buffer
3dc0 2e 20 69 74 73 20 73 74 72 69 6e 67 20 69 73 20 62 65 6c 6f 77 0a 31 32 3a 33 34 3a 35 36 20 5b ..its.string.is.below.12:34:56.[
3de0 49 4e 46 4f 20 5d 20 64 6f 6e 65 20 68 6f 67 65 20 61 62 6f 75 74 20 48 4f 47 45 47 45 0a 31 32 INFO.].done.hoge.about.HOGEGE.12
3e00 3a 33 35 3a 34 33 20 5b 44 45 42 55 47 5d 20 73 74 61 72 74 20 64 6f 20 68 6f 67 65 20 61 62 6f :35:43.[DEBUG].start.do.hoge.abo
3e20 75 74 20 46 55 47 41 47 41 0a 31 32 3a 33 35 3a 34 33 20 5b 49 4e 46 4f 20 5d 20 64 6f 6e 65 20 ut.FUGAGA.12:35:43.[INFO.].done.
3e40 68 6f 67 65 20 61 62 6f 75 74 20 46 55 47 41 47 41 0a 20 0a 22 0a 20 20 28 64 65 63 6c 61 72 65 hoge.about.FUGAGA..."...(declare
3e60 20 28 69 6e 64 65 6e 74 20 30 29 29 0a 20 20 28 69 66 20 28 6f 72 20 28 6e 6f 74 20 28 73 74 72 .(indent.0))...(if.(or.(not.(str
3e80 69 6e 67 70 20 70 72 65 66 69 78 29 29 20 20 20 28 73 74 72 69 6e 67 3d 20 70 72 65 66 69 78 20 ingp.prefix))...(string=.prefix.
3ea0 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 70 20 6d 73 67 74 "")...........(not.(stringp.msgt
3ec0 6d 70 6c 29 29 20 20 28 73 74 72 69 6e 67 3d 20 6d 73 67 74 6d 70 6c 20 22 22 29 0a 20 20 20 20 mpl))..(string=.msgtmpl."").....
3ee0 20 20 20 20 20 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 70 20 74 69 6d 65 74 6d 70 6c 29 29 20 28 ......(not.(stringp.timetmpl)).(
3f00 73 74 72 69 6e 67 3d 20 74 69 6d 65 74 6d 70 6c 20 22 22 29 29 0a 20 20 20 20 20 20 28 6d 65 73 string=.timetmpl."")).......(mes
3f20 73 61 67 65 20 22 5b 4c 4f 47 34 45 5d 20 69 6e 76 61 6c 69 64 20 61 72 67 75 6d 65 6e 74 20 6f sage."[LOG4E].invalid.argument.o
3f40 66 20 64 65 66 6c 6f 67 67 65 72 22 29 0a 20 20 20 20 28 6c 65 74 2a 20 28 28 62 75 66 73 79 6d f.deflogger").....(let*.((bufsym
3f60 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6c 6f 67 2d 62 75 66 66 65 72 20 .(log4e--make-symbol-log-buffer.
3f80 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 73 67 62 75 66 73 79 6d 20 28 prefix))............(msgbufsym.(
3fa0 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6d 73 67 2d 62 75 66 66 65 72 20 70 72 log4e--make-symbol-msg-buffer.pr
3fc0 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 74 6d 70 6c 73 79 6d 20 28 6c efix))............(logtmplsym.(l
3fe0 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6c 6f 67 2d 74 65 6d 70 6c 61 74 65 20 70 og4e--make-symbol-log-template.p
4000 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 74 69 6d 65 74 6d 70 6c 73 79 6d 20 refix))............(timetmplsym.
4020 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 74 69 6d 65 2d 74 65 6d 70 6c 61 74 (log4e--make-symbol-time-templat
4040 65 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 69 6e 6c 76 6c 73 79 6d e.prefix))............(minlvlsym
4060 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6d 69 6e 2d 6c 65 76 65 6c 20 70 .(log4e--make-symbol-min-level.p
4080 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 78 6c 76 6c 73 79 6d 20 28 6c refix))............(maxlvlsym.(l
40a0 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 6d 61 78 2d 6c 65 76 65 6c 20 70 72 65 66 og4e--make-symbol-max-level.pref
40c0 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 74 67 6c 73 79 6d 20 28 6c 6f 67 34 65 2d 2d ix))............(tglsym.(log4e--
40e0 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 74 6f 67 67 6c 65 2d 6c 6f 67 67 69 6e 67 20 70 72 65 66 69 make-symbol-toggle-logging.prefi
4100 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 64 62 67 73 79 6d 20 28 6c 6f 67 34 65 2d 2d 6d x))............(dbgsym.(log4e--m
4120 61 6b 65 2d 73 79 6d 62 6f 6c 2d 74 6f 67 67 6c 65 2d 64 65 62 75 67 67 69 6e 67 20 70 72 65 66 ake-symbol-toggle-debugging.pref
4140 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 64 73 79 73 73 79 6d 20 28 6c 6f 67 34 ix))............(codsyssym.(log4
4160 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 62 75 66 66 65 72 2d 63 6f 64 69 6e 67 2d 73 79 73 e--make-symbol-buffer-coding-sys
4180 74 65 6d 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 64 64 72 73 79 6d tem.prefix))............(addrsym
41a0 20 28 6c 6f 67 34 65 2d 2d 6d 61 6b 65 2d 73 79 6d 62 6f 6c 2d 61 75 74 68 6f 72 2d 6d 61 69 6c .(log4e--make-symbol-author-mail
41c0 2d 61 64 64 72 65 73 73 20 70 72 65 66 69 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 75 -address.prefix))............(fu
41e0 6e 63 6e 6d 2d 61 6c 69 73 74 20 28 63 6c 2d 6c 6f 6f 70 20 77 69 74 68 20 63 75 73 74 6f 6d 2d ncnm-alist.(cl-loop.with.custom-
4200 61 6c 69 73 74 20 3d 20 28 63 61 72 20 28 63 64 72 20 6c 6f 67 2d 66 75 6e 63 74 69 6f 6e 2d 6e alist.=.(car.(cdr.log-function-n
4220 61 6d 65 2d 63 75 73 74 6f 6d 2d 61 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ame-custom-alist))..............
4240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 6c 76 6c 20 69 6e 20 .....................for.lvl.in.
4260 27 28 66 61 74 61 6c 20 65 72 72 6f 72 20 77 61 72 6e 20 69 6e 66 6f 20 64 65 62 75 67 20 74 72 '(fatal.error.warn.info.debug.tr
4280 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ace)............................
42a0 20 20 20 20 20 20 20 66 6f 72 20 6c 76 6c 70 61 69 72 20 3d 20 28 61 73 73 71 20 6c 76 6c 20 63 .......for.lvlpair.=.(assq.lvl.c
42c0 75 73 74 6f 6d 2d 61 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ustom-alist)....................
42e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 66 6e 61 6d 65 20 3d 20 28 6f 72 20 28 ...............for.fname.=.(or.(
4300 63 64 72 2d 73 61 66 65 20 6c 76 6c 70 61 69 72 29 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 20 cdr-safe.lvlpair)."")...........
4320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 ........................collect.
4340 28 6f 72 20 28 69 66 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5c 2a 22 20 66 6e 61 6d 65 (or.(if.(string-match."\*".fname
4360 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )...............................
4380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 ....................(progn......
43a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
43c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 5b 4c 4f 47 34 45 5d ...............(message."[LOG4E]
43e0 20 69 67 6e 6f 72 65 20 25 73 20 6c 65 76 65 6c 20 6e 61 6d 65 20 69 6e 20 6c 6f 67 2d 66 75 6e .ignore.%s.level.name.in.log-fun
4400 63 74 69 6f 6e 2d 6e 61 6d 65 2d 63 75 73 74 6f 6d 2d 61 6c 69 73 74 2e 20 63 61 6e 27 74 20 75 ction-name-custom-alist..can't.u
4420 73 65 20 27 2a 27 20 66 6f 72 20 74 68 65 20 6e 61 6d 65 2e 22 20 6c 76 6c 29 0a 20 20 20 20 20 se.'*'.for.the.name.".lvl)......
4440 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4460 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ...............nil).............
4480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
44a0 20 20 20 20 6c 76 6c 70 61 69 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....lvlpair)....................
44c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 73 73 71 ...........................(assq
44e0 20 6c 76 6c 20 6c 6f 67 34 65 2d 64 65 66 61 75 6c 74 2d 6c 6f 67 67 69 6e 67 2d 66 75 6e 63 74 .lvl.log4e-default-logging-funct
4500 69 6f 6e 2d 6e 61 6d 65 2d 61 6c 69 73 74 29 29 29 29 29 0a 20 20 20 20 20 20 60 28 70 72 6f 67 ion-name-alist))))).......`(prog
4520 6e 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 66 69 6e 65 20 76 61 72 69 61 62 6c 65 20 66 n...........;;.Define.variable.f
4540 6f 72 20 70 72 65 66 69 78 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 76 61 72 20 2c 62 75 66 73 or.prefix..........(defvar.,bufs
4560 79 6d 20 28 66 6f 72 6d 61 74 20 22 20 2a 6c 6f 67 34 65 2d 25 73 2a 22 20 2c 70 72 65 66 69 78 ym.(format.".*log4e-%s*".,prefix
4580 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 76 61 72 20 2c 6c 6f 67 74 6d 70 6c 73 79 6d 20 ))..........(defvar.,logtmplsym.
45a0 2c 6d 73 67 74 6d 70 6c 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 76 61 72 20 2c 74 69 6d 65 ,msgtmpl)..........(defvar.,time
45c0 74 6d 70 6c 73 79 6d 20 2c 74 69 6d 65 74 6d 70 6c 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 tmplsym.,timetmpl)..........(def
45e0 76 61 72 20 2c 6d 69 6e 6c 76 6c 73 79 6d 20 27 69 6e 66 6f 29 0a 20 20 20 20 20 20 20 20 20 28 var.,minlvlsym.'info)..........(
4600 64 65 66 76 61 72 20 2c 6d 61 78 6c 76 6c 73 79 6d 20 27 66 61 74 61 6c 29 0a 20 20 20 20 20 20 defvar.,maxlvlsym.'fatal).......
4620 20 20 20 28 64 65 66 76 61 72 20 2c 74 67 6c 73 79 6d 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 ...(defvar.,tglsym.nil).........
4640 20 28 64 65 66 76 61 72 20 2c 6d 73 67 62 75 66 73 79 6d 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 .(defvar.,msgbufsym.nil)........
4660 20 20 28 64 65 66 76 61 72 20 2c 64 62 67 73 79 6d 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 ..(defvar.,dbgsym.nil)..........
4680 28 64 65 66 76 61 72 20 2c 63 6f 64 73 79 73 73 79 6d 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 (defvar.,codsyssym.nil).........
46a0 20 28 64 65 66 76 61 72 20 2c 61 64 64 72 73 79 6d 20 6e 69 6c 29 0a 0a 20 20 20 20 20 20 20 20 .(defvar.,addrsym.nil)..........
46c0 20 3b 3b 20 44 65 66 69 6e 65 20 6c 65 76 65 6c 20 73 65 74 20 66 75 6e 63 74 69 6f 6e 0a 20 20 .;;.Define.level.set.function...
46e0 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 .......(defun.,(intern.(concat.p
4700 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 73 65 74 2d 6c 65 76 65 6c 22 29 29 20 28 6d 69 6e 6c 65 refix."--log-set-level")).(minle
4720 76 65 6c 20 26 6f 70 74 69 6f 6e 61 6c 20 6d 61 78 6c 65 76 65 6c 29 0a 20 20 20 20 20 20 20 20 vel.&optional.maxlevel).........
4740 20 20 20 22 53 65 74 20 72 61 6e 67 65 20 66 6f 72 20 64 6f 69 6e 67 20 6c 6f 67 67 69 6e 67 2e ..."Set.range.for.doing.logging.
4760 0a 0a 4d 49 4e 4c 45 56 45 4c 20 69 73 20 73 79 6d 62 6f 6c 20 6f 66 20 6c 6f 77 65 73 74 20 6c ..MINLEVEL.is.symbol.of.lowest.l
4780 65 76 65 6c 20 66 6f 72 20 64 6f 69 6e 67 20 6c 6f 67 67 69 6e 67 2e 20 69 74 73 20 64 65 66 61 evel.for.doing.logging..its.defa
47a0 75 6c 74 20 69 73 20 5c 5c 3d 27 69 6e 66 6f 2e 0a 4d 41 58 4c 45 56 45 4c 20 69 73 20 73 79 6d ult.is.\\='info..MAXLEVEL.is.sym
47c0 62 6f 6c 20 6f 66 20 68 69 67 68 65 73 74 20 6c 65 76 65 6c 20 66 6f 72 20 64 6f 69 6e 67 20 6c bol.of.highest.level.for.doing.l
47e0 6f 67 67 69 6e 67 2e 20 69 74 73 20 64 65 66 61 75 6c 74 20 69 73 20 5c 5c 3d 27 66 61 74 61 6c ogging..its.default.is.\\='fatal
4800 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 2c 6d 69 6e 6c 76 6c 73 79 6d 20 6d ."............(setq.,minlvlsym.m
4820 69 6e 6c 65 76 65 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 2c 6d 61 78 6c 76 inlevel)............(setq.,maxlv
4840 6c 73 79 6d 20 6d 61 78 6c 65 76 65 6c 29 29 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 66 lsym.maxlevel))...........;;.Def
4860 69 6e 65 20 6c 6f 67 67 69 6e 67 20 74 6f 67 67 6c 65 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 ine.logging.toggle.function.....
4880 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 72 65 .....(defun.,(intern.(concat.pre
48a0 66 69 78 20 22 2d 2d 6c 6f 67 2d 65 6e 61 62 6c 65 2d 6c 6f 67 67 69 6e 67 22 29 29 20 28 29 0a fix."--log-enable-logging")).().
48c0 20 20 20 20 20 20 20 20 20 20 20 22 45 6e 61 62 6c 65 20 6c 6f 67 67 69 6e 67 20 62 79 20 6c 6f ..........."Enable.logging.by.lo
48e0 67 67 69 6e 67 20 66 75 6e 63 74 69 6f 6e 73 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e gging.functions."............(in
4900 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 2c 74 67 6c teractive)............(setq.,tgl
4920 73 79 6d 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e sym.t))..........(defun.,(intern
4940 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 64 69 73 61 62 6c 65 2d 6c .(concat.prefix."--log-disable-l
4960 6f 67 67 69 6e 67 22 29 29 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 22 44 69 73 61 62 6c 65 ogging")).()............"Disable
4980 20 6c 6f 67 67 69 6e 67 20 62 79 20 6c 6f 67 67 69 6e 67 20 66 75 6e 63 74 69 6f 6e 73 2e 22 0a .logging.by.logging.functions.".
49a0 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 ...........(interactive)........
49c0 20 20 20 20 28 73 65 74 71 20 2c 74 67 6c 73 79 6d 20 6e 69 6c 29 29 0a 0a 20 20 20 20 20 20 20 ....(setq.,tglsym.nil)).........
49e0 20 20 3b 3b 20 44 65 66 69 6e 65 20 6d 65 73 73 61 67 69 6e 67 20 74 6f 67 67 6c 65 20 66 75 6e ..;;.Define.messaging.toggle.fun
4a00 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 ction..........(defun.,(intern.(
4a20 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 65 6e 61 62 6c 65 2d 6d 65 73 73 concat.prefix."--log-enable-mess
4a40 61 67 69 6e 67 22 29 29 20 28 26 6f 70 74 69 6f 6e 61 6c 20 62 75 66 66 65 72 29 0a 20 20 20 20 aging")).(&optional.buffer).....
4a60 20 20 20 20 20 20 20 22 45 6e 61 62 6c 65 20 64 75 6d 70 20 74 68 65 20 6c 6f 67 20 69 6e 74 6f ......."Enable.dump.the.log.into
4a80 20 6f 74 68 65 72 20 62 75 66 66 65 72 20 62 79 20 6c 6f 67 67 69 6e 67 20 66 75 6e 63 74 69 6f .other.buffer.by.logging.functio
4aa0 6e 73 2e 0a 0a 42 55 46 46 45 52 20 69 73 20 61 20 62 75 66 66 65 72 20 64 75 6d 70 65 64 20 6c ns...BUFFER.is.a.buffer.dumped.l
4ac0 6f 67 20 69 6e 74 6f 2e 20 6e 69 6c 20 6d 65 61 6e 73 20 2a 4d 65 73 73 61 67 65 73 2a 20 62 75 og.into..nil.means.*Messages*.bu
4ae0 66 66 65 72 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a ffer."............(interactive).
4b00 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 2c 6d 73 67 62 75 66 73 79 6d 20 28 6f 72 20 ...........(setq.,msgbufsym.(or.
4b20 62 75 66 66 65 72 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e buffer.t)))..........(defun.,(in
4b40 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 64 69 73 61 62 tern.(concat.prefix."--log-disab
4b60 6c 65 2d 6d 65 73 73 61 67 69 6e 67 22 29 29 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 22 44 le-messaging")).()............"D
4b80 69 73 61 62 6c 65 20 64 75 6d 70 20 74 68 65 20 6c 6f 67 20 69 6e 74 6f 20 6f 74 68 65 72 20 62 isable.dump.the.log.into.other.b
4ba0 75 66 66 65 72 20 62 79 20 6c 6f 67 67 69 6e 67 20 66 75 6e 63 74 69 6f 6e 73 2e 22 0a 20 20 20 uffer.by.logging.functions."....
4bc0 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 ........(interactive)...........
4be0 20 28 73 65 74 71 20 2c 6d 73 67 62 75 66 73 79 6d 20 6e 69 6c 29 29 0a 0a 20 20 20 20 20 20 20 .(setq.,msgbufsym.nil)).........
4c00 20 20 3b 3b 20 44 65 66 69 6e 65 20 64 65 62 75 67 67 69 6e 67 20 74 6f 67 67 6c 65 20 66 75 6e ..;;.Define.debugging.toggle.fun
4c20 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 ction..........(defun.,(intern.(
4c40 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 65 6e 61 62 6c 65 2d 64 65 62 75 concat.prefix."--log-enable-debu
4c60 67 67 69 6e 67 22 29 29 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 22 45 6e 61 62 6c 65 20 64 gging")).()............"Enable.d
4c80 65 62 75 67 67 69 6e 67 20 61 6e 64 20 6c 6f 67 67 69 6e 67 2e 0a 0a 60 50 52 45 46 49 58 2d 2d ebugging.and.logging...`PREFIX--
4ca0 6c 6f 67 2d 64 65 62 75 67 67 69 6e 67 2d 70 27 20 77 69 6c 6c 20 72 65 74 75 72 6e 20 74 2e 22 log-debugging-p'.will.return.t."
4cc0 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 ............(interactive).......
4ce0 20 20 20 20 20 28 73 65 74 71 20 2c 74 67 6c 73 79 6d 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 .....(setq.,tglsym.t)...........
4d00 20 28 73 65 74 71 20 2c 64 62 67 73 79 6d 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 .(setq.,dbgsym.t))..........(def
4d20 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f un.,(intern.(concat.prefix."--lo
4d40 67 2d 64 69 73 61 62 6c 65 2d 64 65 62 75 67 67 69 6e 67 22 29 29 20 28 29 0a 20 20 20 20 20 20 g-disable-debugging")).().......
4d60 20 20 20 20 20 22 44 69 73 61 62 6c 65 20 64 65 62 75 67 67 69 6e 67 2e 0a 0a 60 50 52 45 46 49 ....."Disable.debugging...`PREFI
4d80 58 2d 2d 6c 6f 67 2d 64 65 62 75 67 67 69 6e 67 2d 70 27 20 77 69 6c 6c 20 72 65 74 75 72 6e 20 X--log-debugging-p'.will.return.
4da0 6e 69 6c 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 nil."............(interactive)..
4dc0 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 2c 64 62 67 73 79 6d 20 6e 69 6c 29 29 0a 20 20 ..........(setq.,dbgsym.nil))...
4de0 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 .......(defun.,(intern.(concat.p
4e00 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 64 65 62 75 67 67 69 6e 67 2d 70 22 29 29 20 28 29 0a 20 refix."--log-debugging-p")).()..
4e20 20 20 20 20 20 20 20 20 20 20 2c 64 62 67 73 79 6d 29 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 ..........,dbgsym)...........;;.
4e40 44 65 66 69 6e 65 20 63 6f 64 69 6e 67 20 73 79 73 74 65 6d 20 73 65 74 20 66 75 6e 74 69 6f 6e Define.coding.system.set.funtion
4e60 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 ..........(defun.,(intern.(conca
4e80 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 73 65 74 2d 63 6f 64 69 6e 67 2d 73 79 73 74 65 t.prefix."--log-set-coding-syste
4ea0 6d 22 29 29 20 28 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 m")).(coding-system)............
4ec0 22 53 65 74 20 63 68 61 72 73 65 74 20 61 6e 64 20 6c 69 6e 65 66 65 65 64 20 6f 66 20 4c 4f 47 "Set.charset.and.linefeed.of.LOG
4ee0 2d 42 55 46 46 45 52 2e 0a 0a 43 4f 44 49 4e 47 2d 53 59 53 54 45 4d 20 69 73 20 73 79 6d 62 6f -BUFFER...CODING-SYSTEM.is.symbo
4f00 6c 20 66 6f 72 20 73 65 74 74 69 6e 67 20 74 6f 20 60 62 75 66 66 65 72 2d 66 69 6c 65 2d 63 6f l.for.setting.to.`buffer-file-co
4f20 64 69 6e 67 2d 73 79 73 74 65 6d 27 2e 0a 4c 4f 47 2d 42 55 46 46 45 52 20 69 73 20 61 20 62 75 ding-system'..LOG-BUFFER.is.a.bu
4f40 66 66 65 72 20 77 68 69 63 68 20 6e 61 6d 65 20 69 73 20 5c 22 20 2a 6c 6f 67 34 65 2d 50 52 45 ffer.which.name.is.\".*log4e-PRE
4f60 46 49 58 2a 5c 22 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 2c 63 6f 64 73 79 FIX*\"."............(setq.,codsy
4f80 73 73 79 6d 20 63 6f 64 69 6e 67 2d 73 79 73 74 65 6d 29 29 0a 0a 20 20 20 20 20 20 20 20 20 3b ssym.coding-system))...........;
4fa0 3b 20 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 66 69 6e 65 20 61 75 74 68 6f 72 20 6d 61 69 6c ;..........;;.Define.author.mail
4fc0 20 73 65 74 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 .set.function..........;;.......
4fe0 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 ...(defun.,(intern.(concat.prefi
5000 78 20 22 2d 2d 6c 6f 67 2d 73 65 74 2d 61 75 74 68 6f 72 2d 6d 61 69 6c 2d 61 64 64 72 65 73 73 x."--log-set-author-mail-address
5020 22 29 29 20 28 62 65 66 6f 72 65 2d 61 74 6d 61 72 6b 20 61 66 74 65 72 2d 61 74 6d 61 72 6b 29 ")).(before-atmark.after-atmark)
5040 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 22 53 65 74 20 6d 61 69 ..........;;............"Set.mai
5060 6c 20 61 64 64 72 65 73 73 20 6f 66 20 61 75 74 68 6f 72 20 66 6f 72 20 65 6c 69 73 70 20 74 68 l.address.of.author.for.elisp.th
5080 61 74 20 68 61 73 20 50 52 45 46 49 58 2e 20 54 68 69 73 20 76 61 6c 75 65 20 69 73 20 75 73 65 at.has.PREFIX..This.value.is.use
50a0 64 20 53 45 4e 44 2d 52 45 50 4f 52 54 2e 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 42 45 46 4f d.SEND-REPORT............;;.BEFO
50c0 52 45 2d 41 54 4d 41 52 4b 20 69 73 20 73 74 72 69 6e 67 20 61 73 20 70 61 72 74 20 6f 66 20 6d RE-ATMARK.is.string.as.part.of.m
50e0 61 69 6c 20 61 64 64 72 65 73 73 2e 20 49 66 20 79 6f 75 72 20 61 64 64 72 65 73 73 20 69 73 20 ail.address..If.your.address.is.
5100 5c 22 68 6f 67 65 40 65 78 61 6d 70 6c 65 2e 63 6f 2e 6a 70 5c 22 2c 20 69 74 20 69 73 20 5c 22 \"hoge@example.co.jp\",.it.is.\"
5120 68 6f 67 65 5c 22 2e 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 41 46 54 45 52 2d 41 54 4d 41 52 4b hoge\"...........;;.AFTER-ATMARK
5140 20 69 73 20 73 74 72 69 6e 67 20 61 73 20 70 61 72 74 20 6f 66 20 6d 61 69 6c 20 61 64 64 72 65 .is.string.as.part.of.mail.addre
5160 73 73 2e 20 49 66 20 79 6f 75 72 20 61 64 64 72 65 73 73 20 69 73 20 5c 22 68 6f 67 65 40 65 78 ss..If.your.address.is.\"hoge@ex
5180 61 6d 70 6c 65 2e 63 6f 2e 6a 70 5c 22 2c 20 69 74 20 69 73 20 5c 22 65 78 61 6d 70 6c 65 2e 63 ample.co.jp\",.it.is.\"example.c
51a0 6f 2e 6a 70 5c 22 2e 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 53 45 4e 44 2d 52 45 50 4f 52 54 20 o.jp\"...........;;.SEND-REPORT.
51c0 69 73 20 60 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 73 65 6e 64 2d 72 65 70 6f 72 74 2d 69 66 2d 6e is.`PREFIX--log-send-report-if-n
51e0 6f 74 2d 64 65 62 75 67 27 2e 22 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 20 20 ot-debug'."..........;;.........
5200 20 20 20 28 73 65 74 71 20 2c 61 64 64 72 73 79 6d 20 28 63 6f 6e 63 61 74 20 62 65 66 6f 72 65 ...(setq.,addrsym.(concat.before
5220 2d 61 74 6d 61 72 6b 20 22 40 22 20 61 66 74 65 72 2d 61 74 6d 61 72 6b 29 29 29 0a 0a 20 20 20 -atmark."@".after-atmark))).....
5240 20 20 20 20 20 20 3b 3b 20 44 65 66 69 6e 65 20 6c 6f 67 20 62 75 66 66 65 72 20 68 61 6e 64 6c ......;;.Define.log.buffer.handl
5260 65 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 e.function..........(defun.,(int
5280 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 63 6c 65 61 72 2d ern.(concat.prefix."--log-clear-
52a0 6c 6f 67 22 29 29 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 22 43 6c 65 61 72 20 62 75 66 66 log")).()............"Clear.buff
52c0 65 72 20 73 74 72 69 6e 67 20 6f 66 20 62 75 66 66 65 72 20 77 68 69 63 68 20 6e 61 6d 65 20 69 er.string.of.buffer.which.name.i
52e0 73 20 5c 22 20 2a 6c 6f 67 34 65 2d 50 52 45 46 49 58 2a 5c 22 2e 22 0a 20 20 20 20 20 20 20 20 s.\".*log4e-PREFIX*\".".........
5300 20 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 ...(interactive)............(log
5320 34 65 2d 2d 63 6c 65 61 72 2d 6c 6f 67 20 2c 62 75 66 73 79 6d 29 29 0a 20 20 20 20 20 20 20 20 4e--clear-log.,bufsym)).........
5340 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 .(defun.,(intern.(concat.prefix.
5360 22 2d 2d 6c 6f 67 2d 6f 70 65 6e 2d 6c 6f 67 22 29 29 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 "--log-open-log")).()...........
5380 20 22 4f 70 65 6e 20 62 75 66 66 65 72 20 77 68 69 63 68 20 6e 61 6d 65 20 69 73 20 5c 22 20 2a ."Open.buffer.which.name.is.\".*
53a0 6c 6f 67 34 65 2d 50 52 45 46 49 58 2a 5c 22 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 6e log4e-PREFIX*\"."............(in
53c0 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 6f 70 teractive)............(log4e--op
53e0 65 6e 2d 6c 6f 67 20 2c 62 75 66 73 79 6d 29 29 0a 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e en-log.,bufsym))..........(defun
5400 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d .,(intern.(concat.prefix."--log-
5420 6f 70 65 6e 2d 6c 6f 67 2d 69 66 2d 64 65 62 75 67 22 29 29 20 28 29 0a 20 20 20 20 20 20 20 20 open-log-if-debug")).().........
5440 20 20 20 22 4f 70 65 6e 20 62 75 66 66 65 72 20 77 68 69 63 68 20 6e 61 6d 65 20 69 73 20 5c 22 ..."Open.buffer.which.name.is.\"
5460 20 2a 6c 6f 67 34 65 2d 50 52 45 46 49 58 2a 5c 22 20 69 66 20 64 65 62 75 67 67 69 6e 67 20 69 .*log4e-PREFIX*\".if.debugging.i
5480 73 20 65 6e 61 62 6c 65 64 2e 22 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 6f s.enabled."............(log4e--o
54a0 70 65 6e 2d 6c 6f 67 2d 69 66 2d 64 65 62 75 67 20 2c 62 75 66 73 79 6d 20 2c 64 62 67 73 79 6d pen-log-if-debug.,bufsym.,dbgsym
54c0 29 29 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 66 69 ))...........;;..........;;.Defi
54e0 6e 65 20 72 65 70 6f 72 74 20 73 65 6e 64 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 ne.report.send.function.........
5500 20 3b 3b 20 20 20 20 20 20 20 20 20 20 28 64 65 66 75 6e 20 2c 28 69 6e 74 65 72 6e 20 28 63 6f .;;..........(defun.,(intern.(co
5520 6e 63 61 74 20 70 72 65 66 69 78 20 22 2d 2d 6c 6f 67 2d 73 65 6e 64 2d 72 65 70 6f 72 74 2d 69 ncat.prefix."--log-send-report-i
5540 66 2d 6e 6f 74 2d 64 65 62 75 67 22 29 29 20 28 29 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 f-not-debug")).()..........;;...
5560 20 20 20 20 20 20 20 20 20 22 53 65 6e 64 20 62 75 67 20 72 65 70 6f 72 74 20 74 6f 20 61 75 74 ........."Send.bug.report.to.aut
5580 68 6f 72 20 69 66 20 64 65 62 75 67 67 69 6e 67 20 69 73 20 64 69 73 61 62 6c 65 64 2e 0a 0a 20 hor.if.debugging.is.disabled....
55a0 20 20 20 20 20 20 20 20 3b 3b 20 54 68 65 20 61 75 74 68 6f 72 20 6d 61 69 6c 61 64 64 72 65 73 ........;;.The.author.mailaddres
55c0 73 20 69 73 20 73 65 74 20 62 79 20 60 50 52 45 46 49 58 2d 2d 6c 6f 67 2d 73 65 74 2d 61 75 74 s.is.set.by.`PREFIX--log-set-aut
55e0 68 6f 72 2d 6d 61 69 6c 2d 61 64 64 72 65 73 73 27 2e 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 41 hor-mail-address'...........;;.A
5600 62 6f 75 74 20 74 68 65 20 77 61 79 20 6f 66 20 73 65 6e 64 69 6e 67 20 62 75 67 20 72 65 70 6f bout.the.way.of.sending.bug.repo
5620 72 74 2c 20 73 65 65 20 60 72 65 70 6f 72 74 65 72 2d 73 75 62 6d 69 74 2d 62 75 67 2d 72 65 70 rt,.see.`reporter-submit-bug-rep
5640 6f 72 74 27 2e 22 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 20 20 20 20 20 20 28 6c ort'."..........;;............(l
5660 6f 67 34 65 2d 2d 73 65 6e 64 2d 72 65 70 6f 72 74 2d 69 66 2d 6e 6f 74 2d 64 65 62 75 67 20 2c og4e--send-report-if-not-debug.,
5680 62 75 66 73 79 6d 20 2c 64 62 67 73 79 6d 20 2c 61 64 64 72 73 79 6d 20 2c 70 72 65 66 69 78 29 bufsym.,dbgsym.,addrsym.,prefix)
56a0 29 0a 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 44 65 66 69 6e 65 20 65 61 63 68 20 6c 65 76 65 6c )...........;;.Define.each.level
56c0 20 6c 6f 67 67 69 6e 67 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 .logging.function..........(log4
56e0 65 2d 2d 64 65 66 2d 6c 65 76 65 6c 2d 6c 6f 67 67 65 72 20 2c 70 72 65 66 69 78 20 6e 69 6c 20 e--def-level-logger.,prefix.nil.
5700 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 6c 65 76 65 6c 2d nil)..........(log4e--def-level-
5720 6c 6f 67 67 65 72 20 2c 70 72 65 66 69 78 20 2c 28 61 73 73 6f 63 2d 64 65 66 61 75 6c 74 20 27 logger.,prefix.,(assoc-default.'
5740 66 61 74 61 6c 20 66 75 6e 63 6e 6d 2d 61 6c 69 73 74 29 20 66 61 74 61 6c 29 0a 20 20 20 20 20 fatal.funcnm-alist).fatal)......
5760 20 20 20 20 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 6c 65 76 65 6c 2d 6c 6f 67 67 65 72 20 2c 70 72 ....(log4e--def-level-logger.,pr
5780 65 66 69 78 20 2c 28 61 73 73 6f 63 2d 64 65 66 61 75 6c 74 20 27 65 72 72 6f 72 20 66 75 6e 63 efix.,(assoc-default.'error.func
57a0 6e 6d 2d 61 6c 69 73 74 29 20 65 72 72 6f 72 29 0a 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 nm-alist).error)..........(log4e
57c0 2d 2d 64 65 66 2d 6c 65 76 65 6c 2d 6c 6f 67 67 65 72 20 2c 70 72 65 66 69 78 20 2c 28 61 73 73 --def-level-logger.,prefix.,(ass
57e0 6f 63 2d 64 65 66 61 75 6c 74 20 27 77 61 72 6e 20 20 66 75 6e 63 6e 6d 2d 61 6c 69 73 74 29 20 oc-default.'warn..funcnm-alist).
5800 77 61 72 6e 29 0a 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 6c 65 76 65 6c warn)..........(log4e--def-level
5820 2d 6c 6f 67 67 65 72 20 2c 70 72 65 66 69 78 20 2c 28 61 73 73 6f 63 2d 64 65 66 61 75 6c 74 20 -logger.,prefix.,(assoc-default.
5840 27 69 6e 66 6f 20 20 66 75 6e 63 6e 6d 2d 61 6c 69 73 74 29 20 69 6e 66 6f 29 0a 20 20 20 20 20 'info..funcnm-alist).info)......
5860 20 20 20 20 28 6c 6f 67 34 65 2d 2d 64 65 66 2d 6c 65 76 65 6c 2d 6c 6f 67 67 65 72 20 2c 70 72 ....(log4e--def-level-logger.,pr
5880 65 66 69 78 20 2c 28 61 73 73 6f 63 2d 64 65 66 61 75 6c 74 20 27 64 65 62 75 67 20 66 75 6e 63 efix.,(assoc-default.'debug.func
58a0 6e 6d 2d 61 6c 69 73 74 29 20 64 65 62 75 67 29 0a 20 20 20 20 20 20 20 20 20 28 6c 6f 67 34 65 nm-alist).debug)..........(log4e
58c0 2d 2d 64 65 66 2d 6c 65 76 65 6c 2d 6c 6f 67 67 65 72 20 2c 70 72 65 66 69 78 20 2c 28 61 73 73 --def-level-logger.,prefix.,(ass
58e0 6f 63 2d 64 65 66 61 75 6c 74 20 27 74 72 61 63 65 20 66 75 6e 63 6e 6d 2d 61 6c 69 73 74 29 20 oc-default.'trace.funcnm-alist).
5900 74 72 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 0a 20 20 20 20 20 20 20 20 20 29 29 29 29 0a 0a trace)....................))))..
5920 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 69 6e 65 2d 64 65 72 69 76 65 64 2d .;;;###autoload.(define-derived-
5940 6d 6f 64 65 20 6c 6f 67 34 65 2d 6d 6f 64 65 20 76 69 65 77 2d 6d 6f 64 65 20 22 4c 6f 67 34 45 mode.log4e-mode.view-mode."Log4E
5960 22 0a 20 20 22 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 20 62 72 6f 77 73 69 6e 67 20 61 20 62 "..."Major.mode.for.browsing.a.b
5980 75 66 66 65 72 20 6d 61 64 65 20 62 79 20 6c 6f 67 34 65 2e 0a 0a 5c 5c 3c 6c 6f 67 34 65 2d 6d uffer.made.by.log4e...\\<log4e-m
59a0 6f 64 65 2d 6d 61 70 3e 0a 5c 5c 7b 6c 6f 67 34 65 2d 6d 6f 64 65 2d 6d 61 70 7d 22 0a 20 20 28 ode-map>.\\{log4e-mode-map}"...(
59c0 64 65 66 69 6e 65 2d 6b 65 79 20 6c 6f 67 34 65 2d 6d 6f 64 65 2d 6d 61 70 20 28 6b 62 64 20 22 define-key.log4e-mode-map.(kbd."
59e0 4a 22 29 20 27 6c 6f 67 34 65 3a 6e 65 78 74 2d 6c 6f 67 29 0a 20 20 28 64 65 66 69 6e 65 2d 6b J").'log4e:next-log)...(define-k
5a00 65 79 20 6c 6f 67 34 65 2d 6d 6f 64 65 2d 6d 61 70 20 28 6b 62 64 20 22 4b 22 29 20 27 6c 6f 67 ey.log4e-mode-map.(kbd."K").'log
5a20 34 65 3a 70 72 65 76 69 6f 75 73 2d 6c 6f 67 29 29 0a 0a 28 64 65 66 75 6e 20 6c 6f 67 34 65 3a 4e:previous-log))..(defun.log4e:
5a40 6e 65 78 74 2d 6c 6f 67 20 28 29 0a 20 20 22 4d 6f 76 65 20 74 6f 20 73 74 61 72 74 20 6f 66 20 next-log.()..."Move.to.start.of.
5a60 6e 65 78 74 20 6c 6f 67 20 6f 6e 20 6c 6f 67 34 65 2d 6d 6f 64 65 2e 22 0a 20 20 28 69 6e 74 65 next.log.on.log4e-mode."...(inte
5a80 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 6c 65 76 65 6c 29 29 0a 20 20 20 20 28 ractive)...(let*.((level)).....(
5aa0 77 68 69 6c 65 20 28 61 6e 64 20 28 6e 6f 74 20 6c 65 76 65 6c 29 0a 20 20 20 20 20 20 20 20 20 while.(and.(not.level)..........
5ac0 20 20 20 20 20 20 20 28 3c 20 28 70 6f 69 6e 74 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 0a .......(<.(point).(point-max))).
5ae0 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 31 29 0a 20 20 20 20 20 20 28 73 65 ......(forward-line.1).......(se
5b00 74 71 20 6c 65 76 65 6c 20 28 6c 6f 67 34 65 2d 2d 67 65 74 2d 63 75 72 72 65 6e 74 2d 6c 6f 67 tq.level.(log4e--get-current-log
5b20 2d 6c 69 6e 65 2d 6c 65 76 65 6c 29 29 29 0a 20 20 20 20 6c 65 76 65 6c 29 29 0a 0a 28 64 65 66 -line-level))).....level))..(def
5b40 75 6e 20 6c 6f 67 34 65 3a 70 72 65 76 69 6f 75 73 2d 6c 6f 67 20 28 29 0a 20 20 22 4d 6f 76 65 un.log4e:previous-log.()..."Move
5b60 20 74 6f 20 73 74 61 72 74 20 6f 66 20 70 72 65 76 69 6f 75 73 20 6c 6f 67 20 6f 6e 20 6c 6f 67 .to.start.of.previous.log.on.log
5b80 34 65 2d 6d 6f 64 65 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 4e-mode."...(interactive)...(let
5ba0 2a 20 28 28 6c 65 76 65 6c 29 29 0a 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 6e 6f 74 *.((level)).....(while.(and.(not
5bc0 20 6c 65 76 65 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3e 20 28 70 6f 69 6e .level).................(>.(poin
5be0 74 29 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 29 0a 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d t).(point-min))).......(forward-
5c00 6c 69 6e 65 20 2d 31 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 6c 65 76 65 6c 20 28 6c 6f 67 34 line.-1).......(setq.level.(log4
5c20 65 2d 2d 67 65 74 2d 63 75 72 72 65 6e 74 2d 6c 6f 67 2d 6c 69 6e 65 2d 6c 65 76 65 6c 29 29 29 e--get-current-log-line-level)))
5c40 0a 20 20 20 20 6c 65 76 65 6c 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 .....level))..;;;###autoload.(de
5c60 66 75 6e 20 6c 6f 67 34 65 3a 69 6e 73 65 72 74 2d 73 74 61 72 74 2d 6c 6f 67 2d 71 75 69 63 6b fun.log4e:insert-start-log-quick
5c80 6c 79 20 28 29 0a 20 20 22 49 6e 73 65 72 74 20 6c 6f 67 67 69 6e 67 20 73 74 61 74 6d 65 6e 74 ly.()..."Insert.logging.statment
5ca0 20 66 6f 72 20 74 72 61 63 65 20 6c 65 76 65 6c 20 6c 6f 67 20 61 74 20 73 74 61 72 74 20 6f 66 .for.trace.level.log.at.start.of
5cc0 20 63 75 72 72 65 6e 74 20 66 75 6e 63 74 69 6f 6e 2f 6d 61 63 72 6f 2e 22 0a 20 20 28 69 6e 74 .current.function/macro."...(int
5ce0 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 2a 20 28 28 66 73 74 61 72 74 70 74 20 28 77 68 eractive)...(let*.((fstartpt.(wh
5d00 65 6e 20 28 72 65 2d 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 20 22 28 5c 5c 28 3f 3a 64 65 en.(re-search-backward."(\\(?:de
5d20 66 75 6e 5c 5c 7c 64 65 66 6d 61 63 72 6f 5c 5c 7c 64 65 66 73 75 62 73 74 5c 5c 29 5c 5c 2a 3f fun\\|defmacro\\|defsubst\\)\\*?
5d40 20 2b 5c 5c 28 5b 5e 20 5d 2b 5c 5c 29 20 2b 28 5c 5c 28 5b 5e 29 5d 2a 5c 5c 29 29 22 20 6e 69 .+\\([^.]+\\).+(\\([^)]*\\))".ni
5d60 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 l.t)......................(point
5d80 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 6e 63 6e 6d 20 28 77 68 65 6e 20 66 73 74 61 72 74 )))..........(fncnm.(when.fstart
5da0 70 74 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 31 pt.(match-string-no-properties.1
5dc0 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 61 72 67 74 65 78 74 20 28 77 68 65 6e 20 66 73 74 61 )))..........(argtext.(when.fsta
5de0 72 74 70 74 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 rtpt.(match-string-no-properties
5e00 20 32 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 70 72 65 66 69 78 20 28 73 61 76 65 2d 65 78 63 .2)))..........(prefix.(save-exc
5e20 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d ursion....................(goto-
5e40 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 char.(point-min))...............
5e60 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 77 68 69 6c 65 20 28 72 65 2d 73 65 61 72 63 68 2d 66 .....(cl-loop.while.(re-search-f
5e80 6f 72 77 61 72 64 20 22 28 6c 6f 67 34 65 3a 64 65 66 6c 6f 67 67 65 72 5b 20 5c 6e 5d 2b 5c 22 orward."(log4e:deflogger[.\n]+\"
5ea0 5c 5c 28 5b 5e 5c 22 5d 2b 5c 5c 29 5c 22 22 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 \\([^\"]+\\)\"".nil.t)..........
5ec0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 70 72 65 66 69 78 20 3d 20 ...................for.prefix.=.
5ee0 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 31 29 0a 20 (match-string-no-properties.1)..
5f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 63 ...........................for.c
5f20 75 72 72 66 61 63 65 20 3d 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 28 6d 61 urrface.=.(get-text-property.(ma
5f40 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 20 27 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 tch-beginning.0).'face).........
5f60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 28 6e 6f 74 20 28 65 71 20 ....................if.(not.(eq.
5f80 63 75 72 72 66 61 63 65 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 63 6f 6d 6d 65 6e 74 2d 66 61 63 65 currface.'font-lock-comment-face
5fa0 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 )).............................r
5fc0 65 74 75 72 6e 20 70 72 65 66 69 78 29 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 eturn.prefix)))).....(when.(and.
5fe0 66 73 74 61 72 74 70 74 20 70 72 65 66 69 78 29 0a 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 66 fstartpt.prefix).......(let*.((f
6000 6e 63 6e 6d 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 28 ncnm.(replace-regexp-in-string.(
6020 63 6f 6e 63 61 74 20 22 5c 5c 60 22 20 70 72 65 66 69 78 20 22 5b 5e 61 2d 7a 41 2d 5a 30 2d 39 concat."\\`".prefix."[^a-zA-Z0-9
6040 5d 2b 22 29 20 22 22 20 66 6e 63 6e 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6e ]+")."".fncnm))..............(fn
6060 63 6e 6d 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 2d cnm.(replace-regexp-in-string."-
6080 22 20 22 20 22 20 66 6e 63 6e 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 72 67 74 ".".".fncnm))..............(argt
60a0 65 78 74 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 5c ext.(replace-regexp-in-string."\
60c0 6e 22 20 22 20 22 20 61 72 67 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 n".".".argtext))..............(a
60e0 72 67 74 65 78 74 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 rgtext.(replace-regexp-in-string
6100 20 22 5e 20 2b 22 20 22 22 20 61 72 67 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 ."^.+"."".argtext)).............
6120 20 28 61 72 67 74 65 78 74 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 .(argtext.(replace-regexp-in-str
6140 69 6e 67 20 22 20 2b 24 22 20 22 22 20 61 72 67 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 ing.".+$"."".argtext))..........
6160 20 20 20 20 28 61 72 67 73 20 28 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 61 72 67 74 65 78 74 20 ....(args.(split-string.argtext.
6180 22 20 2b 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 72 67 73 20 28 63 6c 2d 6c 6f ".+"))..............(args.(cl-lo
61a0 6f 70 20 66 6f 72 20 61 72 67 20 69 6e 20 61 72 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 op.for.arg.in.args..............
61c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 28 61 6e 64 20 28 6e 6f 74 20 28 73 74 72 ...............if.(and.(not.(str
61e0 69 6e 67 3d 20 61 72 67 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ing=.arg.""))...................
6200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 2d 6d ..................(not.(string-m
6220 61 74 63 68 20 22 5c 5c 60 26 22 20 61 72 67 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 atch."\\`&".arg)))..............
6240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 61 72 67 29 29 0a 20 20 20 ...............collect.arg))....
6260 20 20 20 20 20 20 20 20 20 20 28 6c 6f 67 74 65 78 74 20 28 63 6c 2d 6c 6f 6f 70 20 77 69 74 68 ..........(logtext.(cl-loop.with
6280 20 72 65 74 20 3d 20 28 66 6f 72 6d 61 74 20 22 73 74 61 72 74 20 25 73 2e 22 20 66 6e 63 6e 6d .ret.=.(format."start.%s.".fncnm
62a0 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )...............................
62c0 20 66 6f 72 20 61 72 67 20 69 6e 20 61 72 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .for.arg.in.args................
62e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 73 65 74 71 20 72 65 74 20 28 63 6f ................do.(setq.ret.(co
6300 6e 63 61 74 20 72 65 74 20 22 20 22 20 61 72 67 20 22 5b 25 73 5d 22 29 29 0a 20 20 20 20 20 20 ncat.ret.".".arg."[%s]")).......
6320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6e 61 6c 6c 79 .........................finally
6340 20 72 65 74 75 72 6e 20 72 65 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 78 70 .return.ret))..............(sexp
6360 66 6f 72 6d 61 74 20 28 63 6c 2d 6c 6f 6f 70 20 77 69 74 68 20 72 65 74 20 3d 20 22 28 25 73 2d format.(cl-loop.with.ret.=."(%s-
6380 2d 6c 6f 67 20 27 74 72 61 63 65 20 5c 22 25 73 5c 22 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 -log.'trace.\"%s\"".............
63a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 61 72 67 20 69 6e ......................for.arg.in
63c0 20 61 72 67 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .args...........................
63e0 20 20 20 20 20 20 20 20 64 6f 20 28 73 65 74 71 20 72 65 74 20 28 63 6f 6e 63 61 74 20 72 65 74 ........do.(setq.ret.(concat.ret
6400 20 22 20 25 73 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .".%s"))........................
6420 20 20 20 20 20 20 20 20 20 20 20 66 69 6e 61 6c 6c 79 20 72 65 74 75 72 6e 20 28 63 6f 6e 63 61 ...........finally.return.(conca
6440 74 20 72 65 74 20 22 29 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 t.ret.")")))..............(inser
6460 74 74 65 78 74 20 28 61 70 70 6c 79 20 27 66 6f 72 6d 61 74 20 73 65 78 70 66 6f 72 6d 61 74 20 ttext.(apply.'format.sexpformat.
6480 70 72 65 66 69 78 20 6c 6f 67 74 65 78 74 20 61 72 67 73 29 29 29 0a 20 20 20 20 20 20 20 20 28 prefix.logtext.args))).........(
64a0 66 6f 72 77 61 72 64 2d 63 68 61 72 29 0a 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 73 forward-char).........(forward-s
64c0 65 78 70 20 33 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 72 65 2d 73 65 61 72 63 68 2d exp.3).........(when.(re-search-
64e0 66 6f 72 77 61 72 64 20 22 5c 5c 3d 5b 20 5c 6e 5d 2b 5c 22 22 20 6e 69 6c 20 74 29 0a 20 20 20 forward."\\=[.\n]+\"".nil.t)....
6500 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 63 68 61 72 20 2d 31 29 0a 20 20 20 20 20 20 20 .......(forward-char.-1)........
6520 20 20 20 28 66 6f 72 77 61 72 64 2d 73 65 78 70 29 29 0a 20 20 20 20 20 20 20 20 28 6e 65 77 6c ...(forward-sexp)).........(newl
6540 69 6e 65 2d 61 6e 64 2d 69 6e 64 65 6e 74 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 ine-and-indent).........(insert.
6560 69 6e 73 65 72 74 74 65 78 74 29 29 29 29 29 0a 0a 0a 28 70 72 6f 76 69 64 65 20 27 6c 6f 67 34 inserttext)))))...(provide.'log4
6580 65 29 0a 3b 3b 3b 20 6c 6f 67 34 65 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 e).;;;.log4e.el.ends.here.......
65a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
65c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
65e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6600 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6660 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
66a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
66c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
66e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
67a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
67c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
67e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6800 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6820 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6860 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6880 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
68a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
68c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
68e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6900 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6920 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
69a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
69c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
69e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6a00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6a20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6a40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6a60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6a80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6c00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6c20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6c40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6c60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6c80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6e00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6e20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6e40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6e60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6e80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6f00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6f20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6f40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6f60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6f80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6fa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6fc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6fe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7000 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7060 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7080 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
70a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
70c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
70e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7100 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
71a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
71c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
71e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7200 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7260 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7280 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
72a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
72c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
72e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
73a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
73c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
73e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7400 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7460 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7480 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
74a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
74c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
74e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7500 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7520 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
75a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
75c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
75e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7600 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7660 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
76a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
76c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
76e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
77a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
77c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
77e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
generated by cgit v1.2.3 (git 2.25.1) at 2025-10-26 20:25:49 +0000