00:04:23 -!- Fare [~Fare@ita4fw1.itasoftware.com] has quit [Quit: Leaving] 00:26:43 -!- billstclair [~billstcla@unaffiliated/billstclair] has quit [Remote host closed the connection] 00:41:27 -!- roffe [~roffe@vpn-client192.uio.no] has quit [Ping timeout: 268 seconds] 00:50:11 roffe [~roffe@cm-84.215.145.23.getinternet.no] has joined #ccl 00:52:40 nunb [~nundan@59.178.216.155] has joined #ccl 01:07:10 -!- nunb [~nundan@59.178.216.155] has quit [Quit: This computer has gone to sleep] 01:08:11 billstclair [~billstcla@unaffiliated/billstclair] has joined #ccl 01:46:47 -!- rme [~rme@pool-70-106-132-157.chi01.dsl-w.verizon.net] has quit [Quit: rme] 02:06:45 -!- billstclair [~billstcla@unaffiliated/billstclair] has quit [Remote host closed the connection] 02:08:00 billstclair [~billstcla@p-216-227-83-3.dsl1.rtr.chat.fpma.frpt.net] has joined #ccl 02:08:00 -!- billstclair [~billstcla@p-216-227-83-3.dsl1.rtr.chat.fpma.frpt.net] has quit [Changing host] 02:08:00 billstclair [~billstcla@unaffiliated/billstclair] has joined #ccl 02:23:16 -!- alms [~alms@146-115-42-237.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has quit [Quit: alms] 02:26:44 alms [~alms@146-115-42-237.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has joined #ccl 02:26:57 -!- alms [alms@clozure-AD075F06.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has quit [Quit: alms] 02:26:57 -!- alms [~alms@146-115-42-237.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has quit [Client Quit] 02:29:12 alms [~alms@146-115-42-237.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has joined #ccl 02:32:16 -!- alms [alms@clozure-AD075F06.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has quit [Ping timeout] 02:33:23 -!- alms [~alms@146-115-42-237.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has quit [Ping timeout: 240 seconds] 02:36:08 alms [~alms@146-115-42-237.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has joined #ccl 02:46:17 -!- alms [alms@clozure-AD075F06.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has quit [Quit: alms] 02:46:17 -!- alms [~alms@146-115-42-237.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has quit [Quit: alms] 02:46:49 -!- bzzbzz [~franco@modemcable240.34-83-70.mc.videotron.ca] has quit [Quit: leaving] 02:53:21 alms [~alms@146-115-42-237.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has joined #ccl 03:42:33 bfulgham_ [~brent@adsl-69-234-96-102.dsl.irvnca.pacbell.net] has joined #ccl 03:53:18 -!- bfulgham_ [~brent@adsl-69-234-96-102.dsl.irvnca.pacbell.net] has quit [Read error: Connection reset by peer] 05:10:26 nunb [~nundan@59.178.200.70] has joined #ccl 05:13:53 -!- Phoodus [foo@174-17-12-60.phnx.qwest.net] has quit [Read error: Connection reset by peer] 07:33:44 leo2007 [~leo@cpc1-cmbg13-0-0-cust596.cmbg.cable.ntl.com] has joined #ccl 08:21:33 -!- nunb [~nundan@59.178.200.70] has quit [Read error: No route to host] 08:22:00 nunb [~nundan@59.178.205.230] has joined #ccl 08:57:37 tfb [~tfb@212.183.140.22] has joined #ccl 09:17:16 -!- nunb [~nundan@59.178.205.230] has quit [Quit: This computer has gone to sleep] 09:23:43 nunb [~nundan@59.178.205.230] has joined #ccl 10:08:50 I faced the fact that (directory "/path/to/directory-containing-symlinks/*/") doesn't list the symlinks. 10:09:26 In SBCL it does, and I realise that it's very likely allowerd by the spec. 10:09:42 The question is, though, what do I do? 10:16:10 The documentation doesn't appear to mention symlinks at all.. 10:16:28 deepfire: does (directory ".../*" :directories t) work? 10:17:04 (note no trailing slash, so it's not a wild direcotry name, but you have asked for dirs as well) 10:19:26 Perhaps this will help: http://www.cl-user.net/asp/libs/osicat 10:20:21 Never used it, but it sounds like it handles what you want, on posix systems 10:27:11 It's also possible that passing true for the :directories keyword arg to DIRECTORY (a CCL extension) will get the soft links. Testing... 10:28:31 nope 10:29:17 There we go: (directory pattern :follow-links nil) 10:29:34 deepfire 10:29:55 tfb, thanks, that was just the right magic! 10:32:31 cool 10:39:19 Hmm, now that I return to my original problem, I'm stuck again. 10:39:46 Actually, the pattern I'm interested in is #p"/sys/bus/usb/devices/*/idProduct" 10:39:50 -!- roffe [~roffe@cm-84.215.145.23.getinternet.no] has quit [Ping timeout: 252 seconds] 10:40:21 The "*" within the directory component corresponds to directory symlinks. 10:43:08 I've tried various combinations (albeit, nonexhaustively) of :all :follow-symlinks and :directory-pathnames 10:52:20 (alexandria:map-product (lambda (x1 x2 x3 x4 x5) (directory #p"/sys/bus/usb/devices/*/idProduct" :follow-links x2 :all x2 :directories x3 :directory-pathnames x4 :test x5)) '(t nil) '(t nil) '(t nil) '(t nil) '(t nil)) => nils... 10:53:22 i.e. there is no combination of these flags which follows through these wildcarded symlinks 10:55:38 oh, typo, replace the first x2 with an x1 10:55:45 same result, though 10:56:05 CCL's directory goes through symlinks for me. Returns the path through the linked dir, not through the symlink, but find the files 10:56:38 wait. Not really testing that 10:57:43 Now I'm getting what you're getting 10:58:28 Only if I name the symlink'd dir explicitly, intead of with a "*" does it work 10:58:51 -!- hlavaty [~user@77-22-102-139-dynip.superkabel.de] has quit [Ping timeout: 245 seconds] 10:59:57 The problem is, the names are dynamic, and I'd much rather have CCL do the guessing fior me.. 11:00:09 roffe [~roffe@90.149.29.76] has joined #ccl 11:00:20 sorry for the silly typos, the tty has a significant latency here 11:00:51 I think perhaps I need to talk with an expert on asdf2 11:01:11 roffe, Fare on #lisp? 11:01:21 I suppose you could look yourself: (directory "/sys/bus/usb/devices/*" :directories t :files nil), and loop through the result 11:01:33 deepfire: I think you need to split the pathname at the wild component, do a directory on that, then iterate on the result 11:01:38 billstclair, yeah I was thinking of that, thanks! 11:01:42 billstclair: same thought... 11:01:46 yep 11:02:16 It'd be nice, though, if CCL did it, no? 11:02:30 indeed. 11:03:01 Or, perhaps, I'm lack the imagination to envision the associated performance cost, for the general case.. 11:03:27 deepfire: here's what I did (iTunes is a symlink to a directory): (mapcan (lambda (p) (directory (make-pathname :name :wild :defaults p))) 11:03:28 (directory "~/Music/*")) 11:06:44 hlavaty [~user@77-22-102-139-dynip.superkabel.de] has joined #ccl 11:09:50 tfb, thanks a lot! 11:20:13 -!- roffe [~roffe@90.149.29.76] has quit [Read error: Connection reset by peer] 11:20:43 roffe [~roffe@19-58-9.connect.netcom.no] has joined #ccl 11:52:43 -!- roffe [~roffe@19-58-9.connect.netcom.no] has quit [Ping timeout: 248 seconds] 11:53:42 -!- billstclair [~billstcla@unaffiliated/billstclair] has quit [Remote host closed the connection] 11:55:10 billstclair [~billstcla@gw3.tacwap.org] has joined #ccl 11:55:10 -!- billstclair [~billstcla@gw3.tacwap.org] has quit [Changing host] 11:55:10 billstclair [~billstcla@unaffiliated/billstclair] has joined #ccl 11:56:52 Are there ready-made LAP's (right term?) to employ inb/outb x86-oid instructions? 12:05:33 -!- alms [~alms@146-115-42-237.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has quit [Quit: alms] 12:19:33 roffe [~roffe@90.149.29.76] has joined #ccl 12:27:09 It appears that wrapping defstruct into (eval-when (:compile-toplevel :load-toplevel)) doesn't make the accessors available to the rest of code 12:27:41 Is this a known behavior? 12:29:17 *deepfire* tries parse what he just said 12:31:05 alms [~alms@146-115-42-237.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has joined #ccl 12:33:26 -!- alms [~alms@146-115-42-237.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has quit [Client Quit] 12:42:53 -!- sellout [~greg@c-24-128-48-180.hsd1.ma.comcast.net] has quit [Quit: sellout] 12:44:41 sellout [~greg@c-24-128-48-180.hsd1.ma.comcast.net] has joined #ccl 12:44:54 -!- sellout [~greg@c-24-128-48-180.hsd1.ma.comcast.net] has quit [Client Quit] 13:01:43 roffe_ [~roffe@90.149.29.76] has joined #ccl 13:02:09 -!- roffe [~roffe@90.149.29.76] has quit [Read error: Connection reset by peer] 13:02:11 -!- roffe_ is now known as roffe 13:06:04 -!- roffe [~roffe@90.149.29.76] has quit [Read error: Connection reset by peer] 13:09:04 roffe [~roffe@19-58-9.connect.netcom.no] has joined #ccl 13:10:26 bzzbzz [~franco@modemcable240.34-83-70.mc.videotron.ca] has joined #ccl 13:14:07 sellout [~greg@2002:4855:eb9a:0:21d:4fff:fefe:c504] has joined #ccl 13:39:23 Phoodus [foo@174-17-12-60.phnx.qwest.net] has joined #ccl 14:11:13 alms [~alms@static-72-85-235-154.bstnma.east.verizon.net] has joined #ccl 14:14:21 -!- roffe [~roffe@19-58-9.connect.netcom.no] has quit [Read error: Connection reset by peer] 14:20:18 -!- nunb [~nundan@59.178.205.230] has quit [Read error: Connection reset by peer] 14:20:45 nunb [~nundan@59.178.206.48] has joined #ccl 14:24:48 +:test x5)) '(t nil) '(t nil) '(t nil) '(t nil) '(t nil)) tells me 14:42:48 roffe [~roffe@cm-84.215.145.23.getinternet.no] has joined #ccl 14:54:39 -!- alms [alms@clozure-CDE684CB.bstnma.east.verizon.net] has quit [Quit: alms] 14:54:39 -!- alms [~alms@static-72-85-235-154.bstnma.east.verizon.net] has quit [Quit: alms] 15:01:19 alms [~alms@2002:4855:eb9a:0:219:e3ff:feda:a4c0] has joined #ccl 15:01:52 milanj [~milanj_@93.87.180.171] has joined #ccl 15:19:04 rme [~rme@pool-70-106-132-157.chi01.dsl-w.verizon.net] has joined #ccl 15:19:24 Ho-hum, CCL uses TYPEP to ensure structure slot types -- but TYPEP constrains too hard -- it disallows function types. 15:20:15 CLHS says that DEFSTRUCT's :TYPE accepts all valid type specifiers -- and (FUNCTION ...) should be accepted, AIUI. 15:21:29 I wonder, though, whether (VALUES ...) is a valid type specifier. 15:53:31 deepfire: no "This type specifier can be used only as the value-type in a function type specifier or a the special form. " 15:53:58 but I think FUNCTION should be accepted, yes 15:59:25 gz_ [~gz@2002:4855:eb9a:0:21e:c2ff:fe0f:2d89] has joined #ccl 16:38:46 -!- alms [~alms@2002:4855:eb9a:0:219:e3ff:feda:a4c0] has quit [Quit: alms] 16:42:51 -!- tfb [~tfb@212.183.140.22] has quit [Ping timeout: 258 seconds] 16:49:35 -!- nunb [~nundan@59.178.206.48] has quit [Quit: This computer has gone to sleep] 17:00:52 anRch [~markmilli@64.134.66.26] has joined #ccl 17:33:22 -!- milanj [~milanj_@93.87.180.171] has quit [Ping timeout: 264 seconds] 17:37:33 milanj [~milanj_@79.101.180.191] has joined #ccl 17:38:23 alms [~alms@2002:4855:eb9a:0:219:e3ff:feda:a4c0] has joined #ccl 17:43:06 rme: a tiny bit of help again? 17:43:16 roffe: I can try. 17:45:05 I've used asdf2 to install fare-cvs and split-sequence 17:45:17 fare-cvs loads correctly, split-sequence does _not_. 17:48:37 roffe: Just to clarify some definitions: asdf is analogous to the make program used on Unix. Fare and others have recently done a lot of work fixing bugs and enhancing asdf, and they are in the last stages of doing an official asdf 2.0 release. 17:49:25 There is a totally separate program called asdf-install. It downloads stuff. 17:50:23 -!- anRch [~markmilli@64.134.66.26] has quit [Quit: anRch] 17:50:47 ah. 17:50:52 i sort of figured as much ? 17:51:05 problem now: I have some stuff in my init file 17:51:51 roffe_ [~roffe@cm-84.215.145.23.getinternet.no] has joined #ccl 17:52:10 this seems to work. no error messages. 17:52:10 however, 17:52:23 if i do (asdf-install:install :foo) 17:52:31 then I can say (asdf:load-system :foo) 17:52:38 but not if I quit lisp and restart. 17:53:26 this is, like, suboptimal. 17:53:43 huh? 17:54:05 hypno: I'm as puzzled as you ... more, probably. 17:54:29 um, i doubt that. i am puzzled because i can not understand what you are saying. 17:54:36 oh. 17:55:20 I can load a feature after I've installed it, but not if I quit lisp and restart. 17:55:47 Presumably, you set up asdf:*central-registry* in your init file, right? Is it possible that asdf-install alters asdf:*central-registry*? Try looking at the value of asdf:*central-registry* after you do (asdf-install:install :foo), and make sure that you're setting up asdf:*central-registry* in your init file to look like that. 17:55:49 -!- roffe [~roffe@cm-84.215.145.23.getinternet.no] has quit [Ping timeout: 264 seconds] 17:55:49 -!- roffe_ is now known as roffe 17:55:54 *rme* hopes that made sense. 17:56:02 roffe: have a look at: http://195.43.248.109/~hypno/roffe.lisp 17:56:09 that made sense. 17:56:38 now, first time around you do: (asdf-install:install :package), next time around (after say a lisp reboot), all you have to do is (RQUIRE :package) again to use it. 17:58:01 roffe.lisp is of coure nothing but .ccl-init.lisp 17:58:10 I figured as much :) 17:58:13 however 17:58:26 ; loading system definition from ccl:tools;asdf-install;asdf-install.asd.newest into # 17:58:27 ; registering # as ASDF-INSTALL 17:58:27 > Error: There is no package named "ASDF-UTILITIES" . 17:59:11 i've never seen that one. is that with asdf2 or with some leading edge stuff? 17:59:31 I have ccl 1.5 fresh from svn 17:59:38 which probably is significant 17:59:54 it shoudl come with asdf2 but as far as I can see doesn't 18:00:02 ah. perhaps. i still only use 1.3 and 1.4 :/ 18:00:11 mm. 18:02:04 roffe: did you ever try to install updated asdf or asdf-install via asdf-install? look in home:.asdf-install-dir;systems; and if asdf or asdf-install is there, please remove them. 18:02:23 roffe: I thought only trunk had asdf2, but rme would know better than me. 18:03:01 I havent managed to install anything 18:03:15 I think theres a clash between ccl 1.5 and asdf/asdf2 18:04:05 roffe: Please forget all about asdf2. For what you're trying to do, whatever's bundled with ccl 1.5 will work fine. 18:04:43 sure but 18:04:53 in my ~/.asdf-install-dir/ 18:05:11 there is no mention of asdf at all, so with hypnos init file, there should be no hint of asdf2. 18:05:26 however 18:05:32 with hypnos init file, I do get the error message 18:05:50 > Error: There is no package named "ASDF-UTILITIES" . 18:07:27 it isn't some special package that needs to be installed? ie (asdf-install:install :asdf-utilities)? long hot, but worth a try perhaps, heh. 18:07:50 hypno: no 18:08:16 roffe: if you start up with "ccl -n" and immediately do "(require 'asdf)" do you get the error message? 18:09:16 no 18:10:18 (asdf:oos 'asdf:load-op 'asdf-install) 18:10:21 ^ culprit 18:11:40 did you do (push "ccl:tools;asdf-install;" asdf:*central-registry*) prior to that? 18:11:44 roffe pasted "asdf/ccl 1.5" at http://paste.lisp.org/display/99189 18:12:30 rme: yes 18:12:44 I'm using hypnos init file verbatim 18:13:21 roffe: try removing all the fasl files from ccl:tools; and ccl;tools;asdf-install; 18:16:41 roffe annotated #99189 "untitled" at http://paste.lisp.org/display/99189#1 18:16:50 that didnt go too well 18:20:51 roffe: It looks like the files in ccl:tools; have been modified. To restore them, cd /path/to/ccl/tools and do "svn revert -R ." 18:21:45 not enough arguments provided 18:22:02 don't forget the "." 18:24:17 that was the patch to installer.lisp that I applied yesterday ... 18:24:39 but oh 18:24:48 now I'm just told that :swank isnt installed 18:24:58 which should come as no surpise to anybody 18:25:25 installing swank 18:25:42 that patch is needed to make asdf-install compatible with asdf2. but you've forgotten all about asdf2, right? 18:26:25 i dont even know what you're talking about 18:26:35 seems that everyhting works the way it should now 18:26:39 knock on wood 18:27:28 can I admit laziness now and ask two silly questions= 18:27:30 ? 18:28:38 btw, everything works now and I'm a happy lisper! thanks a lot! 18:34:43 whew! success at last. 18:35:13 yes. we fought long and hard. 18:35:31 two things I wonder about though 18:35:56 I have this csv.lisp library.. where do I dump it so I can just say (require 'csv)? 18:49:06 roffe: I'd just load (load "/path/to/csv.lisp"). 18:49:20 oki 18:50:34 If you don't like that, I think you can push a directory pathname onto ccl:*module-search-path*. 18:59:24 anRch [~markmilli@64.134.69.171] has joined #ccl 19:03:20 -!- milanj [~milanj_@79.101.180.191] has quit [Ping timeout: 246 seconds] 19:08:13 milanj [~milanj_@79.101.220.18] has joined #ccl 20:03:28 -!- lisppaste5 [~lisppaste@common-lisp.net] has quit [Quit: Want lisppaste5 in your channel? Email lisppaste-requests AT common-lisp.net.] 20:03:33 lisppaste5 [~lisppaste@common-lisp.net] has joined #ccl 20:12:25 -!- anRch [~markmilli@64.134.69.171] has quit [Quit: anRch] 20:43:45 -!- alms [~alms@2002:4855:eb9a:0:219:e3ff:feda:a4c0] has quit [Quit: alms] 21:23:31 -!- sellout [~greg@2002:4855:eb9a:0:21d:4fff:fefe:c504] has quit [Quit: sellout] 21:47:46 -!- milanj [~milanj_@79.101.220.18] has quit [Ping timeout: 264 seconds] 21:51:30 sellout [~greg@c-24-128-48-180.hsd1.ma.comcast.net] has joined #ccl 22:05:59 roffe_ [~roffe@cm-84.215.145.23.getinternet.no] has joined #ccl 22:08:23 -!- roffe [~roffe@cm-84.215.145.23.getinternet.no] has quit [Ping timeout: 260 seconds] 22:08:23 -!- roffe_ is now known as roffe 22:24:31 -!- roffe [~roffe@cm-84.215.145.23.getinternet.no] has quit [Ping timeout: 268 seconds] 22:25:45 -!- gz_ [~gz@2002:4855:eb9a:0:21e:c2ff:fe0f:2d89] has quit [Quit: gz_] 23:35:54 alms [~alms@146-115-42-237.c3-0.bkl-ubr1.sbo-bkl.ma.cable.rcn.com] has joined #ccl