01:40:52 ccl-logbot [~ccl-logbo@setf.clozure.com] has joined #ccl 01:40:52 01:40:52 -!- names: ccl-logbot ivan`` billstclair oGMo sellout gz gbyers PECCU maxm- fe[nl]ix kanru dnm Fade jasom Intensity |3b| mdc clop @ChanServ 02:03:05 -!- mdc [~mdc@ds9.entity.com] has quit [Quit: mdc] 07:36:46 superjudge [~superjudg@c83-250-198-227.bredband.comhem.se] has joined #ccl 12:24:37 when someone sees it, is it possible in CCL for a macro, to retrieve from &env the function/method name where its being expanded in? Ideally maybe it already bound to some internal special variable? 12:25:19 basically I'm trying to implement same "auto-name logger after the surrounding environment" thing in :log4cl for non-SBCL implementations 13:14:27 maxm- I doubt it's exported, but I don't know the CCL compiler. gbyers? gz? 13:15:11 billstclair: unexported is fine, as there is no portable way to get it, I'm doing it per-implementation 13:21:46 *billstclair* I don't see it anywhere in the &environment. The only way I see to get it is to search up the stack for a call to ccl:: 13:22:04 ccl::compiled-named-function, and take the value of the ccl::name variable from that stack frame 13:22:13 ccl::compile-named-function 13:22:55 And it looks like neither Gary nor Gail is around right now 13:23:27 yea I'll wait for them to see this scrollback, in case there is eaiser way, coz really internals should have this info somewhere in order to produce error messages 13:47:19 maxm-: inspect the environment 13:49:44 I did that. No evidence of enclosing function names there 13:50:06 The file compiler has it somewhere, but it wasn't obvious to me where 13:50:32 But I didn't look for very long 15:48:58 alms_ [~alms_@209-6-130-32.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has joined #ccl 15:49:06 -!- alms_ [~alms_@209-6-130-32.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has quit [Client Quit] 15:51:16 alms_ [~alms_@209-6-130-32.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has joined #ccl 15:53:44 -!- alms_ [~alms_@209-6-130-32.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has quit [Client Quit] 16:03:40 alms_ [~alms_@209-6-130-32.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has joined #ccl 17:53:41 -!- alms_ [~alms_@209-6-130-32.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has quit [Quit: alms_] 19:14:58 alms_ [~alms_@209-6-130-32.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has joined #ccl 19:18:06 -!- alms_ [~alms_@209-6-130-32.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has quit [Client Quit] 19:47:37 -!- fe[nl]ix [~quassel@pdpc/supporter/professional/fenlix] has quit [Quit: No Ping reply in 180 seconds.] 19:47:55 fe[nl]ix [~quassel@pdpc/supporter/professional/fenlix] has joined #ccl 20:31:10 -!- superjudge [~superjudg@c83-250-198-227.bredband.comhem.se] has quit [Quit: superjudge] 20:34:18 mdc [~mdc@ds9.entity.com] has joined #ccl 23:16:13 alms_ [~alms_@209-6-130-32.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has joined #ccl 23:17:40 -!- alms_ [~alms_@209-6-130-32.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has quit [Client Quit]