00:00:37 -!- corruptmemory [~jim@96.246.167.18] has quit [Ping timeout: 255 seconds] 00:03:10 NihilistDandy [~ND@c-75-69-129-101.hsd1.nh.comcast.net] has joined #lisp 00:03:52 -!- mrSpec [~Spec@unaffiliated/mrspec] has quit [Quit: mrSpec] 00:04:57 -!- pnkfelix [~Adium@c-68-38-142-34.hsd1.nj.comcast.net] has quit [Quit: Leaving.] 00:06:15 -!- Xach [~xach@pdpc/supporter/professional/xach] has left #lisp 00:07:05 -!- RaceCondition [~erik@82.131.60.32.cable.starman.ee] has quit [Read error: Connection reset by peer] 00:10:43 -!- jweiss_ [~jweiss@cpe-069-134-009-048.nc.res.rr.com] has quit [Ping timeout: 265 seconds] 00:17:29 -!- yvdriess [~Beef@83.101.33.137] has quit [Quit: Leaving] 00:18:08 -!- mascotte [p.scott@AClermont-Ferrand-651-1-18-225.w86-194.abo.wanadoo.fr] has quit [Quit: Quitte] 00:18:38 MetalDust_Clouds [~metaldust@75-32-203-61.lightspeed.ftwotx.sbcglobal.net] has joined #lisp 00:19:06 xan_ [~xan@245.Red-79-157-129.dynamicIP.rima-tde.net] has joined #lisp 00:21:25 * stassats` never had a use yet for method combinations other than the standard <-- weblocks uses the + combination in a few places, to let you add things to the standard response 00:22:21 -!- lurker-x [~androirc@c-75-72-99-111.hsd1.mn.comcast.net] has quit [Quit: bye...] 00:22:35 Marcux [~Adium@189.121.111.41] has joined #lisp 00:23:14 generally, protocols are a likely place to need non-standard method combinations 00:23:15 morlos [~morlos@cpe-76-171-76-155.socal.res.rr.com] has joined #lisp 00:24:05 panike [~nwp@adsl-76-204-94-82.dsl.mdsnwi.sbcglobal.net] has joined #lisp 00:25:51 pizzledizzle [~pizdets@pool-96-250-215-244.nycmny.fios.verizon.net] has joined #lisp 00:25:56 His Kennyness has made some cool use of the append combination. 00:25:57 -!- panike [~nwp@adsl-76-204-94-82.dsl.mdsnwi.sbcglobal.net] has left #lisp 00:27:56 zomgbie [~jesus@85-127-207-138.dynamic.xdsl-line.inode.at] has joined #lisp 00:29:57 -!- sineer [~cluster@184.163.30.58] has quit [Quit: sineer] 00:30:00 -!- Sprayzor [~user@82.159.115.173.dyn.user.ono.com] has quit [Read error: Connection reset by peer] 00:30:43 -!- cheez [~Adium@206-248-177-146.dsl.teksavvy.com] has quit [Quit: Leaving.] 00:31:02 -!- morlos [~morlos@cpe-76-171-76-155.socal.res.rr.com] has quit [Quit: morlos] 00:37:15 cheez [~Adium@206-248-177-146.dsl.teksavvy.com] has joined #lisp 00:37:56 -!- cheez [~Adium@206-248-177-146.dsl.teksavvy.com] has quit [Client Quit] 00:40:00 I use + combination in conjunction with gigamonkey's binary-data for my iso-media library 00:46:04 -!- silentbicycle [~scott@99-55-246-143.lightspeed.gdrpmi.sbcglobal.net] has quit [Remote host closed the connection] 00:47:10 -!- xan_ [~xan@245.Red-79-157-129.dynamicIP.rima-tde.net] has quit [Read error: Operation timed out] 00:49:32 xan_ [~xan@245.Red-79-157-129.dynamicIP.rima-tde.net] has joined #lisp 00:50:44 attila_lendvai [~attila_le@catv-80-98-24-21.catv.broadband.hu] has joined #lisp 00:53:30 -!- _s1gma [~herpderp@77.107.164.131] has quit [Quit: Leaving] 00:53:50 -!- urandom__ [~user@p548A6874.dip.t-dialin.net] has quit [Remote host closed the connection] 00:54:58 -!- |nix| [~user@66-194-253-20.static.twtelecom.net] has quit [Remote host closed the connection] 00:58:59 mudzone [~user@70.49.246.118] has joined #lisp 00:59:10 -!- HG` [~HG@xdsler155.osnanet.de] has quit [Quit: Leaving.] 00:59:21 Kruppe [~user@CPE00222d128ba2-CM00222d128b9e.cpe.net.cable.rogers.com] has joined #lisp 01:00:10 oh man, MINPACK's LMDIF1 apparently assumes I can evaluate my function for arbirtary points 01:00:16 which I can't, since I only have samples 01:01:27 hmm, no 01:02:19 -!- adu [~ajr@pool-173-79-54-138.washdc.fios.verizon.net] has quit [Quit: adu] 01:02:35 |nix| [~user@pool-71-245-153-83.albyny.east.verizon.net] has joined #lisp 01:04:13 adu [~ajr@pool-173-79-54-138.washdc.fios.verizon.net] has joined #lisp 01:20:49 morlos [~morlos@cpe-76-171-76-155.socal.res.rr.com] has joined #lisp 01:21:58 hrm... why was I doing (intern (string-upcase ...) all this time instead of (read-from-string ...)? 01:22:39 slyrus: maybe because you don't like security vulnerabilities (: 01:22:51 also, maybe you care about the package that the symbol lands in 01:23:28 I think in this case I'm ok with read-from-string on both counts 01:24:03 macrolets... 01:24:19 -!- Marcux [~Adium@189.121.111.41] has quit [Quit: Leaving.] 01:25:35 -!- mudzone [~user@70.49.246.118] has quit [Remote host closed the connection] 01:30:11 keyvan [~keyvan@ip68-5-13-232.oc.oc.cox.net] has joined #lisp 01:30:51 beach: you around? or antifuchs ? 01:30:59 hey keyvan (: 01:31:06 hey! 01:31:27 so i got some time now, trying to set up with lisp. i grabbed quicklisp.lisp, and ive just run it through sbcl 01:31:44 cool (: 01:31:45 but its giving me a lot of.... choices. 01:32:48 what kind of choices? (: 01:32:57 i did (quicklist-quickstart:install) like i was supposed to 01:33:19 -!- ikki [~ikki@201.122.132.181] has quit [Quit: Leaving] 01:33:21 and it tells me ==== quicklisp installed ==== and i am now at the sbcl interpreter prompt it seems, (* symbol) 01:33:44 its not immediately obvious how to exit sbcl either... i actually had to kill it with a killall sbcl in another terminal last time 01:34:03 oh, ctrl-d or (exit) should both work 01:34:08 sorry if i am being too cautious but this is unknown territory for me so i figured i'll stop in here and bug you :/ heh sry 01:34:31 if it shows you the *, that means it's back at the REPL again. you should have it add itself to the sbcl configuration file, and try and install slime through it (: 01:34:43 thats odd, i tried (exit) before and it didnt work, maybe it wasnt defined in sbcl, but is in quicklisp. ctrl-d worked 01:35:08 REPL is what? lisp interperter prompt basically? 01:35:14 -!- Yuuhi [benni@p5483BA39.dip.t-dialin.net] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)] 01:35:27 yeah, we say REPL because the word "interpreter" is loaded and doesn't apply typically (: 01:36:11 ah okay. so right i thought quicklisp is supposed to install slime for me 01:36:20 REPL is short for read eval print loop (: 01:36:30 ive never used emacs before or anything... maybe i should not have used quicklisp route... the abstraction/automation leaves me ignorant probably. 01:36:33 -!- Soulman [~knute@166.80-202-254.nextgentel.com] has left #lisp 01:36:48 oh, no - check out the quicklisp intro: http://www.quicklisp.org/beta/ 01:37:22 it is all optional, so you have to enter commands in order to get the desired outcome... quicklisp just gives you a very high probability of success (: 01:37:23 fantazo [~fantazo@178-191-171-197.adsl.highway.telekom.at] has joined #lisp 01:37:45 <|nix|> keyvan: I agree. Quick lisp spoon feeds you. 01:37:56 nah, the automation route is pretty much ok, IMHO. if you didn't go that route, we'd have to tell you about symlinks now 01:38:13 <|nix|> if you really want to learn do the painful stuff 01:38:14 and how where you place them causes your lisp to find stuff randomly 01:38:52 "you should have it add itself to the sbcl configuration file, and try and install slime through it (:" so i suppose i can do (ql:add-to-init-file) and (ql:quickload "quicklisp-slime-helper") to accomplish those ? 01:39:10 i should not have quit quicklisp dam 01:39:11 thats ok 01:39:13 I absolutely don't agree with |nix|. I think it's better to learn how stuff works using M-. in slime ("edit definition"), not by being forced to install stuff that breaks half way down the road 01:39:14 -!- leifw [~leif@ool-18bac6ad.dyn.optonline.net] has quit [Ping timeout: 240 seconds] 01:39:42 yeah, this looks way too complex, id rather learn by doing the challenge i'd been given 01:39:52 in lisp, than fixing problems just installing my environment, ugh 01:40:00 exactly (: 01:40:22 damn ql not found 01:40:27 o lawwwd. lets see what i missed... 01:40:37 Guest86321 [~Adium@he190123.dsl.fsr.net] has joined #lisp 01:40:54 keyvan: ah... you can either re-run the installation or (load "~/quicklisp/quicklisp/setup") 01:41:14 then (ql:add-to-init-file) and it'll add quicklisp to your init file 01:41:19 (so you don't have to run the load again 01:41:43 <|nix|> well whatever works 01:41:52 as soon as i sbcl --load setup.lisp it invokes a SB-KERNEL:SIMPLE-PACKAGE-ERROR in thread "initial thread" 01:42:14 not sure if i can ignore, ill try running ql stuff now 01:42:39 yeah ql not found, i'll re-run the installer 01:43:18 AntiSpamMeta [~MetaBot@unaffiliated/afterdeath/bot/antispambot] has joined #lisp 01:43:26 so whats this syntax construction anyway 01:43:32 (something:something-else) 01:43:36 the colon is what in lisp? 01:43:58 <|nix|> package:symbol 01:43:58 The full name of a symbol, including the package. 01:44:06 <|nix|> (package:symbol) 01:44:21 -!- hargettp [~hargettp@pool-71-184-184-49.bstnma.east.verizon.net] has quit [Quit: Leaving...] 01:44:52 okay i must learn the concept of a package... grr still running into problems here. gonna try deleting my quicklisp installation 01:46:01 :] 01:46:39 <|nix|> keyvan: what other languages have you used? 01:46:53 Spion__ [~spion@77.29.250.12] has joined #lisp 01:47:00 yay, some code was appended to my .sbclrc 01:47:14 -!- Spion_ [~spion@unaffiliated/spion] has quit [Ping timeout: 240 seconds] 01:47:18 cool 01:47:22 |nix|: ruby... lots of ruby. and php... some python, some c/c++ 01:47:35 now if you start another sbcl, it should get you quicklisp built-in (: 01:47:47 *keyvan* thinks "whatever quicklisp is" 01:47:49 :P 01:47:52 -!- attila_lendvai [~attila_le@catv-80-98-24-21.catv.broadband.hu] has quit [Ping timeout: 265 seconds] 01:47:52 hah 01:48:07 okay so im going to load the quicklisp slime helper too before i quit quicklisp 01:48:14 however i dont have slime or anything installed ? 01:48:16 so i dunno 01:48:32 appears its downloading slime. 01:49:10 billitch [~billitch@men75-12-88-183-197-206.fbx.proxad.net] has joined #lisp 01:49:21 attila_lendvai [~attila_le@catv-80-98-24-21.catv.broadband.hu] has joined #lisp 01:49:32 need to install emacs XD 01:49:44 i hope its not too different from vim... 01:50:04 <|nix|> keyvan: packages are like namespace in c++. they hold a bunch of symbols 01:50:24 ah okay that makes sense. like in Ruby Something::SomeOtherThing 01:50:39 <|nix|> yup 01:50:47 i was at the bookstore looking for lisp material 01:50:52 there was absolutely nil 01:50:55 <|nix|> but lisp also has (package::symbol) 01:51:23 symbol seems like a concept that includes variable and symbol (in ruby) 01:51:30 like ruby has :symbol 01:51:34 and normal variable 01:51:47 but in lisp its like everything, variables or symbols (in the ruby sense) are just symbols... 01:52:03 i dunno... this is why i need to use lisp, expand my mind a bit 01:52:32 the program i need to write shouldnt be that difficult either... i need to prove i can do it to someone 01:52:34 yeah, symbols in lisp name stuff 01:52:45 they can name a variable or a function or many other things 01:53:00 it's just a way to get from a namespaced name to an identity (: 01:53:06 do we have variables too then? 01:53:16 or do we just tie our symbol to values or something? 01:53:48 We do both! 01:53:54 right (: 01:54:10 We have "constant variables", "special variables" and "lexical variables". 01:54:20 nyef you just blew my mind, sorry. 01:54:29 you can bind variables temporarily (using let and its cousins), or set the global symbol value of something 01:54:35 And the constant and special variables involve binding (tying) the symbols to values. 01:54:47 ah ive seen (let 01:54:55 and (set 01:55:05 i know how to use set, its to set a symbol to something else 01:55:25 mmmh, not quite 01:55:27 but it didnt work as expected in the RDPL so im not sure 01:55:32 are you using some sort of intro textbook? (: 01:55:50 nah the tiny bit i know about lisp is from this lengthy article from the creator of weblocks 01:55:59 http://www.defmacro.org/ramblings/lisp.html 01:56:02 minion: Tell keyvan about that-dead-sexy-book. 01:56:03 keyvan: direct your attention towards that-dead-sexy-book: pcl-book: "Practical Common Lisp", an introduction to Common Lisp by Peter Seibel, available at http://www.gigamonkeys.com/book/ and in dead-tree form from Apress (as of 11 April 2005). 01:56:17 SET is actually a very specific setter thing. the general mechanism is SETF. Practical Common Lisp will tell you all about it 01:56:36 nice ! thanks 01:57:04 (Wow, though... SET? Really? Does anyone actually /use/ that?) 01:57:26 whoa i thought emacs was in my terminal...... but its not. 01:57:38 <|nix|> :D 01:57:55 nobody..... uses..... set ? 01:57:56 lol 01:58:18 guys am i using the wrong emacs or something? i thought it was in a terminal 01:58:20 this looks pretty cool 01:58:46 <|nix|> keyvan: no no youre good 01:59:04 ok cool i just stuck (load (expand-file-name "~/quicklisp/slime-helper.el")) into a .emacs file in my homedir 01:59:08 looks like im ready 01:59:34 You might find http://lists.warhead.org.uk/pipermail/iwe/2005-July/000130.html to be interesting, for perspective on how assignment works in lisp. 02:01:13 -!- orivej [~orivej@95-24-190-192.broadband.corbina.ru] has quit [Ping timeout: 255 seconds] 02:01:53 ok nyef thanks 02:02:59 <|nix|> nyef: Does the link work? 02:03:07 works for me 02:03:36 yep 02:03:56 <|nix|> strange doesnt work for me 02:04:10 orivej [~orivej@95-24-190-192.broadband.corbina.ru] has joined #lisp 02:04:59 -!- gemelen [~shelta@shpd-95-53-176-142.vologda.ru] has quit [Ping timeout: 276 seconds] 02:06:24 -!- Spion__ [~spion@77.29.250.12] has quit [Remote host closed the connection] 02:06:50 one last thing and i'll leave you guys alone 02:07:00 Where are you slime?!?! 02:07:00 <|nix|> nm 02:07:32 -!- AntiSpamMeta [~MetaBot@unaffiliated/afterdeath/bot/antispambot] has quit [Remote host closed the connection] 02:07:34 <|nix|> wierd vpn issues 02:08:10 oh there it is found you! 02:08:58 lurker-x [~androirc@32.168.13.178] has joined #lisp 02:09:01 -!- orivej [~orivej@95-24-190-192.broadband.corbina.ru] has quit [Ping timeout: 240 seconds] 02:09:18 orivej [~orivej@95-24-190-192.broadband.corbina.ru] has joined #lisp 02:09:43 okay i will mess with this, thanks for getting me further antifuchs, |nix| 02:09:49 until next time :D 02:09:54 -!- lurker-x [~androirc@32.168.13.178] has quit [Client Quit] 02:09:55 and nyef 02:09:56 keyvan: good luck! 02:10:17 lurker-x [~androirc@32.168.13.178] has joined #lisp 02:10:33 AntiSpamMeta [~MetaBot@unaffiliated/afterdeath/bot/antispambot] has joined #lisp 02:10:52 -!- lurker-x [~androirc@32.168.13.178] has quit [Client Quit] 02:11:30 lurker-x [~androirc@32.168.13.178] has joined #lisp 02:13:30 -!- pankajm [~pankajm@202.3.77.219] has quit [Ping timeout: 240 seconds] 02:14:09 Hexstream [~hexstream@modemcable075.97-200-24.mc.videotron.ca] has joined #lisp 02:14:35 Hum. In SBCL, (let ((this 0)) (loop repeat 2 for test = this then 1 for this = 2 collect test)) => (NIL 1). Is this considered correct? Would it better if this was => (0 1) in the style of DO*? 02:16:02 |nix|` [~user@pool-71-245-153-83.albyny.east.verizon.net] has joined #lisp 02:16:02 -!- |nix| [~user@pool-71-245-153-83.albyny.east.verizon.net] has quit [Read error: No route to host] 02:16:10 Hexstream: That... does seem a little odd. 02:16:23 Though I'm not sure if it's actually proscribed behavior on behalf of SBCL. 02:16:31 -!- lurker-x [~androirc@32.168.13.178] has quit [Ping timeout: 255 seconds] 02:16:48 *nyef* has never been good at lawyering the LOOP spec. 02:17:12 Because it's too complex!!@11 02:19:07 -!- ace4016 [ace4016@adsl-32-14-100.mia.bellsouth.net] has quit [Ping timeout: 245 seconds] 02:19:50 -!- xan_ [~xan@245.Red-79-157-129.dynamicIP.rima-tde.net] has quit [Ping timeout: 240 seconds] 02:20:15 -!- gigamonkey [~user@adsl-99-155-193-226.dsl.pltn13.sbcglobal.net] has quit [Ping timeout: 265 seconds] 02:20:37 leifw [~leif@ool-18bac6ad.dyn.optonline.net] has joined #lisp 02:21:42 gonzojive [~red@c-71-198-7-84.hsd1.ca.comcast.net] has joined #lisp 02:22:25 kpreid [~kpreid@128.153.214.128] has joined #lisp 02:22:53 -!- rasterbar [~rasterbar@unaffiliated/rasterbar] has quit [Remote host closed the connection] 02:22:54 -!- Hexstream [~hexstream@modemcable075.97-200-24.mc.videotron.ca] has left #lisp 02:23:55 ace4016 [~ace4016@adsl-32-124-64.mia.bellsouth.net] has joined #lisp 02:27:09 rasterbar [~rasterbar@unaffiliated/rasterbar] has joined #lisp 02:28:04 hargettp [~hargettp@pool-71-184-184-49.bstnma.east.verizon.net] has joined #lisp 02:32:50 -!- leifw [~leif@ool-18bac6ad.dyn.optonline.net] has quit [Ping timeout: 240 seconds] 02:34:21 -!- leo2007 [~leo@120.33.24.178] has quit [Ping timeout: 240 seconds] 02:34:57 -!- manugupt1 [~manugupt1@opensuse/member/manugupt1] has quit [Quit: Leaving] 02:35:14 -!- sellout [~Adium@c-24-61-13-161.hsd1.ma.comcast.net] has quit [Ping timeout: 240 seconds] 02:41:38 tmh [639725e8@pdpc/supporter/sustaining/tmh] has joined #lisp 02:41:44 sellout [~Adium@c-24-61-13-161.hsd1.ma.comcast.net] has joined #lisp 02:41:44 Hello. 02:41:59 Hello. 02:44:08 -!- rasterbar [~rasterbar@unaffiliated/rasterbar] has quit [Remote host closed the connection] 02:45:57 When I wrap a DEFUN in a LET form to create a closure, what are the subtle points I need to keep in mind? I do this on occasion and generally don't think about it, but I'm a littler curious about the finer points at the moment. 02:49:48 -!- dfkjjkfd [~paulh@210-11-ftth.onsnetstudenten.nl] has quit [Quit: Lost terminal] 02:51:08 <|nix|`> what are the types of bindings in CL? lexical, dynamic .... 02:51:44 -!- homie [~levgue@xdsl-78-35-145-12.netcologne.de] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)] 02:55:33 -!- attila_lendvai [~attila_le@catv-80-98-24-21.catv.broadband.hu] has quit [Quit: Leaving.] 02:56:09 attila_lendvai [~attila_le@catv-80-98-24-21.catv.broadband.hu] has joined #lisp 02:56:09 -!- attila_lendvai [~attila_le@catv-80-98-24-21.catv.broadband.hu] has quit [Client Quit] 02:56:37 homie [~levgue@xdsl-78-35-145-12.netcologne.de] has joined #lisp 02:56:58 lurker-x [~androirc@c-75-72-99-111.hsd1.mn.comcast.net] has joined #lisp 02:59:35 Inixl`: check out section 3.1.1 of the hyperspec 02:59:38 manugupt1 [~manugupt1@opensuse/member/manugupt1] has joined #lisp 03:00:16 |nix|`: http://www.lispworks.com/documentation/HyperSpec/Body/03_aa.htm 03:00:24 <|nix|`> hargettp: got it thank you.... 03:01:38 MetalDust2 [~metaldust@75-32-203-61.lightspeed.ftwotx.sbcglobal.net] has joined #lisp 03:02:30 <|nix|`> what does (ignore var) do 03:03:02 <|nix|`> and where would one use it 03:03:11 |nix|`: That needs to be in a DECLARE form. It's a compiler hint that will suppress compiler warnings about unused variables. 03:03:33 <|nix|`> aha got it... 03:04:36 -!- MetalDust_Clouds [~metaldust@75-32-203-61.lightspeed.ftwotx.sbcglobal.net] has quit [Ping timeout: 272 seconds] 03:05:16 I am trying to solve I need to have a function (combine-expr '+ 3 '(5 - 6 * 8)) , how do I solve it 03:05:39 manugupt1: You need to get your hands on a copy of PAIP. 03:05:48 minion: tell manugupt1 about PAIP 03:05:49 manugupt1: please look at PAIP: Paradigms of Artificial Intelligence Programming: Case Studies in Common Lisp by Peter Norvig. http://www.cliki.net/PAIP 03:06:45 M-sprite [~M-sprite@60.183.215.22] has joined #lisp 03:07:12 tmh: re DEFUN in LET, the #1 thing is that the compiler will not be aware of the static existence of the function (LET does not preserve top-level-form-ness) 03:07:38 -!- |nix|` [~user@pool-71-245-153-83.albyny.east.verizon.net] has quit [Ping timeout: 240 seconds] 03:08:35 kpreid: Thanks, I knew that not be top-level was important, just not how. 03:09:19 tmh, minion thanks 03:09:51 I was trying it this way (defun obj (a b c) (a b (first 'c)) but I get a should be a lambda expression 03:10:25 |nix|` [~user@pool-71-245-153-83.albyny.east.verizon.net] has joined #lisp 03:10:49 sm` [s@77.29.16.181] has joined #lisp 03:16:25 -!- |nix|` [~user@pool-71-245-153-83.albyny.east.verizon.net] has quit [Ping timeout: 260 seconds] 03:17:25 manugupt1: use funcall. 03:17:27 cheez [~Adium@206-248-177-146.dsl.teksavvy.com] has joined #lisp 03:17:34 -!- carlocci [~nes@93.37.204.143] has quit [Quit: eventually IE will rot and die] 03:17:46 and 'c returns a symbol which is not nil, therefore first will fail on it. 03:17:59 What are you thinking about? 03:24:37 gko [~gko@122-116-15-138.HINET-IP.hinet.net] has joined #lisp 03:26:10 kushal [~kdas@fedora/kushal] has joined #lisp 03:35:07 -!- dkasak [~dkasak@dh207-76-174.xnet.hr] has quit [Read error: Operation timed out] 03:35:22 pjb, I am learning clisp and following the Stuart Shapiro's book. there was this question http://pastebin.com/B107q06N 03:35:23 dkasak [~dkasak@dh207-76-174.xnet.hr] has joined #lisp 03:35:29 I was trying to solve it 03:36:24 -!- NihilistDandy [~ND@c-75-69-129-101.hsd1.nh.comcast.net] has quit [Remote host closed the connection] 03:38:08 -!- gko [~gko@122-116-15-138.HINET-IP.hinet.net] has quit [Ping timeout: 240 seconds] 03:39:01 pjb, I am also not sure I get you wholly 03:39:32 -!- M-sprite [~M-sprite@60.183.215.22] has quit [Quit: I need to code or sleep now .] 03:39:32 -!- gonzojive [~red@c-71-198-7-84.hsd1.ca.comcast.net] has quit [Quit: gonzojive] 03:42:37 gko [gko@122-116-15-138.HINET-IP.hinet.net] has joined #lisp 03:46:52 -!- hargettp [~hargettp@pool-71-184-184-49.bstnma.east.verizon.net] has quit [Quit: Leaving...] 03:47:29 leifw [~leif@ool-18bac6ad.dyn.optonline.net] has joined #lisp 03:49:25 -!- nyef [~nyef@pool-70-109-148-200.cncdnh.east.myfairpoint.net] has quit [Quit: G'night all.] 03:49:25 -!- Salamander__ [~Salamande@ppp121-45-50-81.lns20.adl2.internode.on.net] has quit [Read error: Connection reset by peer] 03:49:50 Salamander__ [~Salamande@ppp121-45-50-81.lns20.adl2.internode.on.net] has joined #lisp 03:55:32 |nix| [~user@cpe-72-226-54-44.nycap.res.rr.com] has joined #lisp 03:56:01 -!- gko [gko@122-116-15-138.HINET-IP.hinet.net] has quit [Ping timeout: 240 seconds] 03:56:16 manugupt1: Are you trying to learn common lisp or use the lisp implementation clisp? 03:57:12 tmh, I am trying to learn 03:58:01 (defun obj(o1 o2 o3)"Trial "((o1) o2 (first o3))) when I try this the object shows me no error but when I call the function (obj '+ 3 '(4 5)) I get an error showing O1 us not a function 03:58:28 -!- oconnore [~eric@ip68-230-164-105.mc.at.cox.net] has quit [Ping timeout: 240 seconds] 03:58:50 I am really sorry if I am coming up with a whole lot of stupid questions.. 03:58:52 manugupt1: Okay, generally it's referred to as common lisp or just lisp. clisp is a common lisp implementation.Why don't you use the paste utility listed in the topic? It integrates better with this room. 03:58:57 manugupt1: No problem. 04:00:12 -!- cheez [~Adium@206-248-177-146.dsl.teksavvy.com] has quit [Quit: Leaving.] 04:00:37 wakeup_ [~max@p5790F88B.dip.t-dialin.net] has joined #lisp 04:00:37 http://pastebin.com/5quiLwQP tmh 04:01:09 gko [gko@122-116-15-138.HINET-IP.hinet.net] has joined #lisp 04:01:19 hello, I'm having troubles installing clx on sbcl, I'm getting a 404 on some file 04:01:24 Server responded 404 for GET http://common-lisp.net/~abridgewater/dist/clx/clx-0.7.4.tgz.asc 04:01:51 any ideas tmh 04:02:27 manugupt1: Read up on the function APPLY. 04:02:34 minion: tell manugupt1 about apply 04:02:34 Sorry, I couldn't find anything in the database for ``apply''. 04:02:41 clhs apply 04:02:41 http://www.lispworks.com/reference/HyperSpec/Body/f_apply.htm 04:02:53 manugupt1: follow that link 04:03:14 tmh, thanks.. 04:03:59 -!- wakeup [~max@p5DE8F405.dip.t-dialin.net] has quit [Ping timeout: 255 seconds] 04:04:33 rapacity: Try it again. 04:04:51 rapacity: It just worked for me. 04:04:56 azaq231 [~derivecto@p4FF688CB.dip0.t-ipconnect.de] has joined #lisp 04:05:10 -!- azaq231 [~derivecto@p4FF688CB.dip0.t-ipconnect.de] has quit [Changing host] 04:05:10 azaq231 [~derivecto@unaffiliated/azaq23] has joined #lisp 04:05:32 hmm I got the error again 04:06:13 pankajm [~pankajm@202.3.77.219] has joined #lisp 04:07:02 when I skip the gpg check I get debugger invoked on a "SB-INT:BUG in thread # rapacity: Oh, wait, I just got the tarball. 04:08:40 do you know if clx is compatible with sbcl 1.0.45 ? 04:08:49 I haven't been able to get it to compile 04:09:17 rapacity: I've not used SBCL in a while. 04:09:24 ah 04:09:45 -!- wubo [80f40907@gateway/web/freenode/ip.128.244.9.7] has quit [Ping timeout: 245 seconds] 04:12:47 -!- tcr1 [~tcr@217-162-131-235.dynamic.hispeed.ch] has quit [Quit: Leaving.] 04:12:53 -!- timack [~tim@hlfx59-1-147.ns.sympatico.ca] has quit [Read error: Connection reset by peer] 04:14:06 gonzojive [~red@c-71-198-7-84.hsd1.ca.comcast.net] has joined #lisp 04:14:50 -!- gko [gko@122-116-15-138.HINET-IP.hinet.net] has quit [Ping timeout: 240 seconds] 04:19:04 gko [gko@122-116-15-138.HINET-IP.hinet.net] has joined #lisp 04:21:37 -!- kushal [~kdas@fedora/kushal] has quit [Ping timeout: 255 seconds] 04:22:00 NihilistDandy [~ND@c-75-69-129-101.hsd1.nh.comcast.net] has joined #lisp 04:23:48 -!- tmh [639725e8@pdpc/supporter/sustaining/tmh] has left #lisp 04:25:14 -!- sabalaba [~sabalaba@c-71-227-118-15.hsd1.mi.comcast.net] has quit [Ping timeout: 240 seconds] 04:26:09 sabalaba [~sabalaba@c-71-227-118-15.hsd1.mi.comcast.net] has joined #lisp 04:29:34 -!- sabalaba [~sabalaba@c-71-227-118-15.hsd1.mi.comcast.net] has quit [Max SendQ exceeded] 04:30:31 sabalaba [~sabalaba@c-71-227-118-15.hsd1.mi.comcast.net] has joined #lisp 04:30:58 -!- tritchey [~tritchey@c-68-51-118-114.hsd1.in.comcast.net] has quit [Quit: tritchey] 04:32:08 -!- gko [gko@122-116-15-138.HINET-IP.hinet.net] has quit [Ping timeout: 276 seconds] 04:33:16 cheez [~Adium@206-248-177-146.dsl.teksavvy.com] has joined #lisp 04:33:18 -!- Kruppe [~user@CPE00222d128ba2-CM00222d128b9e.cpe.net.cable.rogers.com] has quit [Ping timeout: 276 seconds] 04:33:45 spradnyesh [~pradyus@nat/yahoo/x-qogtmpnzxozsvqhj] has joined #lisp 04:36:18 LittleQNCCU [~littleq@dream.cs.nccu.edu.tw] has joined #lisp 04:36:20 pnq [~nick@AC83C1D8.ipt.aol.com] has joined #lisp 04:37:08 gko [gko@122-116-15-138.HINET-IP.hinet.net] has joined #lisp 04:41:44 azaq23 [~derivecto@unaffiliated/azaq23] has joined #lisp 04:43:08 -!- azaq231 [~derivecto@unaffiliated/azaq23] has quit [Ping timeout: 240 seconds] 04:43:55 ZabaQ [~Zaba@135.114-84-212.staticip.namesco.net] has joined #lisp 04:44:46 -!- fantazo [~fantazo@178-191-171-197.adsl.highway.telekom.at] has quit [Ping timeout: 265 seconds] 04:48:02 -!- ZabaQ [~Zaba@135.114-84-212.staticip.namesco.net] has quit [Ping timeout: 240 seconds] 04:49:44 -!- gko [gko@122-116-15-138.HINET-IP.hinet.net] has quit [Ping timeout: 272 seconds] 04:55:18 gko [gko@122-116-15-138.HINET-IP.hinet.net] has joined #lisp 04:55:55 adamvh [~adamvh@pool-71-179-82-48.bltmmd.fios.verizon.net] has joined #lisp 04:56:27 fantazo [~fantazo@178-191-170-84.adsl.highway.telekom.at] has joined #lisp 04:58:13 rapacity: Did you use quicklisp to get CLX? 04:58:38 what's quicklisp? d: 04:58:51 I used asdf on sbcl 04:59:03 minion: Please tell rapacity about quicklisp. 04:59:04 rapacity: have a look at quicklisp: Quicklisp aims to make it easy to get started with a rich set of community-developed Common Lisp libraries. http://www.cliki.net/quicklisp 04:59:22 rapacity: This is the preferred way of installing libraries these days. 05:00:05 aha, thanks ! :D I'll try it out 05:06:06 -!- zomgbie [~jesus@85-127-207-138.dynamic.xdsl-line.inode.at] has quit [Ping timeout: 250 seconds] 05:08:13 scottj [~scott@206.212.250.58] has joined #lisp 05:08:52 -!- gko [gko@122-116-15-138.HINET-IP.hinet.net] has quit [Ping timeout: 255 seconds] 05:09:41 Phoodus [~foo@ip68-231-47-70.ph.ph.cox.net] has joined #lisp 05:13:00 gko [gko@122-116-15-138.HINET-IP.hinet.net] has joined #lisp 05:15:11 -!- homie [~levgue@xdsl-78-35-145-12.netcologne.de] has quit [Ping timeout: 246 seconds] 05:17:36 -!- lolsuper_ [~super_@unaffiliated/lolsuper-/x-9881387] has quit [Read error: Connection reset by peer] 05:17:51 homie [~levgue@xdsl-78-35-173-136.netcologne.de] has joined #lisp 05:18:23 lolsuper_ [~super_@unaffiliated/lolsuper-/x-9881387] has joined #lisp 05:21:18 _danb_ [~user@124-171-12-242.dyn.iinet.net.au] has joined #lisp 05:22:26 -!- leifw [~leif@ool-18bac6ad.dyn.optonline.net] has quit [Ping timeout: 240 seconds] 05:26:05 -!- gko [gko@122-116-15-138.HINET-IP.hinet.net] has quit [Ping timeout: 276 seconds] 05:30:51 hmm didn't work :< 05:31:12 gko [gko@122-116-15-138.HINET-IP.hinet.net] has joined #lisp 05:31:30 still getting "debugger invoked on a SB-INT:BUG in thread # is there any way to view what flags sbcl was compiled with? 05:36:45 <_3b> use newer (or older) sbcl i think 05:37:25 keyvan- [~keyvan@ip68-5-13-232.oc.oc.cox.net] has joined #lisp 05:39:12 I'll use an older version as a last resort 05:39:33 rapacity: What's your .emacs look like? 05:39:42 null 05:40:11 Irrelevant, anyway. I was thinking of the wrong thing :D 05:40:13 Sorry 05:40:18 :p it's ok 05:40:49 What version of SBCL are you using? 05:41:03 1.0.45 x86_64, from teh archlinux repos 05:41:49 -!- juniorroy [~juniorroy@212.36.224.57] has left #lisp 05:44:10 Quicklisp should do it, then 05:44:17 -!- gko [gko@122-116-15-138.HINET-IP.hinet.net] has quit [Ping timeout: 276 seconds] 05:44:27 Oh, wait 05:44:44 Nevermind. Just tried it. Broken. :( 05:47:42 -!- adamvh [~adamvh@pool-71-179-82-48.bltmmd.fios.verizon.net] has quit [Quit: adamvh] 05:49:10 ah so clx is broken for you as well? 05:50:34 Seems so. Same version of SBCL 05:50:47 It seems to break on xlib 05:50:52 thanks 05:51:10 now I can begin crying :p 05:51:28 and well stop trying :p 05:51:37 lol 05:53:19 <_3b> sbcl is/was broken, not clx 05:53:31 <_3b> (same effect, just different solution) 05:54:11 -!- keyvan- [~keyvan@ip68-5-13-232.oc.oc.cox.net] has quit [Remote host closed the connection] 05:54:53 eck mmm maybe I'll try clisp 05:56:29 -!- pizzledizzle [~pizdets@pool-96-250-215-244.nycmny.fios.verizon.net] has quit [] 05:57:06 -!- NihilistDandy [~ND@c-75-69-129-101.hsd1.nh.comcast.net] has quit [Remote host closed the connection] 06:00:53 keyvan- [~keyvan@ip68-5-13-232.oc.oc.cox.net] has joined #lisp 06:01:27 -!- dmiles_afk [~dmiles@66.243.225.8] has quit [Quit: Read error: 110 (Connection timed out)] 06:01:31 -!- specbot [~specbot@common-lisp.net] has quit [Remote host closed the connection] 06:01:32 -!- minion [~minion@common-lisp.net] has quit [Remote host closed the connection] 06:01:32 -!- lisppaste [~lisppaste@common-lisp.net] has quit [Remote host closed the connection] 06:02:02 dmiles_afk [~dmiles@66.243.225.8] has joined #lisp 06:06:10 leifw [~leif@ool-18bac6ad.dyn.optonline.net] has joined #lisp 06:11:08 lisppaste [~lisppaste@common-lisp.net] has joined #lisp 06:11:38 minion [~minion@common-lisp.net] has joined #lisp 06:11:43 specbot [~specbot@common-lisp.net] has joined #lisp 06:12:53 _3b: What is broken about SBCL? 06:16:17 <_3b> something to do with dynamic extent if i remember right 06:17:53 <_3b> beach: see http://thread.gmane.org/gmane.lisp.steel-bank.devel/15480 06:17:59 rapacity: sbcl 1.0.44 doesn't have that bug, I guess you could use that 06:18:39 _3b: Thanks! 06:26:47 -!- lurker-x [~androirc@c-75-72-99-111.hsd1.mn.comcast.net] has quit [Quit: bye...] 06:27:51 hmm thanks, I'll try that 06:30:27 mega1 [~quassel@catv4E5CABA2.pool.t-online.hu] has joined #lisp 06:31:56 mega1` [~user@catv4E5CABA2.pool.t-online.hu] has joined #lisp 06:42:55 -!- keyvan- [~keyvan@ip68-5-13-232.oc.oc.cox.net] has quit [Remote host closed the connection] 06:48:26 nikodemus [~nikodemus@cs181199216.pp.htv.fi] has joined #lisp 06:50:48 CyanDynamo [~Steven@71-208-210-104.hlrn.qwest.net] has joined #lisp 06:52:08 thanks! it worked :p 06:52:22 hah, *phew* 06:56:47 -!- srolls [~user@c-76-126-212-192.hsd1.ca.comcast.net] has quit [Remote host closed the connection] 06:57:18 -!- tronador_ [~guille@190.67.59.189] has quit [Quit: tronador_] 06:59:31 jewel [~jewel@196-215-16-138.dynamic.isadsl.co.za] has joined #lisp 07:06:02 -!- leifw [~leif@ool-18bac6ad.dyn.optonline.net] has quit [Ping timeout: 240 seconds] 07:18:24 -!- Euthydemus [~euthydemu@vaxjo7.80.cust.blixtvik.net] has quit [Read error: Connection reset by peer] 07:18:51 Euthydemus [~euthydemu@vaxjo7.80.cust.blixtvik.net] has joined #lisp 07:24:46 -!- ozzloy [~ozzloy@unaffiliated/ozzloy] has quit [Ping timeout: 255 seconds] 07:25:08 ozzloy [~ozzloy@unaffiliated/ozzloy] has joined #lisp 07:27:29 nostoi [~nostoi@71.Red-80-39-205.dynamicIP.rima-tde.net] has joined #lisp 07:38:08 -!- rgrau [~user@62.Red-88-2-20.staticIP.rima-tde.net] has quit [Remote host closed the connection] 07:40:46 extra11 [~extra11@c-24-125-178-151.hsd1.va.comcast.net] has joined #lisp 07:44:23 -!- scottj [~scott@206.212.250.58] has quit [Quit: leaving] 07:45:07 hun [~user@91-65-90-50-dynip.superkabel.de] has joined #lisp 07:46:40 freddie111 [~user@150.140.233.217] has joined #lisp 07:49:14 -!- hun [~user@91-65-90-50-dynip.superkabel.de] has quit [Ping timeout: 240 seconds] 07:50:25 mrSpec [~Spec@88.208.105.6] has joined #lisp 07:50:25 -!- mrSpec [~Spec@88.208.105.6] has quit [Changing host] 07:50:25 mrSpec [~Spec@unaffiliated/mrspec] has joined #lisp 07:56:52 -!- nikodemus [~nikodemus@cs181199216.pp.htv.fi] has quit [Quit: This computer has gone to sleep] 07:58:47 -!- manugupt1 [~manugupt1@opensuse/member/manugupt1] has quit [Ping timeout: 240 seconds] 07:59:39 -!- morlos [~morlos@cpe-76-171-76-155.socal.res.rr.com] has quit [Quit: morlos] 08:00:12 morlos [~morlos@cpe-76-171-76-155.socal.res.rr.com] has joined #lisp 08:04:42 mascotte [~mascotte_@AClermont-Ferrand-651-1-18-225.w86-194.abo.wanadoo.fr] has joined #lisp 08:11:53 -!- extra11 [~extra11@c-24-125-178-151.hsd1.va.comcast.net] has quit [Read error: Connection reset by peer] 08:14:16 stis [~stis@1-1-1-39a.veo.vs.bostream.se] has joined #lisp 08:14:38 -!- parcs [~patrick@ool-45741d7d.dyn.optonline.net] has quit [Read error: Connection reset by peer] 08:14:45 -!- AntiSpamMeta [~MetaBot@unaffiliated/afterdeath/bot/antispambot] has quit [Quit: going to moon brb] 08:15:03 parcs [~patrick@ool-45741d7d.dyn.optonline.net] has joined #lisp 08:15:18 eugu [~Miranda@213.141.157.147] has joined #lisp 08:16:10 splittist [~IceChat77@30-245.62-188.cust.bluewin.ch] has joined #lisp 08:16:27 morning 08:16:53 can I write a define-setf-expander that takes a variable number of values? 08:17:05 AntiSpamMeta [~MetaBot@unaffiliated/afterdeath/bot/antispambot] has joined #lisp 08:18:39 -!- nostoi [~nostoi@71.Red-80-39-205.dynamicIP.rima-tde.net] has quit [Quit: Verlassend] 08:18:46 slyrus: the lambda list supports destructuring... 08:19:44 yeah, but the incoming values come into the store variables, right? I, perhaps mistakenly, seem to want a variable number of those... 08:19:55 xan_ [~xan@245.Red-79-157-129.dynamicIP.rima-tde.net] has joined #lisp 08:23:31 (setf (foo 1 2 3) (values 4 5 6)) <- 1 2 3 come in on the lambda list, 4, 5 and 6 go to the store variables 08:23:57 if it's a fixed number of values, I can handle it, but i can't wrap my arms around how to allow for a variable number of values 08:24:19 is this just ... wrong? 08:24:43 insomniaSalt [~milan@port-92-204-90-254.dynamic.qsc.de] has joined #lisp 08:27:04 mishoo [~mishoo@79.112.237.60] has joined #lisp 08:27:50 -!- insomnia1alt [~milan@port-92-204-86-166.dynamic.qsc.de] has quit [Ping timeout: 240 seconds] 08:30:29 -!- adu [~ajr@pool-173-79-54-138.washdc.fios.verizon.net] has quit [Quit: adu] 08:31:38 -!- mega1` [~user@catv4E5CABA2.pool.t-online.hu] has quit [Ping timeout: 240 seconds] 08:31:38 -!- mega1 [~quassel@catv4E5CABA2.pool.t-online.hu] has quit [Ping timeout: 240 seconds] 08:34:36 -!- mishoo [~mishoo@79.112.237.60] has quit [Quit: be back later] 08:34:44 mishoo [~mishoo@79.112.237.60] has joined #lisp 08:39:11 -!- pchrist [~spirit@gentoo/developer/pchrist] has quit [Quit: leaving] 08:39:18 I'd be happy with a fixed number of store variables, if I knew how to ignore the unused ones... 08:39:47 pchrist [~spirit@gentoo/developer/pchrist] has joined #lisp 08:41:26 -!- freddie111 [~user@150.140.233.217] has quit [Remote host closed the connection] 08:42:23 -!- pnq [~nick@AC83C1D8.ipt.aol.com] has quit [Ping timeout: 246 seconds] 08:46:17 -!- setmeaway [setmeaway3@183.106.96.22] has quit [Quit: Leaving] 08:49:35 -!- jewel [~jewel@196-215-16-138.dynamic.isadsl.co.za] has quit [Quit: Leaving] 08:50:27 daniel___ [~daniel@p5B326E6B.dip.t-dialin.net] has joined #lisp 08:51:59 -!- daniel__ [~daniel@p5082B0D1.dip.t-dialin.net] has quit [Ping timeout: 255 seconds] 08:55:38 -!- xan_ [~xan@245.Red-79-157-129.dynamicIP.rima-tde.net] has quit [Ping timeout: 240 seconds] 08:55:55 -!- carbocalm [~user@38.99.165.166] has quit [Read error: Connection reset by peer] 08:56:10 carbocalm [~user@38.99.165.166] has joined #lisp 08:56:35 kiuma [~kiuma@93-36-13-74.ip57.fastwebnet.it] has joined #lisp 08:57:04 morning 08:57:15 hello kiuma 09:03:40 gko [~gko@122-116-15-138.HINET-IP.hinet.net] has joined #lisp 09:04:00 Zephyrus [~emanuele@unaffiliated/zephyrus] has joined #lisp 09:09:59 -!- morlos [~morlos@cpe-76-171-76-155.socal.res.rr.com] has quit [Quit: morlos] 09:12:10 dmytrish [~dmytrish@beting-proceeds.volia.net] has joined #lisp 09:14:25 silentbicycle [~scott@99-55-246-143.lightspeed.gdrpmi.sbcglobal.net] has joined #lisp 09:16:42 -!- gko [~gko@122-116-15-138.HINET-IP.hinet.net] has quit [Ping timeout: 276 seconds] 09:18:35 M-sprite [~M-sprite@60.183.203.142] has joined #lisp 09:18:44 -!- zc00gii [~zc00gii@thefacepalm.net] has quit [Ping timeout: 250 seconds] 09:19:27 zc00gii [~zc00gii@thefacepalm.net] has joined #lisp 09:21:19 gko [gko@122-116-15-138.HINET-IP.hinet.net] has joined #lisp 09:21:29 Blkt [~user@net-93-151-229-166.cust.dsl.teletu.it] has joined #lisp 09:24:07 gemelen [~shelta@shpd-95-53-171-12.vologda.ru] has joined #lisp 09:28:40 -!- gonzojive [~red@c-71-198-7-84.hsd1.ca.comcast.net] has quit [Quit: gonzojive] 09:29:03 setmeaway [~setmeaway@183.106.96.22] has joined #lisp 09:33:52 ehu [~ehuels@ip118-64-212-87.adsl2.static.versatel.nl] has joined #lisp 09:34:11 -!- gko [gko@122-116-15-138.HINET-IP.hinet.net] has quit [Ping timeout: 246 seconds] 09:38:19 gko [gko@122-116-15-138.HINET-IP.hinet.net] has joined #lisp 09:43:23 -!- zmyrgel [~user@hoasb-ff0cdd00-22.dhcp.inet.fi] has quit [Remote host closed the connection] 09:43:34 zmyrgel [~user@hoasb-ff0cdd00-22.dhcp.inet.fi] has joined #lisp 09:51:40 -!- sm` [s@77.29.16.181] has quit [Ping timeout: 250 seconds] 09:52:30 -!- gko [gko@122-116-15-138.HINET-IP.hinet.net] has quit [Ping timeout: 260 seconds] 09:56:28 gko [gko@122-116-15-138.HINET-IP.hinet.net] has joined #lisp 09:56:39 jewel [~jewel@196-215-16-138.dynamic.isadsl.co.za] has joined #lisp 09:57:29 sm` [s@46.217.35.224] has joined #lisp 09:57:50 Hi kiuma. Any screencasts yet? 10:03:25 -!- M-sprite [~M-sprite@60.183.203.142] has quit [Quit: I need to code or sleep now .] 10:12:49 stassats [~stassats@wikipedia/stassats] has joined #lisp 10:13:09 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 10:13:56 -!- cheez [~Adium@206-248-177-146.dsl.teksavvy.com] has quit [Quit: Leaving.] 10:16:05 -!- kraison [~kraison@70.90.182.149] has quit [Quit: kraison] 10:18:12 good day everyone 10:19:51 HG` [~HG@xdsl-188-118-129-19.dip.osnanet.de] has joined #lisp 10:22:26 -!- pattern [~pattern@unaffiliated/pattern] has quit [Ping timeout: 240 seconds] 10:26:19 tcr1 [~tcr@217-162-131-235.dynamic.hispeed.ch] has joined #lisp 10:27:34 splittist, for slime-project ? 10:27:41 -!- rdd [~user@c83-250-51-60.bredband.comhem.se] has quit [Ping timeout: 276 seconds] 10:29:09 hello Blkt 10:31:48 morphling [~stefan@gssn-4d003542.pool.mediaWays.net] has joined #lisp 10:32:32 drdo [~user@91.205.108.93.rev.vodafone.pt] has joined #lisp 10:33:08 -!- keyvan [~keyvan@ip68-5-13-232.oc.oc.cox.net] has quit [Quit: Leaving.] 10:35:47 sharps [~hazel@ip-118-90-82-239.xdsl.xnet.co.nz] has joined #lisp 10:36:57 Joreji [~thomas@79-126.eduroam.RWTH-Aachen.DE] has joined #lisp 10:37:31 this is funny, i was contemplating yesterday here whether helmut would like my change of making M-. non-interning, and i woke up today to witness that he committed almost exactly the same change 10:39:07 :) 10:43:07 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 10:43:10 malbertife_ [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 10:43:40 moah [~gnu@dslb-094-220-125-035.pools.arcor-ip.net] has joined #lisp 10:47:49 Marcux [~Adium@189.121.111.41] has joined #lisp 10:50:38 -!- spradnyesh [~pradyus@nat/yahoo/x-qogtmpnzxozsvqhj] has left #lisp 10:51:37 hun [~user@91-65-90-50-dynip.superkabel.de] has joined #lisp 10:54:22 -!- HET2 [~diman@cpc1-cdif12-2-0-cust125.5-1.cable.virginmedia.com] has quit [Quit: Leaving] 11:00:54 keyvan [~keyvan@ip68-5-13-232.oc.oc.cox.net] has joined #lisp 11:11:05 -!- azaq23 [~derivecto@unaffiliated/azaq23] has quit [Quit: Leaving.] 11:11:29 ZabaQ [~Zaba@135.114-84-212.staticip.namesco.net] has joined #lisp 11:12:18 -!- ZabaQ [~Zaba@135.114-84-212.staticip.namesco.net] has quit [Client Quit] 11:13:16 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 11:13:16 -!- malbertife_ [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 11:19:55 nikodemus [~nikodemus@cs181199216.pp.htv.fi] has joined #lisp 11:21:35 attila_lendvai [~attila_le@catv-80-98-24-21.catv.broadband.hu] has joined #lisp 11:22:24 -!- attila_lendvai [~attila_le@catv-80-98-24-21.catv.broadband.hu] has left #lisp 11:31:23 -!- Joreji [~thomas@79-126.eduroam.RWTH-Aachen.DE] has quit [Ping timeout: 276 seconds] 11:33:50 -!- dmytrish [~dmytrish@beting-proceeds.volia.net] has quit [Ping timeout: 240 seconds] 11:37:33 Davidbrcz [david@212-198-92-25.rev.numericable.fr] has joined #lisp 11:40:17 -!- mishoo [~mishoo@79.112.237.60] has quit [Quit: be back later] 11:41:42 dmytrish [~dmytrish@beting-proceeds.volia.net] has joined #lisp 11:42:20 Joreji [~thomas@79-126.eduroam.RWTH-Aachen.DE] has joined #lisp 11:43:10 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 11:43:23 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 11:44:20 Yuuhi [benni@p5483BBC7.dip.t-dialin.net] has joined #lisp 11:45:12 -!- gko [gko@122-116-15-138.HINET-IP.hinet.net] has quit [Ping timeout: 272 seconds] 11:46:25 maxpn [~maxp@92.126.48.180] has joined #lisp 11:47:04 timack [~tim@hlfx62-2a-206.ns.sympatico.ca] has joined #lisp 11:48:07 -!- timack [~tim@hlfx62-2a-206.ns.sympatico.ca] has quit [Client Quit] 11:55:58 -!- dmytrish [~dmytrish@beting-proceeds.volia.net] has quit [Read error: Connection reset by peer] 11:56:03 dmytrish_ [~dmytrish@beting-proceeds.volia.net] has joined #lisp 12:01:46 hargettp [~hargettp@pool-71-184-184-49.bstnma.east.verizon.net] has joined #lisp 12:06:54 leifw [~leif@ool-18bac6ad.dyn.optonline.net] has joined #lisp 12:08:00 rdd [~user@c83-250-51-60.bredband.comhem.se] has joined #lisp 12:11:16 -!- nikodemus [~nikodemus@cs181199216.pp.htv.fi] has quit [Quit: This computer has gone to sleep] 12:11:49 nikodemus [~nikodemus@cs181199216.pp.htv.fi] has joined #lisp 12:13:27 malbertife_ [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 12:13:27 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 12:13:28 -!- malbertife_ is now known as malbertife 12:14:41 -!- dRbiG [drbig@unhallowed.pl] has quit [Ping timeout: 240 seconds] 12:15:30 _s1gma [~herpderp@77.107.164.131] has joined #lisp 12:18:02 -!- leifw [~leif@ool-18bac6ad.dyn.optonline.net] has quit [Ping timeout: 240 seconds] 12:20:21 -!- dmytrish_ [~dmytrish@beting-proceeds.volia.net] has quit [Ping timeout: 240 seconds] 12:21:09 dRbiG [drbig@unhallowed.pl] has joined #lisp 12:22:41 mishoo [~mishoo@79.112.237.60] has joined #lisp 12:26:44 rgrau [~user@62.Red-88-2-20.staticIP.rima-tde.net] has joined #lisp 12:27:04 dmytrish_ [~dmytrish@beting-proceeds.volia.net] has joined #lisp 12:31:58 pmurias [~pawel@static-78-8-208-43.ssp.dialog.net.pl] has joined #lisp 12:32:14 what does the error "*** - LET: variable LET has no value" mean? 12:35:02 <|3b|> random guesses: wrong package, wrong parens, broken macro 12:35:26 moore33 [~moore@ABordeaux-153-1-20-56.w92-149.abo.wanadoo.fr] has joined #lisp 12:35:51 -!- Marcux [~Adium@189.121.111.41] has quit [Quit: Leaving.] 12:36:50 dfkjjkfd [~paulh@210-11-ftth.onsnetstudenten.nl] has joined #lisp 12:36:53 carlocci [~nes@93.37.196.125] has joined #lisp 12:37:26 |3b|: doing ,@ on a (let ...) 12:37:37 why are the error messages so sparse 12:37:39 ? 12:37:53 <|3b|> yeah, that sounds like a combination of broken macro or wrong parens :) 12:39:13 <|3b|> probably either people who have the skills to fix it are used to them so get the information they need from the existing errors, or else fixing them would be prohibitively hard 12:39:19 pmurias: nobody suffered enough to fix them? 12:39:37 gko [~gko@220-136-79-241.dynamic.hinet.net] has joined #lisp 12:39:41 <|nix|> |3b|: are you the person responsible for cl-opengl and cl-opencl-3b. If so nice work? 12:39:44 am0c [~am0c@124.49.51.197] has joined #lisp 12:40:30 <|nix|> ! instead of ? 12:40:39 hello 12:40:43 <|3b|> i 'maintain' cl-opengl after doing work on the low-level bindings, not sure i'd call cl-opencl-3b good work though, nowhere near done yet :/ 12:40:58 am0c: hi. 12:41:10 *tcr1* is reminded of the glory of http://common-lisp.net/~trittweiler/hacks/sbcl/symbols-have-source-paths/sbcl-symbols-have-source-path-hack.png 12:41:18 <|nix|> I know but it helps never the less 12:41:26 fantazo_ [~fantazo@178-190-233-85.adsl.highway.telekom.at] has joined #lisp 12:41:47 <|3b|> hmm, guess i never did respond to you on github (assuming you are the same nix), sorry about that :( 12:41:54 how do I get a list of every regex matches in the string? I really hardly googled for hours and couldn't find how to do it. 12:41:57 <|nix|> i dont know if there is any other cffi bindings in opencl yet 12:42:02 rgrau_ [~user@154.Red-83-41-88.dynamicIP.rima-tde.net] has joined #lisp 12:42:21 am0c: what are you using? 12:42:23 <|nix|> |3b|: no problem, 12:42:24 <|3b|> there is another on github, which is why i tacked -3b onto mine 12:42:26 -!- dmytrish_ [~dmytrish@beting-proceeds.volia.net] has quit [Quit: Konversation terminated!] 12:42:32 dmytrish_ [~dmytrish@beting-proceeds.volia.net] has joined #lisp 12:42:37 ehu: I am using emacs lisp now. 12:42:38 <|nix|> I figured it out 12:42:48 <|3b|> looked dead though, which is why i went ahead and uploaded it when someone wanted to look at it 12:42:51 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: No route to host] 12:43:14 -!- rgrau [~user@62.Red-88-2-20.staticIP.rima-tde.net] has quit [Ping timeout: 240 seconds] 12:43:26 -!- sharps [~hazel@ip-118-90-82-239.xdsl.xnet.co.nz] has left #lisp 12:43:29 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 12:43:47 and searched elisp reference. found 're-search-foward' but this is for 'buffer' not 'string'. so I want something similar to 're-search-foward' function which works for 'string' 12:44:02 <|3b|> am0c: #emacs knows more about elisp, this channel is more about common lisp 12:44:18 oh, I see. I'm sorry. 12:44:20 am0c: string-match? 12:44:32 <|nix|> I wanted to start one on my own but you beat me to it :D. I'm glad you did 12:44:48 am0c: in common lisp, you'd use cl-ppcre 12:44:57 ehu: I see 12:45:18 a package for perl-compatible regex processing. 12:45:22 -!- fantazo [~fantazo@178-191-170-84.adsl.highway.telekom.at] has quit [Ping timeout: 272 seconds] 12:45:26 <|3b|> main thing cl-opencl-3b needs right now is some real project to use it on... hard to design wrapper APIs without really knowing how it will be used 12:46:09 <|3b|> like i'm tempted to make things that wait on events release them automatically, assuming dependencies would mostly be linear... not sure that is a valid assumption though 12:46:31 ehu: does common lisp provides builting regex without package? 12:46:46 <|3b|> alternately, i'm also tempted to just dump the current mid-high level wrappers and try to make some even higher level CLOSsy wrappers 12:46:48 am0c: no. 12:46:53 or at least not standard. 12:47:24 I see. thank you ehu! 12:47:26 <|nix|> |3b|: Been doing some VR and Scientific vis with your bindings 12:48:10 <|3b|> cool 12:48:45 <|nix|> waiting on events may not be so good for VR stuff I'm doing 12:49:12 <|3b|> probably would be good, if used properly 12:49:26 <|3b|> important for concurrency between cpu/gpu if nothing else 12:50:00 <|nix|> oh wait you mean opencl events 12:50:24 <|3b|> yeah, i think that is the right term 12:50:29 <|nix|> sorry. misunderstood 12:50:56 -!- morphling [~stefan@gssn-4d003542.pool.mediaWays.net] has quit [Remote host closed the connection] 12:51:38 <|nix|> well do you want to put a paradigm over the bindings? 12:51:47 <|3b|> what do you mean? 12:52:28 <|nix|> like a level ove the bindings 12:52:52 <|nix|> dictating a particular way to use it? 12:53:38 <|3b|> ah, not really 12:53:50 <|3b|> though i could see having that as an optional extra api 12:54:47 I'm sorry for noob question but then how do I get a list of include paths from the command line of 'pkg-config gtkmm-2.4 --cflags' with practical common lisp way? 12:55:02 <|3b|> seems like it would be pretty nice to have stuff that could automatically track dependencies, and handle sending async requests with automatically waiting on previous ones as needed, etc 12:55:07 krfs [~jonata@189-16-43-233.cte.net.br] has joined #lisp 12:55:11 simplechat [~simplecha@unaffiliated/simplechat] has joined #lisp 12:55:46 <|3b|> but i'd still like to have something reasonably close to the c api as well, if it can be done reasonably safely 12:56:58 -!- Salamander__ is now known as Salamander 12:57:46 <|3b|> something else that would be fun would be a *lisp or cmlisp compiler, don't think i have the time for that at the moment though :( 12:59:10 <|nix|> |3b|: a cm lisp compiler in opencl 12:59:25 <|3b|> compiler to cl+opencl 12:59:36 <|3b|> basically pretend a GPU is a connection machine 12:59:56 <|nix|> i'm listening 13:00:10 <|3b|> that's about the extent of the idea :p 13:00:20 <|nix|> :D 13:01:08 <|3b|> beyond having at one point compared and determined that recent GPUs should be flexible enough to do so 13:02:16 <|3b|> CMLisp is beyond my compiler writing skills at the moment though 13:03:19 <|3b|> and not sure *lisp is really the right level of abstraction for GPUs, seems tuned for a different ratio of host-GPU bandwidth and compute power 13:03:20 <|nix|> I'm trying to wrap the idea in my head 13:03:30 <|3b|> which? 13:03:44 <|nix|> the entire compiler one 13:04:41 <|3b|> well, GPUs look a lot like connection machines, effectively a bunch of tiny processors doing the same thing, connected to a host machine 13:05:06 <|3b|> so just a matter of writing something that can output opencl code for the parallel bits 13:07:44 <|nix|> (defkerne ?) 13:07:44 <|3b|> probably the hardest part would be balancing runtime flexibility vs performance (aside from the general 'hard but someone probably already wrote a paper about it' compiler stuff) 13:08:03 <|3b|> have you looked at *lisp or CMlisp at all? 13:08:24 <|nix|> i'm doing that right now? 13:09:20 <|3b|> ok, i have to go run some errands so i'll just let you read about it directly instead of trying to explain from hazy memories of stuff i read about before :) 13:09:59 <|3b|> probably worth reading up on connection machines in general too if you do GPGPU stuff... another one of those fun 'but lisp did that decades ago' fields :p 13:11:01 <|nix|> will read up on it. I'm missing the context of your thought process 13:11:30 <|nix|> thank you 13:11:38 *|3b|* will probably be back in a few hrs 13:11:48 <|nix|> sure will catch you then 13:12:07 dmytrish__ [~dmytrish@beting-proceeds.volia.net] has joined #lisp 13:12:46 -!- dmytrish_ [~dmytrish@beting-proceeds.volia.net] has quit [Read error: Connection reset by peer] 13:13:36 malbertife_ [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 13:13:36 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 13:13:36 -!- malbertife_ is now known as malbertife 13:14:39 -!- maxpn [~maxp@92.126.48.180] has quit [Quit: Leaving.] 13:22:33 HET2 [~diman@cpc1-cdif12-2-0-cust125.5-1.cable.virginmedia.com] has joined #lisp 13:24:51 basimple [~basimple@112.154.21.152] has joined #lisp 13:29:00 EarlGray [~dmytrish@beting-proceeds.volia.net] has joined #lisp 13:29:14 -!- dmytrish__ [~dmytrish@beting-proceeds.volia.net] has quit [Read error: Connection reset by peer] 13:30:10 tcr2 [~tcr@217-162-131-235.dynamic.hispeed.ch] has joined #lisp 13:31:29 -!- tcr1 [~tcr@217-162-131-235.dynamic.hispeed.ch] has quit [Read error: Connection reset by peer] 13:32:20 -!- EarlGray [~dmytrish@beting-proceeds.volia.net] has quit [Read error: Connection reset by peer] 13:32:28 EarlGray [~dmytrish@beting-proceeds.volia.net] has joined #lisp 13:32:40 -!- kiuma [~kiuma@93-36-13-74.ip57.fastwebnet.it] has quit [Quit: Leaving] 13:32:59 Part of my ASDF source registry that I thought worked, doesn't  is there any way to do what this looks like? (:directory (:home #p";Documents;Lisp-community;*;")) [I want something in between :directory and :tree  just go one level deep] 13:33:45 -!- basimple [~basimple@112.154.21.152] has quit [Remote host closed the connection] 13:34:41 basimple [~basimple@112.154.21.152] has joined #lisp 13:36:26 -!- am0c [~am0c@124.49.51.197] has quit [Ping timeout: 240 seconds] 13:39:20 Bronsa [~brace@host86-182-dynamic.21-79-r.retail.telecomitalia.it] has joined #lisp 13:39:50 -!- hargettp [~hargettp@pool-71-184-184-49.bstnma.east.verizon.net] has quit [Quit: Leaving...] 13:40:43 astoon [~astoon@109.188.201.62] has joined #lisp 13:41:49 attila_lendvai [~attila_le@dsl51B614DA.pool.t-online.hu] has joined #lisp 13:43:30 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 13:43:42 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 13:47:12 -!- nikodemus [~nikodemus@cs181199216.pp.htv.fi] has quit [Quit: This computer has gone to sleep] 13:47:58 c|mell [~cmell@175.106.60.160] has joined #lisp 13:48:27 -!- Bronsa [~brace@host86-182-dynamic.21-79-r.retail.telecomitalia.it] has quit [Quit: leaving] 13:49:10 -!- basimple [~basimple@112.154.21.152] has quit [Ping timeout: 240 seconds] 13:51:27 basimple [~basimple@112.154.21.152] has joined #lisp 13:54:03 am0c [~am0c@124.49.51.197] has joined #lisp 13:55:33 -!- HET2 [~diman@cpc1-cdif12-2-0-cust125.5-1.cable.virginmedia.com] has quit [Quit: This computer has gone to sleep] 14:05:38 -!- astoon [~astoon@109.188.201.62] has quit [Read error: No route to host] 14:07:43 -!- basimple [~basimple@112.154.21.152] has quit [Remote host closed the connection] 14:10:56 jacobian [~jacobian@79.97.150.114] has joined #lisp 14:11:14 -!- Beetny [~Beetny@ppp118-208-77-24.lns20.bne4.internode.on.net] has quit [Ping timeout: 250 seconds] 14:13:41 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 14:13:42 malbertife_ [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 14:17:31 kiuma [~kiuma@93-36-13-74.ip57.fastwebnet.it] has joined #lisp 14:22:45 -!- HG` [~HG@xdsl-188-118-129-19.dip.osnanet.de] has quit [Quit: Leaving.] 14:23:04 -!- gko [~gko@220-136-79-241.dynamic.hinet.net] has quit [] 14:40:17 hmm, why isn't it possible to say (make-array '* :initial-contents '(1 2 3 4 5))? 14:40:35 also, what exactly does it mean to have a zero-dimensional array? 14:42:32 -!- benny [~benny@i577A326B.versanet.de] has quit [Ping timeout: 246 seconds] 14:43:18 (aref (make-array '() :initial-element 1)) => 1 14:43:18 -!- malbertife_ [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 14:43:49 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 14:43:54 so, it's a point 14:44:26 stassats: actually, the spec says otherwise 14:44:28 http://www.lispworks.com/documentation/HyperSpec/Body/15_aab.htm 14:44:35 -!- sm` [s@46.217.35.224] has quit [Ping timeout: 265 seconds] 14:44:51 still #0A(1 2 3) works in SBCL 14:46:18 stassats: but I'm still annoyed by the fact MAKE-ARRAY can't infer the dimensions from :INITIAL-CONTENTS 14:47:12 oh wait, I see now: http://www.lispworks.com/documentation/HyperSpec/Body/15_aac.htm 14:47:21 that's very confusing organisation there 14:47:46 -!- simplechat [~simplecha@unaffiliated/simplechat] has quit [Read error: Connection timed out] 14:48:32 simplechat [~simplecha@unaffiliated/simplechat] has joined #lisp 14:48:41 -!- homie [~levgue@xdsl-78-35-173-136.netcologne.de] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)] 14:50:37 sm` [s@77.29.102.119] has joined #lisp 14:51:29 adamvh [~adamvh@pool-71-179-82-48.bltmmd.fios.verizon.net] has joined #lisp 14:51:43 -!- Blkt [~user@net-93-151-229-166.cust.dsl.teletu.it] has quit [Quit: Error: do not makunboud t please!] 14:52:17 homie [~levgue@xdsl-78-35-173-136.netcologne.de] has joined #lisp 14:54:11 -!- am0c [~am0c@124.49.51.197] has quit [Quit: Leaving] 14:54:49 morlos [~morlos@cpe-76-171-76-155.socal.res.rr.com] has joined #lisp 14:55:14 phromo [phromo@c-acc3e455.015-359-6c6b701.cust.bredbandsbolaget.se] has joined #lisp 14:56:56 -!- morlos [~morlos@cpe-76-171-76-155.socal.res.rr.com] has quit [Client Quit] 15:00:56 -!- hugod_ [~hugod@76.66.188.14] has quit [Read error: Connection reset by peer] 15:01:21 gko [~gko@122-116-15-138.HINET-IP.hinet.net] has joined #lisp 15:01:55 -!- rgrau_ [~user@154.Red-83-41-88.dynamicIP.rima-tde.net] has quit [Remote host closed the connection] 15:03:44 mathrick: seems to be quite clear to me 15:04:30 stassats: the problem is it talks about zero-dimensional arrays in two places, and there's no indication there's more in the other place 15:04:49 hugod_ [~hugod@76.66.188.14] has joined #lisp 15:04:53 so reading just http://www.lispworks.com/documentation/HyperSpec/Body/15_aab.htm is not enough, but it won't refer you to the discussion in array rank 15:05:40 -!- pmurias [~pawel@static-78-8-208-43.ssp.dialog.net.pl] has quit [Quit: Lost terminal] 15:05:51 in one place it talks about dimensions being zero, in another about the number of dimensions being zero 15:06:49 and #0A(1 2 3) is not what you think it is 15:07:24 LiamH [~healy@pool-72-75-95-153.washdc.east.verizon.net] has joined #lisp 15:10:09 sbahra [~sbahra@pool-74-106-252-24.bltmmd.fios.verizon.net] has joined #lisp 15:10:30 -!- hugod_ [~hugod@76.66.188.14] has quit [Read error: Connection reset by peer] 15:11:03 hugod_ [~hugod@76.66.188.14] has joined #lisp 15:11:11 zmv [~user@c9531281.virtua.com.br] has joined #lisp 15:12:24 hugod__ [~hugod@76.66.188.14] has joined #lisp 15:13:41 akimbo [~akimbo@cpe-024-163-123-094.nc.res.rr.com] has joined #lisp 15:13:41 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 15:13:53 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 15:14:06 hargettp [~hargettp@pool-71-184-184-49.bstnma.east.verizon.net] has joined #lisp 15:16:29 HET2 [~diman@cpc1-cdif12-2-0-cust125.5-1.cable.virginmedia.com] has joined #lisp 15:16:42 Kruppe [~user@CPE00222d128ba2-CM00222d128b9e.cpe.net.cable.rogers.com] has joined #lisp 15:16:44 -!- hugod_ [~hugod@76.66.188.14] has quit [Ping timeout: 272 seconds] 15:19:01 pizzledizzle [~pizdets@pool-96-250-215-244.nycmny.fios.verizon.net] has joined #lisp 15:21:29 -!- gko [~gko@122-116-15-138.HINET-IP.hinet.net] has quit [Ping timeout: 276 seconds] 15:22:35 -!- ace4016 [~ace4016@adsl-32-124-64.mia.bellsouth.net] has quit [Ping timeout: 255 seconds] 15:23:10 bgs100 [~ian@unaffiliated/bgs100] has joined #lisp 15:25:12 gko [gko@122-116-15-138.HINET-IP.hinet.net] has joined #lisp 15:27:49 ace4016 [~ace4016@adsl-64-83-211.mia.bellsouth.net] has joined #lisp 15:31:21 Xach [~xach@pdpc/supporter/professional/xach] has joined #lisp 15:32:45 nyef [~nyef@pool-70-109-148-200.cncdnh.east.myfairpoint.net] has joined #lisp 15:33:02 pattern [~pattern@unaffiliated/pattern] has joined #lisp 15:33:02 G'morning all. 15:34:33 nyef: Good morning. 15:34:40 stassats: what is it? 15:35:10 ilmari: (1 2 3) is an element of that array 15:37:43 so a zero-dimensional array is just a scalar? 15:38:28 in geometrical sense, it's a point 15:38:28 (aref #0A(1 2 3)) => (1 2 3) 15:39:00 -!- gko [gko@122-116-15-138.HINET-IP.hinet.net] has quit [Ping timeout: 260 seconds] 15:39:51 leo2007 [~leo@120.33.24.178] has joined #lisp 15:43:16 -!- adamvh [~adamvh@pool-71-179-82-48.bltmmd.fios.verizon.net] has quit [Quit: adamvh] 15:43:17 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 15:43:24 gko [gko@122-116-15-138.HINET-IP.hinet.net] has joined #lisp 15:44:01 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 15:48:21 silenius [~silenus@p54946621.dip.t-dialin.net] has joined #lisp 15:54:21 rgrau [~user@62.Red-88-2-20.staticIP.rima-tde.net] has joined #lisp 15:57:07 mk2 [~user@159.92.65.64] has joined #lisp 15:58:47 dmytrish [~dmytrish@beting-proceeds.volia.net] has joined #lisp 15:58:49 -!- EarlGray [~dmytrish@beting-proceeds.volia.net] has quit [Quit: Konversation terminated!] 16:01:30 -!- LiamH [~healy@pool-72-75-95-153.washdc.east.verizon.net] has quit [Quit: Leaving.] 16:03:26 adamvh [~adamvh@pool-71-179-82-48.bltmmd.fios.verizon.net] has joined #lisp 16:03:41 -!- Yuuhi [benni@p5483BBC7.dip.t-dialin.net] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)] 16:04:29 xraycat [~Miranda@brln-4db872ce.pool.mediaWays.net] has joined #lisp 16:05:14 -!- xraycat [~Miranda@brln-4db872ce.pool.mediaWays.net] has left #lisp 16:06:50 -!- Xach [~xach@pdpc/supporter/professional/xach] has left #lisp 16:07:41 Yuuhi [benni@p5483BBC7.dip.t-dialin.net] has joined #lisp 16:09:21 astoon [~astoon@109.188.199.40] has joined #lisp 16:10:00 HG` [~HG@xdsl-188-118-129-19.dip.osnanet.de] has joined #lisp 16:10:41 tronador_ [~guille@190.67.59.189] has joined #lisp 16:11:06 -!- hargettp [~hargettp@pool-71-184-184-49.bstnma.east.verizon.net] has quit [Quit: Leaving...] 16:11:21 lurker-x [~androirc@c-75-72-99-111.hsd1.mn.comcast.net] has joined #lisp 16:13:04 -!- zmv [~user@c9531281.virtua.com.br] has quit [Ping timeout: 255 seconds] 16:13:34 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 16:14:00 -!- Joreji [~thomas@79-126.eduroam.RWTH-Aachen.DE] has quit [Ping timeout: 260 seconds] 16:14:01 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 16:14:11 morphling [~stefan@gssn-4d003542.pool.mediaWays.net] has joined #lisp 16:21:28 -!- akimbo [~akimbo@cpe-024-163-123-094.nc.res.rr.com] has quit [Remote host closed the connection] 16:21:30 panike [~nwp@adsl-76-204-90-75.dsl.mdsnwi.sbcglobal.net] has joined #lisp 16:22:15 -!- panike [~nwp@adsl-76-204-90-75.dsl.mdsnwi.sbcglobal.net] has left #lisp 16:23:40 morning 16:24:57 Hello slyrus. 16:25:20 -!- krfs [~jonata@189-16-43-233.cte.net.br] has left #lisp 16:27:00 -!- carlocci [~nes@93.37.196.125] has quit [Quit: eventually IE will rot and die] 16:27:46 heh: "Evil hack invented by the gnomes of Vassar Street" 16:30:07 -!- dRbiG [drbig@unhallowed.pl] has quit [Quit: leaving] 16:30:24 ... What? Where? 16:32:25 dRbiG [drbig@unhallowed.pl] has joined #lisp 16:34:47 early-setf 16:35:02 -!- kiuma [~kiuma@93-36-13-74.ip57.fastwebnet.it] has quit [Quit: Leaving] 16:35:25 I'm still trying to figure out if I can use define-setf-expander with variable numbers of values 16:38:12 slyrus: you can 16:41:38 -!- lurker-x [~androirc@c-75-72-99-111.hsd1.mn.comcast.net] has quit [Ping timeout: 240 seconds] 16:43:46 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 16:44:06 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 16:47:55 -!- morphling [~stefan@gssn-4d003542.pool.mediaWays.net] has quit [Remote host closed the connection] 16:48:11 morphling [~stefan@gssn-4d003542.pool.mediaWays.net] has joined #lisp 16:50:35 cheez [~Adium@206-248-177-146.dsl.teksavvy.com] has joined #lisp 16:50:39 well, since I don't anticipate more than for inbound values, I can do: (let ((syms (loop for i below 4 collect (gensym))))) and use that list for my stores, but it seems ... hacky. 16:50:41 -!- cheez [~Adium@206-248-177-146.dsl.teksavvy.com] has quit [Client Quit] 16:50:52 -!- ace4016 [~ace4016@adsl-64-83-211.mia.bellsouth.net] has quit [Ping timeout: 255 seconds] 16:51:06 and, somewhat to me amazement, this looks like it sort of works. sleeping on the problem to the rescue, again. 16:51:18 or (alexandria:make-gensym-list 4) 16:55:25 -!- attila_lendvai [~attila_le@dsl51B614DA.pool.t-online.hu] has quit [Ping timeout: 260 seconds] 16:55:26 attila_lendvai1 [~attila_le@dsl51B61463.pool.t-online.hu] has joined #lisp 16:55:27 -!- attila_lendvai1 is now known as attila_lendvai 16:55:56 ace4016 [~ace4016@adsl-32-8-91.mia.bellsouth.net] has joined #lisp 16:56:19 extra11 [~extra11@c-24-125-178-151.hsd1.va.comcast.net] has joined #lisp 16:58:30 sure, but that doesn't get around the seemingly hacky constant number of gensyms 16:59:01 and this is lisp, we don't use other people handy libraries. oh wait, quicklisp fixed that. nvm... 17:00:09 slyrus: the exact number is given by the length of the list of one of the return values of get-setf-expansion, no? 17:02:25 gonzojive [~red@c-71-198-7-84.hsd1.ca.comcast.net] has joined #lisp 17:05:19 vcxp [~vcxp@204.198.73.30] has joined #lisp 17:07:37 (get-setf-expansion...) of what? 17:10:22 pers [~user@71-214-58-123.clsp.qwest.net] has joined #lisp 17:11:24 Joreji [~thomas@79-126.eduroam.RWTH-Aachen.DE] has joined #lisp 17:11:53 (map-into (make-list 4) #'gensym) 17:13:08 -!- fantazo_ [~fantazo@178-190-233-85.adsl.highway.telekom.at] has quit [Remote host closed the connection] 17:14:12 malbertife_ [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 17:14:12 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 17:14:12 -!- malbertife_ is now known as malbertife 17:16:59 CallToPower [~CallToPow@xdsleh209.osnanet.de] has joined #lisp 17:17:01 -!- CallToPower [~CallToPow@xdsleh209.osnanet.de] has quit [Client Quit] 17:18:55 kiuma [~kiuma@93-36-13-74.ip57.fastwebnet.it] has joined #lisp 17:19:41 -!- StephenFalken [email@89-180-199-205.net.novis.pt] has quit [Quit: Time left until the Epochalypse: 26yrs 49wks 4days 21hrs 54mins 11secs] 17:20:18 hargettp [~hargettp@pool-71-184-184-49.bstnma.east.verizon.net] has joined #lisp 17:22:09 Grazl [~Grazl@196.Red-79-150-125.dynamicIP.rima-tde.net] has joined #lisp 17:23:46 StephenFalken [email@2001:470:1f14:135b::2] has joined #lisp 17:30:24 am0c [~am0c@124.49.51.197] has joined #lisp 17:33:36 -!- Grazl [~Grazl@196.Red-79-150-125.dynamicIP.rima-tde.net] has quit [Ping timeout: 250 seconds] 17:33:57 -!- silenius [~silenus@p54946621.dip.t-dialin.net] has quit [Remote host closed the connection] 17:35:31 LiamH [~healy@pool-72-75-95-153.washdc.east.verizon.net] has joined #lisp 17:38:10 -!- hugod__ [~hugod@76.66.188.14] has quit [Quit: hugod__] 17:42:01 hugod_ [~hugod@76.66.188.14] has joined #lisp 17:42:56 -!- sabalaba [~sabalaba@c-71-227-118-15.hsd1.mi.comcast.net] has quit [Ping timeout: 265 seconds] 17:44:10 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 17:44:17 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 17:44:49 -!- phromo [phromo@c-acc3e455.015-359-6c6b701.cust.bredbandsbolaget.se] has quit [Quit: ( www.nnscript.com :: NoNameScript 4.22 :: www.esnation.com )] 17:45:29 -!- |nix| [~user@cpe-72-226-54-44.nycap.res.rr.com] has quit [Read error: Connection reset by peer] 17:46:13 -!- homie [~levgue@xdsl-78-35-173-136.netcologne.de] has quit [Read error: Connection reset by peer] 17:47:26 homie [~levgue@xdsl-78-35-182-7.netcologne.de] has joined #lisp 17:48:58 urandom__ [~user@p548A50A5.dip.t-dialin.net] has joined #lisp 17:49:01 -!- homie [~levgue@xdsl-78-35-182-7.netcologne.de] has quit [Client Quit] 17:49:04 -!- dkasak [~dkasak@dh207-76-174.xnet.hr] has quit [Read error: Connection reset by peer] 17:50:24 -!- LiamH [~healy@pool-72-75-95-153.washdc.east.verizon.net] has quit [Quit: Leaving.] 17:51:21 LiamH [~healy@pool-72-75-95-153.washdc.east.verizon.net] has joined #lisp 17:51:58 homie [~levgue@xdsl-78-35-182-7.netcologne.de] has joined #lisp 17:53:07 -!- lemoinem [~swoog@216.252.81.51] has quit [Remote host closed the connection] 17:53:14 -!- adamvh [~adamvh@pool-71-179-82-48.bltmmd.fios.verizon.net] has quit [Ping timeout: 240 seconds] 17:53:16 -!- HG` [~HG@xdsl-188-118-129-19.dip.osnanet.de] has quit [Quit: Leaving.] 17:53:34 lemoinem [~swoog@192-73-252-216.dsl.colba.net] has joined #lisp 17:54:06 -!- slyrus [~chatzilla@adsl-75-36-217-249.dsl.pltn13.sbcglobal.net] has quit [Ping timeout: 276 seconds] 17:54:59 mega1 [~quassel@catv4E5CABA2.pool.t-online.hu] has joined #lisp 17:55:13 -!- lisppaste [~lisppaste@common-lisp.net] has quit [Ping timeout: 255 seconds] 17:55:45 -!- minion [~minion@common-lisp.net] has quit [Ping timeout: 240 seconds] 17:56:10 -!- specbot [~specbot@common-lisp.net] has quit [Ping timeout: 240 seconds] 17:56:10 sabalaba [~sabalaba@c-71-227-118-15.hsd1.mi.comcast.net] has joined #lisp 17:56:45 amnesiac [~amnesiac@c-67-169-76-188.hsd1.ca.comcast.net] has joined #lisp 17:56:45 -!- amnesiac [~amnesiac@c-67-169-76-188.hsd1.ca.comcast.net] has quit [Changing host] 17:56:45 amnesiac [~amnesiac@p3m/member/Amnesiac] has joined #lisp 18:00:00 mega1` [~user@catv4E5CABA2.pool.t-online.hu] has joined #lisp 18:00:03 prxq [~mommer@mnhm-590c1cb4.pool.mediaWays.net] has joined #lisp 18:00:51 -!- simplechat [~simplecha@unaffiliated/simplechat] has quit [Read error: Connection reset by peer] 18:01:38 -!- leo2007 [~leo@120.33.24.178] has quit [Ping timeout: 240 seconds] 18:01:42 timor [~timor@port-92-195-176-10.dynamic.qsc.de] has joined #lisp 18:02:29 hi 18:02:43 hi 18:03:15 oconnore [~eric@ip68-230-164-105.mc.at.cox.net] has joined #lisp 18:03:26 hi prxq 18:04:36 |nix| [~user@cpe-72-226-54-44.nycap.res.rr.com] has joined #lisp 18:07:55 -!- gko [gko@122-116-15-138.HINET-IP.hinet.net] has quit [] 18:10:07 tritchey [~tritchey@c-68-51-118-114.hsd1.in.comcast.net] has joined #lisp 18:13:37 -!- LiamH [~healy@pool-72-75-95-153.washdc.east.verizon.net] has quit [Quit: Leaving.] 18:13:41 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: No route to host] 18:14:21 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 18:15:31 adamvh [~adamvh@pool-71-179-82-48.bltmmd.fios.verizon.net] has joined #lisp 18:16:56 -!- vcxp [~vcxp@204.198.73.30] has quit [Quit: Leaving] 18:17:39 -!- extra11 [~extra11@c-24-125-178-151.hsd1.va.comcast.net] has quit [Read error: Connection reset by peer] 18:18:11 Zephyrus__ [~emanuele@unaffiliated/zephyrus] has joined #lisp 18:20:31 -!- timor [~timor@port-92-195-176-10.dynamic.qsc.de] has quit [Remote host closed the connection] 18:21:06 -!- Davidbrcz [david@212-198-92-25.rev.numericable.fr] has quit [Ping timeout: 240 seconds] 18:22:20 -!- Zephyrus [~emanuele@unaffiliated/zephyrus] has quit [Ping timeout: 260 seconds] 18:23:21 -!- pers [~user@71-214-58-123.clsp.qwest.net] has quit [Ping timeout: 276 seconds] 18:23:34 Xach [~xach@pdpc/supporter/professional/xach] has joined #lisp 18:24:44 morlos [~morlos@cpe-76-171-76-155.socal.res.rr.com] has joined #lisp 18:26:34 silenius [~silenus@p54946621.dip.t-dialin.net] has joined #lisp 18:26:37 lurker-x [~androirc@32.169.246.202] has joined #lisp 18:26:40 -!- lurker-x [~androirc@32.169.246.202] has quit [Client Quit] 18:26:56 lurker-x [~androirc@32.169.246.202] has joined #lisp 18:27:03 -!- daniel___ is now known as daniel 18:28:04 -!- lurker-x [~androirc@32.169.246.202] has quit [Client Quit] 18:28:21 lurker-x [~androirc@32.169.246.202] has joined #lisp 18:28:44 -!- lurker-x [~androirc@32.169.246.202] has quit [Client Quit] 18:29:06 lurker-x [~androirc@32.169.246.202] has joined #lisp 18:32:41 dfox [~dfox@ip-94-113-89-201.net.upcbroadband.cz] has joined #lisp 18:34:16 -!- moore33 [~moore@ABordeaux-153-1-20-56.w92-149.abo.wanadoo.fr] has quit [Quit: Leaving] 18:34:49 -!- lurker-x [~androirc@32.169.246.202] has quit [Ping timeout: 255 seconds] 18:35:02 -!- sabalaba [~sabalaba@c-71-227-118-15.hsd1.mi.comcast.net] has quit [Read error: Operation timed out] 18:35:59 -!- hargettp [~hargettp@pool-71-184-184-49.bstnma.east.verizon.net] has quit [Quit: Leaving...] 18:36:19 -!- Phoodus [~foo@ip68-231-47-70.ph.ph.cox.net] has quit [Ping timeout: 240 seconds] 18:39:21 leifw [~leif@ool-18bac6ad.dyn.optonline.net] has joined #lisp 18:40:17 schme [~marcus@c83-254-196-92.bredband.comhem.se] has joined #lisp 18:40:17 -!- schme [~marcus@c83-254-196-92.bredband.comhem.se] has quit [Changing host] 18:40:17 schme [~marcus@sxemacs/devel/schme] has joined #lisp 18:40:56 carlocci [~nes@93.37.208.221] has joined #lisp 18:42:50 xan_ [~xan@245.Red-79-157-129.dynamicIP.rima-tde.net] has joined #lisp 18:44:00 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 18:44:26 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 18:46:11 ignotus [~ignotus@unaffiliated/ignotus] has joined #lisp 18:46:44 jajcloz [~jaj@pool-108-7-68-199.bstnma.fios.verizon.net] has joined #lisp 18:46:53 -!- jajcloz [~jaj@pool-108-7-68-199.bstnma.fios.verizon.net] has quit [Client Quit] 18:47:03 hi, is there a lisp function somewhere for counting the occurances of a substring in a string? 18:47:14 -!- adamvh [~adamvh@pool-71-179-82-48.bltmmd.fios.verizon.net] has quit [Ping timeout: 240 seconds] 18:47:42 you can do this by employing SEARCH 18:47:52 stassats: that's what I feared 18:48:19 :) 18:48:37 LiamH [~healy@pool-72-75-95-153.washdc.east.verizon.net] has joined #lisp 18:48:38 it's pretty easy if the substring has only one character! 18:48:56 it's not an easy problem, do you consider overlapping instances? 18:49:07 jewel: fortunately no 18:49:09 Xach: haha:) 18:50:35 (loop for position = (search substring string) then (search substring string :start2 (1+ position)) while position count t) 18:50:50 that lacks a 'please' keyword 18:51:13 prxq: this ain't intercal! 18:51:38 stassats: oh sorry 18:51:45 There are probably people out there who'd rather use intercal than loop. 18:51:49 stassats: thanks it's pretty sweet loop usage 18:52:53 Marcux [~Adium@189.121.111.41] has joined #lisp 18:53:08 -!- attila_lendvai [~attila_le@dsl51B61463.pool.t-online.hu] has left #lisp 18:53:28 -!- Marcux [~Adium@189.121.111.41] has quit [Client Quit] 18:53:51 and beware that it doesn't work on empty substrings, that's left as an exercise 18:56:43 -!- morphling [~stefan@gssn-4d003542.pool.mediaWays.net] has quit [Remote host closed the connection] 18:56:52 stassats: I'd go further and use "while position count position" (: 18:57:18 but that's redundant! 18:57:32 it is only so long as the rest of the loop body doesn't change (: 18:57:43 cheez [~Adium@206-248-177-146.dsl.teksavvy.com] has joined #lisp 18:57:44 i'd use "count it", but it only works with WHEN 18:58:07 it only works with when? thats phantastik 18:58:14 hmmmm. unless position do (loop-finish) else count it (-: 18:58:26 *antifuchs* giggles 18:59:28 *_3b* wonders if for position = ... then (or (search ...) (loop-finish))) would work 18:59:42 I think it might. 19:00:36 oh, that's "think of the most ridiculous way to do simple task competition" again 19:01:29 loop is like that 19:01:48 but you'd have to do that (or) brace in the = form as well 19:01:53 oh, no, you wouldn't 19:01:55 hmmm, neat (: 19:02:06 (no, yes, you wold) 19:03:30 when position count it else do (loop-finish) ; looks ok to me. but the original solution is probably the best (: 19:07:30 (cdr (block nil (reduce (lambda (x y &aux (search (search substring string :start2 (car x)))) (declare (ignore y)) (if search (cons (1+ search) (1+ (cdr x))) (return x))) string :initial-value '(0 . 0)))) 19:07:58 twopoint718 [~chris@76.201.148.90] has joined #lisp 19:09:32 can get away without RETURN at the cost of efficiency 19:10:17 -!- HDurer_home [~holly@pdpc/supporter/active/hdurer] has quit [Ping timeout: 255 seconds] 19:11:02 Marcux [~Adium@189.121.111.41] has joined #lisp 19:11:04 -!- Marcux [~Adium@189.121.111.41] has quit [Client Quit] 19:11:17 attila_lendvai [~attila_le@dsl51B61463.pool.t-online.hu] has joined #lisp 19:11:20 -!- twopoint718 [~chris@76.201.148.90] has left #lisp 19:11:52 Marcux [~Adium@189.121.111.41] has joined #lisp 19:11:57 -!- gemelen [~shelta@shpd-95-53-171-12.vologda.ru] has quit [Quit:    .    ...] 19:12:48 hargettp [~hargettp@mobile-166-137-138-045.mycingular.net] has joined #lisp 19:13:07 gemelen [~shelta@shpd-95-53-171-12.vologda.ru] has joined #lisp 19:14:10 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 19:14:10 -!- gemelen [~shelta@shpd-95-53-171-12.vologda.ru] has quit [Client Quit] 19:14:12 eh, no bots again 19:14:25 http://paste.lisp.org/display/119397 a less-consing variant 19:14:32 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 19:14:39 gemelen [~shelta@shpd-95-53-171-12.vologda.ru] has joined #lisp 19:14:42 *nyef* sighs. 19:14:47 I'll kick the bots in a bit. 19:15:20 with REDUCE one could probably get away without SEARCH 19:15:35 "occurrence" (-: 19:15:44 double c, double r, e (: 19:16:13 -!- Marcux [~Adium@189.121.111.41] has quit [Ping timeout: 245 seconds] 19:16:28 yeah, that's the only flaw of this function 19:18:06 and consing can be reduced even further with LOAD-TIME-VALUE 19:18:24 -!- attila_lendvai [~attila_le@dsl51B61463.pool.t-online.hu] has left #lisp 19:18:40 or, I suppose, nested DOs (-: 19:19:13 sabalaba [~sabalaba@67-194-88-171.wireless.umnet.umich.edu] has joined #lisp 19:22:21 -!- talyz [~user@ip35.tunnan.riksnet.nu] has quit [Remote host closed the connection] 19:22:23 -!- oconnore [~eric@ip68-230-164-105.mc.at.cox.net] has quit [Ping timeout: 240 seconds] 19:23:32 (count-if (lambda (x) (search subsequence sequence :start2 x)) (loop for i below (length sequence) collect i)) 19:23:32 -!- hargettp [~hargettp@mobile-166-137-138-045.mycingular.net] has quit [Quit: Colloquy for iPhone - http://colloquy.mobi] 19:24:01 drwho [~drwho@c-76-124-17-190.hsd1.pa.comcast.net] has joined #lisp 19:26:34 -!- gonzojive [~red@c-71-198-7-84.hsd1.ca.comcast.net] has quit [Quit: gonzojive] 19:30:38 kushal [~kdas@fedora/kushal] has joined #lisp 19:32:10 -!- silenius [~silenus@p54946621.dip.t-dialin.net] has quit [Quit: Leaving] 19:33:23 -!- tty234 [telex@gateway/shell/anapnea.net/x-lshdgyuoazvqupqk] has quit [Ping timeout: 240 seconds] 19:36:02 -!- mishoo [~mishoo@79.112.237.60] has quit [Ping timeout: 265 seconds] 19:44:26 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 19:44:32 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 19:44:56 -!- kushal [~kdas@fedora/kushal] has quit [Ping timeout: 255 seconds] 19:45:01 zomgbie [~jesus@84.119.84.161] has joined #lisp 19:46:03 NihilistDandy [~ND@c-75-69-129-101.hsd1.nh.comcast.net] has joined #lisp 19:47:17 tty234 [telex@gateway/shell/anapnea.net/x-pivhsfavbieysirt] has joined #lisp 19:48:29 mstevens [~mstevens@89.145.84.152] has joined #lisp 19:48:29 -!- mstevens [~mstevens@89.145.84.152] has quit [Changing host] 19:48:29 mstevens [~mstevens@fsf/member/pdpc.active.mstevens] has joined #lisp 19:49:07 -!- _danb_ [~user@124-171-12-242.dyn.iinet.net.au] has quit [Ping timeout: 246 seconds] 19:51:04 -!- dfkjjkfd [~paulh@210-11-ftth.onsnetstudenten.nl] has quit [Quit: Lost terminal] 19:51:32 mishoo [~mishoo@79.112.237.60] has joined #lisp 19:52:42 oconnore [~eric@adsl-80-218-110.mcn.bellsouth.net] has joined #lisp 19:54:21 mwnaylor [~mwnaylor@altoona-69-72-75-175.dynamic-dialup.coretel.net] has joined #lisp 19:54:23 Davidbrcz [david@212-198-92-25.rev.numericable.fr] has joined #lisp 19:57:25 -!- dmytrish [~dmytrish@beting-proceeds.volia.net] has quit [Ping timeout: 260 seconds] 19:57:36 magog [~edward@201.22.130.41] has joined #lisp 19:57:50 adu [~ajr@64.134.96.109] has joined #lisp 19:58:49 slash_ [~unknown@pD955AE85.dip.t-dialin.net] has joined #lisp 20:00:16 -!- magog is now known as shamash 20:00:31 -!- shamash is now known as bcat 20:00:40 -!- bcat is now known as magog 20:00:59 -!- magog [~edward@201.22.130.41] has left #lisp 20:01:55 nikodemus [~nikodemus@cs181199216.pp.htv.fi] has joined #lisp 20:02:46 -!- nikodemus [~nikodemus@cs181199216.pp.htv.fi] has quit [Client Quit] 20:03:22 brittleguy [~edward@201.22.130.41] has joined #lisp 20:04:12 nikodemus [~nikodemus@cs181199216.pp.htv.fi] has joined #lisp 20:04:42 -!- mwnaylor [~mwnaylor@altoona-69-72-75-175.dynamic-dialup.coretel.net] has left #lisp 20:05:42 -!- Xach [~xach@pdpc/supporter/professional/xach] has left #lisp 20:06:01 -!- nikodemus [~nikodemus@cs181199216.pp.htv.fi] has quit [Client Quit] 20:10:22 marioxcc [~user@200.66.25.90] has joined #lisp 20:10:27 Hello 20:10:40 -!- cheez [~Adium@206-248-177-146.dsl.teksavvy.com] has quit [Quit: Leaving.] 20:12:26 -!- jewel [~jewel@196-215-16-138.dynamic.isadsl.co.za] has quit [Ping timeout: 240 seconds] 20:13:51 -!- brittleguy [~edward@201.22.130.41] has quit [Quit: Bye, bye] 20:13:55 rasterbar [~rasterbar@unaffiliated/rasterbar] has joined #lisp 20:14:00 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: No route to host] 20:14:01 azaq23 [~derivecto@unaffiliated/azaq23] has joined #lisp 20:14:41 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 20:18:12 Sprayzor [~user@82.159.115.173.dyn.user.ono.com] has joined #lisp 20:19:30 mwnaylor [~mwnaylor@altoona-69-72-75-175.dynamic-dialup.coretel.net] has joined #lisp 20:20:58 extra11 [~extra11@c-24-125-178-151.hsd1.va.comcast.net] has joined #lisp 20:22:41 nikodemus [~nikodemus@cs181199216.pp.htv.fi] has joined #lisp 20:22:55 -!- mwnaylor [~mwnaylor@altoona-69-72-75-175.dynamic-dialup.coretel.net] has left #lisp 20:23:04 macrobat [~fuzzyglee@h-152-12.A163.priv.bahnhof.se] has joined #lisp 20:29:36 -!- nikodemus [~nikodemus@cs181199216.pp.htv.fi] has quit [Quit: This computer has gone to sleep] 20:30:48 Marcux [~Adium@189.121.111.41] has joined #lisp 20:30:56 -!- LiamH [~healy@pool-72-75-95-153.washdc.east.verizon.net] has quit [Quit: Leaving.] 20:38:40 ch077179 [~urs@adsl-89-217-147-190.adslplus.ch] has joined #lisp 20:41:09 -!- NihilistDandy [~ND@c-75-69-129-101.hsd1.nh.comcast.net] has quit [Remote host closed the connection] 20:41:46 -!- astoon [~astoon@109.188.199.40] has quit [Ping timeout: 265 seconds] 20:44:22 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 20:44:44 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 20:46:17 gasgoul [~edward@201.22.130.41] has joined #lisp 20:48:23 bigjust [~user@adsl-074-232-230-165.sip.asm.bellsouth.net] has joined #lisp 20:48:25 -!- stassats [~stassats@wikipedia/stassats] has quit [Ping timeout: 240 seconds] 20:54:12 -!- Kruppe [~user@CPE00222d128ba2-CM00222d128b9e.cpe.net.cable.rogers.com] has quit [Remote host closed the connection] 20:54:27 lurker-x [~androirc@c-75-72-99-111.hsd1.mn.comcast.net] has joined #lisp 20:54:27 -!- splittist [~IceChat77@30-245.62-188.cust.bluewin.ch] has quit [Quit: Pull the pin and count to what?] 20:56:45 BarZero [46b3b5fb@gateway/web/freenode/ip.70.179.181.251] has joined #lisp 20:57:57 Hey, everyone. What do your countrieth thay on your pathport? 20:58:16 Ith everyone athleep? 20:58:23 WELL? 20:59:21 *BarZero* REALLY wishes there was a country named "Lithpuania." I believe the Lithp ith the cuteth accthent EVER!!! 20:59:41 Perhaps you were looking for /dev/null? 21:00:12 Not quite, Nuntiuth. I don't think that's where everyone roleplays a lithp. 21:01:41 I wanted to find a room where I could roleplay a lithper, and thith room had the name that made it look that way. 21:01:59 2/10 21:02:06 2/10 of what? 21:02:16 trolling 21:02:17 trolling score :D 21:02:31 What'th 10/10 then? 21:03:10 You cant never get 10/10 since the perfect troll goes unnoticed 21:03:14 can* 21:03:17 Okay, if thith ithn't the right chatroom to roleplay lithping, what charoom is??? 21:03:30 chat*room 21:03:45 #scheme 21:03:53 churib: ... 21:04:55 lol 21:05:01 evil 21:05:21 here's a version of the subsequence counting thing using do: http://paste.lisp.org/+2K4L/1 in my opinion it is much cleaner and understandable than the loop versions 21:05:23 where can I discuss newlisp? ;) 21:05:42 pnkfelix [~Adium@c-68-38-142-34.hsd1.nj.comcast.net] has joined #lisp 21:05:45 nuntius: here, as long as you are willing to lose the argument :) 21:06:05 you misunderstand... I thought _0 might want to enlighten them. 21:06:22 who is _0? 21:06:49 pchrist_ [~spirit@gentoo/developer/pchrist] has joined #lisp 21:07:14 cheez [~Adium@206-248-177-146.dsl.teksavvy.com] has joined #lisp 21:07:26 WHA, LITHP ITH ALTHO A PROGRAMMING LANGUAGE??? THATTH NEWTH TO ME! 21:07:59 OH MY GOTH I'M THO THORRY!!!! :-0 21:08:07 can someone please kick BarZero? 21:08:19 you're narrow minded if you do! 21:08:24 -!- sabalaba [~sabalaba@67-194-88-171.wireless.umnet.umich.edu] has quit [Read error: Operation timed out] 21:08:27 I dunno. He already dropped to 1/10. 21:08:33 Don't ridicule thothe who are born with a thpeech defect! 21:09:01 I've known people with cleft palette (sp?). They were much more interesting. 21:09:02 BarZero: i don't mind being narrow minded. just cut it out. 21:09:14 BarZero: 1) it is you who are ridiculing yourself, and 2) i don't think the defect has much to do with speech 21:09:14 bigjust` [~user@adsl-074-232-230-165.sip.asm.bellsouth.net] has joined #lisp 21:09:20 I'm not kidding. You look like a narrow-minded prejudithed prick if you mithtreat lithpers. 21:09:39 palate, nuntiuth 21:10:23 -!- ChanServ has set mode +o Krystof 21:10:24 -!- pchrist [~spirit@gentoo/developer/pchrist] has quit [Ping timeout: 276 seconds] 21:10:29 -!- Krystof has set mode +b *!*@gateway/web/freenode/ip.70.179.181.251 21:10:45 -!- bigjust [~user@adsl-074-232-230-165.sip.asm.bellsouth.net] has quit [Ping timeout: 240 seconds] 21:11:20 Krystof: thanks 21:12:47 morphling [~stefan@gssn-4d003542.pool.mediaWays.net] has joined #lisp 21:12:54 algal [~anonymous@78-86-30-77.zone2.bethere.co.uk] has joined #lisp 21:13:03 -!- algal [~anonymous@78-86-30-77.zone2.bethere.co.uk] has left #lisp 21:13:04 -!- amnesiac [~amnesiac@p3m/member/Amnesiac] has quit [Quit: Leaving] 21:13:19 sabalaba [~sabalaba@67-194-88-171.wireless.umnet.umich.edu] has joined #lisp 21:14:36 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 21:14:48 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 21:14:55 MichealH [~ZNC@wikipedia/MichealH] has joined #lisp 21:15:11 HG` [~HG@xdsl-188-118-129-19.dip.osnanet.de] has joined #lisp 21:19:48 I have a lisp. 21:20:26 -!- rdd [~user@c83-250-51-60.bredband.comhem.se] has quit [Read error: Connection reset by peer] 21:21:10 <|nix|> awkward ........ 21:25:52 -!- pankajm [~pankajm@202.3.77.219] has quit [Ping timeout: 250 seconds] 21:26:47 LiamH [~healy@pool-72-75-95-153.washdc.east.verizon.net] has joined #lisp 21:27:47 Hexstream [~hexstream@modemcable075.97-200-24.mc.videotron.ca] has joined #lisp 21:31:54 -!- tcr2 [~tcr@217-162-131-235.dynamic.hispeed.ch] has quit [Quit: Leaving.] 21:33:35 -!- gasgoul [~edward@201.22.130.41] has quit [Quit: Ex-Chat] 21:35:28 benny` [~benny@i577A80B7.versanet.de] has joined #lisp 21:35:53 -!- pnkfelix [~Adium@c-68-38-142-34.hsd1.nj.comcast.net] has quit [Quit: Leaving.] 21:35:54 -!- benny` is now known as benny 21:38:17 rdd [~user@c83-250-51-60.bredband.comhem.se] has joined #lisp 21:39:31 dkasak [~dkasak@dh207-76-174.xnet.hr] has joined #lisp 21:41:34 -!- Zephyrus__ [~emanuele@unaffiliated/zephyrus] has quit [Quit: ""] 21:43:19 vser [~vser@78-22-154-231.access.telenet.be] has joined #lisp 21:43:29 -!- vser is now known as Landr 21:44:43 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 21:44:51 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 21:45:09 ravic [~ravi@118-93-168-117.dsl.dyn.ihug.co.nz] has joined #lisp 21:46:26 -!- sabalaba [~sabalaba@67-194-88-171.wireless.umnet.umich.edu] has quit [Ping timeout: 240 seconds] 21:52:44 schoppenhauer [~christoph@unaffiliated/schoppenhauer] has joined #lisp 21:53:30 pnkfelix [~Adium@2002:4426:8e22:0:5ab0:35ff:fe69:c9bf] has joined #lisp 21:53:42 <|nix|> does cl have SETS (object) like clojure. 21:54:08 whats a SET ? 21:54:11 -!- c|mell [~cmell@175.106.60.160] has quit [Remote host closed the connection] 21:54:31 <|nix|> http://clojure.org/data_structures 21:55:50 hm. unsorted collections. 21:55:55 Well, lists can be used to represent sets and Common Lisp has a few functions to deal with lists-as-sets specifically. 21:55:58 there is a package that provides them: fset i think it is called 21:56:28 -!- stis [~stis@1-1-1-39a.veo.vs.bostream.se] has quit [Remote host closed the connection] 21:56:40 Hexstream is also right 21:56:59 clhs 14.1.2.2 21:57:50 bots dead 21:58:53 I've come to expect that. 21:59:34 <|nix|> thanks 22:00:17 sabalaba [~sabalaba@166.133.150.230] has joined #lisp 22:00:27 silenius [~silenus@p54946621.dip.t-dialin.net] has joined #lisp 22:01:34 -!- mstevens [~mstevens@fsf/member/pdpc.active.mstevens] has quit [Quit: leaving] 22:01:43 -!- sabalaba [~sabalaba@166.133.150.230] has quit [Read error: Connection reset by peer] 22:02:02 -!- extra11 [~extra11@c-24-125-178-151.hsd1.va.comcast.net] has quit [Ping timeout: 240 seconds] 22:03:27 <|nix|> prxq: fset seems exactly what I needed. much grateful :) 22:03:41 |nix|: np! 22:07:32 -!- mishoo [~mishoo@79.112.237.60] has quit [Read error: Operation timed out] 22:08:42 -!- hun [~user@91-65-90-50-dynip.superkabel.de] has quit [Read error: Connection reset by peer] 22:08:59 -!- adu [~ajr@64.134.96.109] has quit [Quit: adu] 22:14:22 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 22:14:58 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 22:17:29 Beetny [~Beetny@ppp118-208-77-24.lns20.bne4.internode.on.net] has joined #lisp 22:17:41 slyrus [~chatzilla@173-228-44-88.dsl.static.sonic.net] has joined #lisp 22:18:57 -!- parcs [~patrick@ool-45741d7d.dyn.optonline.net] has quit [Remote host closed the connection] 22:19:19 Good morning everyone! 22:21:27 -!- hugod_ [~hugod@76.66.188.14] has quit [Quit: hugod_] 22:21:30 hey beach 22:22:22 -!- tronador_ [~guille@190.67.59.189] has quit [Quit: tronador_] 22:23:09 andreer [andreer@flode.pvv.ntnu.no] has joined #lisp 22:24:04 hi beach 22:27:16 -!- Hexstream [~hexstream@modemcable075.97-200-24.mc.videotron.ca] has left #lisp 22:27:37 parcs [~patrick@ool-45741d7d.dyn.optonline.net] has joined #lisp 22:27:43 -!- parcs [~patrick@ool-45741d7d.dyn.optonline.net] has quit [Client Quit] 22:27:52 sabalaba [~sabalaba@67-194-0-98.wireless.umnet.umich.edu] has joined #lisp 22:29:41 how can I "reset" the initialize-instance generic function or any other? 22:30:07 I defined a :before initialize-instance for a specific class, this isn't longer need 22:31:32 parcs [~patrick@ool-45741d7d.dyn.optonline.net] has joined #lisp 22:31:35 there is find-method, iirc, and then there is fmakunbound 22:31:44 (hm) 22:31:56 or something on that vein 22:32:04 but I don't want to unbound the whole generic function 22:32:09 just the implementation for a specific class 22:32:28 -!- bigjust` [~user@adsl-074-232-230-165.sip.asm.bellsouth.net] has quit [Ping timeout: 245 seconds] 22:32:36 the easiest way is to reset the whole environment 22:33:03 uh :/ 22:33:34 marioxcc: find-method finds the specific method, not the generic function 22:33:36 clhs remove-method 22:33:44 No bots again? 22:33:51 marioxcc: There is a remove-method 22:33:55 -!- BarZero [46b3b5fb@gateway/web/freenode/ip.70.179.181.251] has quit [Ping timeout: 245 seconds] 22:34:09 ... Oh, right. I was going to kick the bots. 22:34:15 marioxcc: And there is a find-method. 22:34:24 beach: I see 22:34:29 thanks 22:34:35 No problem. 22:35:05 lisppaste [~lisppaste@common-lisp.net] has joined #lisp 22:35:11 beach: ok, 24 hrs later... I think I figured out how to do a non-consing (setf (pixel a 0 0) (values 9 10 11 12)) 22:35:28 minion [~minion@common-lisp.net] has joined #lisp 22:35:41 where the number of values can vary, depending on the dimensions of the array 22:35:42 slyrus: Excellent! 22:35:49 specbot [~specbot@common-lisp.net] has joined #lisp 22:35:56 -!- ace4016 [~ace4016@adsl-32-8-91.mia.bellsouth.net] has quit [Disconnected by services] 22:35:57 Atomsk [~ace4016@adsl-32-8-91.mia.bellsouth.net] has joined #lisp 22:36:00 Okay, bots are back. 22:36:10 Thanks nyef! 22:37:09 sc0ty [~user@a85-138-126-73.cpe.netcabo.pt] has joined #lisp 22:39:40 and they nicely just quietly perform a no-op if you try to set, say, a negative pixel. we could check the bounds elsewhere, but having this be safe-ish seems kinda nice 22:39:44 -!- sc0ty [~user@a85-138-126-73.cpe.netcabo.pt] has quit [Remote host closed the connection] 22:40:53 Would it be more expensive to test and signal a condition? 22:41:18 *beach* doesn't like programs that lie about their abilities. 22:42:30 -!- zomgbie [~jesus@84.119.84.161] has quit [Ping timeout: 240 seconds] 22:43:02 well, we could do that... and there could certainly be multiple versions. clearly, corrupting the image isn't a good thing :) 22:43:26 If somebody wants to set a negative pixel, I say go for out, I'll just ignore it. 22:43:28 nyef: you fixed the 15min startup problem! 22:43:37 but, sure, we could think about the optimal behavior here 22:43:55 if anyone has any comments on my define-setf-expander, I'd love to hear them: https://gist.github.com/812876 22:44:31 I've never done one of those before (at least not that I remember), so I have no idea if it's 1) right or 2) a good idea 22:44:32 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 22:44:36 but it seems to work, at least 22:45:03 dfkjjkfd [~paulh@210-11-ftth.onsnetstudenten.nl] has joined #lisp 22:45:04 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 22:45:42 -!- am0c [~am0c@124.49.51.197] has quit [Remote host closed the connection] 22:46:42 slyrus: I'd put the generation of the aref forms in a function 22:46:52 as for the rest, it looks good 22:47:03 fe[nl]ix: it started out that way 22:47:13 I couldn't figure out how to make it work efficiently 22:47:26 insomnia1alt [~milan@port-92-204-54-175.dynamic.qsc.de] has joined #lisp 22:48:03 in particularly, I couldn't do (elt syms i) in an environment where I had access to both syms and i at the same time 22:48:42 you'll notice the general case (the t clause) where I do it in a function and it conses -- actually it conses a ton now because I have 64 gensyms 22:49:36 the main challenges where 1) that and 2) the fact that I don't know how many values will be inbound 22:50:26 -!- insomniaSalt [~milan@port-92-204-90-254.dynamic.qsc.de] has quit [Ping timeout: 240 seconds] 22:52:09 Whats the convention for naming constants? SBCL warns me using earmuffs... 22:52:32 what do they call +? piercings? 22:52:40 +the-constant+ 22:52:54 piercings is good :) thanks! 22:53:26 adu [~ajr@64.134.100.20] has joined #lisp 22:54:15 -!- mascotte [~mascotte_@AClermont-Ferrand-651-1-18-225.w86-194.abo.wanadoo.fr] has quit [Quit: Quitte] 22:54:18 slyrus: what's the value of +max-image-channels+ ? 22:54:23 -!- ehu [~ehuels@ip118-64-212-87.adsl2.static.versatel.nl] has quit [Ping timeout: 240 seconds] 22:54:25 64 :) 22:54:31 but that's absurdly large 22:54:37 could be 5 or so 22:54:46 then make it 5 22:54:50 -!- sabalaba [~sabalaba@67-194-0-98.wireless.umnet.umich.edu] has quit [Ping timeout: 255 seconds] 22:55:09 here it is in all its glory: https://github.com/slyrus/opticl/blob/master/opticl.lisp 22:55:35 well, yeah, but it still conses -- when I generate the arefs in a function anyway 22:57:54 -!- aidalgol [aidan@2002:453d:f72::1337:3] has quit [Quit: ZNC - http://znc.sourceforge.net] 22:58:32 aidalgol [aidan@2002:453d:f72::1337:3] has joined #lisp 23:00:15 Grazl [~Grazl@196.Red-79-150-125.dynamicIP.rima-tde.net] has joined #lisp 23:00:31 prxq: No, I just happen to know how to bounce the bots without bouncing the whole image. 23:00:37 slyrus: so an image is a generic array ? 23:00:38 tronador_ [~guille@190.67.59.189] has joined #lisp 23:00:49 yes, that's the idea 23:01:52 -!- eugu [~Miranda@213.141.157.147] has quit [Quit: eugu] 23:02:29 so each time a pixel is set the setf expander creates code that finds out the type of image and invokes the right setter 23:02:31 AndroUser2 [~androirc@166.132.242.158] has joined #lisp 23:02:31 -!- AndroUser2 [~androirc@166.132.242.158] has quit [Client Quit] 23:02:51 AndroUser2 [~androirc@166.132.242.158] has joined #lisp 23:03:08 gonzojive [~red@c-71-198-7-84.hsd1.ca.comcast.net] has joined #lisp 23:03:17 that was one approach 23:03:17 wouldn't it be better to wrap the image in a struct and compute the setter just once, when the image is created ? 23:04:03 in that case it would have to be a function, which can be auto-generated 23:04:05 the define-setf-expander approach generates the appropriate setf aref's 23:04:47 sure, but you would have to extract the function from the struct and then call it 23:04:50 -!- lurker-x [~androirc@c-75-72-99-111.hsd1.mn.comcast.net] has quit [Ping timeout: 240 seconds] 23:05:02 by using setf arefs and multiple values i can do all of this without consing 23:05:25 yes, but in a tight loop, you'd still be going through array-rank + case + array-dimension + case 23:05:35 no 23:05:55 Oh? 23:06:04 one deref + funcall seems cheaper to me 23:06:39 hmm... 23:07:13 slyrus: for example (loop for i below 256 (setf (pixel 5 i) (values 1 2 3 4))) 23:07:25 right 23:07:31 -!- AndroUser2 [~androirc@166.132.242.158] has quit [Ping timeout: 255 seconds] 23:07:39 (time (loop for i below 10000 do (setf (pixel a 0 0) (values 9 10 11 12)))) 23:07:51 uses 3M processor cycles, but doesn't cons 23:08:03 I think calling the funcall would 23:08:15 I wouldn't have type information about the derefed function at compile time 23:08:26 it would 23:08:33 the setf expander can provide that 23:08:33 -!- kleppari [~spa@bitbucket.is] has quit [Read error: Operation timed out] 23:09:10 (funcall (the (ftype ...) (img-setter img)) 1 2 3 4) 23:09:15 kleppari [~spa@bitbucket.is] has joined #lisp 23:09:17 (time (loop for i below 10000 do (setf (pixel/8-bit-rgba-image a 0 0) (values 9 10 11 12)))) only saves < 1M instructions 23:09:43 and has the benefit that images remain arrays, rather than instances of a class that wraps them 23:11:03 williambr [~william@host81-151-35-228.range81-151.btcentralplus.com] has joined #lisp 23:11:37 is that really a benefit ? 23:11:46 talyz [~user@ip35.tunnan.riksnet.nu] has joined #lisp 23:11:53 -!- silenius [~silenus@p54946621.dip.t-dialin.net] has quit [Quit: Leaving] 23:12:36 If the array is simple, shouldn't the compiler be able to figure out that the rank and dimension 2 will not change? 23:12:38 now that's a good question 23:12:44 beach: right 23:13:11 slyrus: Do you require the array to be simple? 23:13:41 I don't think I require it, but the arrays I've been working with are simple arrays 23:13:52 -!- slash_ [~unknown@pD955AE85.dip.t-dialin.net] has quit [Quit: Leaving.] 23:13:55 ah, I remember why i wanted arrays... 23:14:02 I wanted to be able to declare the type using CL types 23:14:48 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 23:15:06 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 23:16:38 bigjust` [~user@adsl-074-232-230-165.sip.asm.bellsouth.net] has joined #lisp 23:17:11 slyrus: [possibly silly, not well-thought-out] idea: What if you require tight loops to be wrapped in (say) (with-image ...) to establish an environment in which the rank and dimension 2 are known, and have the setf expander assume it is wrapped in something like that? 23:18:02 -!- mega1` [~user@catv4E5CABA2.pool.t-online.hu] has quit [Ping timeout: 240 seconds] 23:18:02 -!- mega1 [~quassel@catv4E5CABA2.pool.t-online.hu] has quit [Ping timeout: 240 seconds] 23:18:10 or use its &environment parameter 23:18:21 would that work in a function where the type of the image isn't known ahead of type? 23:18:42 Krystof: How would the &environment parameter be used for that? 23:18:59 (with-image (img 124 23) ...) -> (macrolet ((image-dimensions () (124 23))) ...) 23:19:16 Good idea. 23:19:19 then in the define-setf-expander, do (macroexpand-1 '(image-dimensions) environment) 23:19:22 sabalaba [~sabalaba@67-194-103-145.wireless.umnet.umich.edu] has joined #lisp 23:19:31 Yes, definitely a good idea. 23:19:45 if it macroexpands to a list with two elements, you can use that and statically detect bounds violations and/or elide bounds checks 23:19:59 otherwise, expand to a slower, run-time checking path 23:20:18 I want the run-time generated path to be reasonably fast, and I think I have that now 23:20:27 -!- rasterbar [~rasterbar@unaffiliated/rasterbar] has quit [Remote host closed the connection] 23:20:52 umm... let me rephrase that 23:21:12 I don't want to have to know the size of the array ahead of time for things to be fast 23:22:17 slyrus: right, but you could use the same idea to elide the tests for rank and dimension 2 [I think]. 23:22:41 slyrus: ... which would be very hard to avoid otherwise I would guess. 23:22:42 patches accepted :) 23:23:13 right now adding (declare (type 8-bit-rgb-image img)) around a tight loop makes a big difference 23:23:21 but even in the slow case I don't cons, which was the goal 23:24:04 -!- minion [~minion@common-lisp.net] has quit [Ping timeout: 240 seconds] 23:24:15 for instance, setting the values of an array based on the indices can be done in < 8 instructions per pixel * channel when I declare the type 23:24:33 rasterbar [~rasterbar@unaffiliated/rasterbar] has joined #lisp 23:24:46 about 10 times worse when I don't have the declaration, but even that case doesn't cons and, I'm betting, beats the pants off of calling some setter function 23:25:49 this has been an interesting (and challenging, for me anyway) exercise 23:26:18 I have a case of (blabla-macro 23:26:50 where I use backquote and ,@ to expand something conditionally 23:27:05 -!- Joreji [~thomas@79-126.eduroam.RWTH-Aachen.DE] has quit [Ping timeout: 240 seconds] 23:27:46 But i cant find a way to unquote, something inside the ,@(if ...) 23:30:27 ,@(if (something-p ) ` nil) 23:31:14 -!- HG` [~HG@xdsl-188-118-129-19.dip.osnanet.de] has quit [Quit: Leaving.] 23:32:17 Ok, nvm I just realised there's something very dumb with the way Im trying to do the whole thing 23:33:11 astoon [~astoon@109.188.225.39] has joined #lisp 23:34:11 -!- Grazl [~Grazl@196.Red-79-150-125.dynamicIP.rima-tde.net] has quit [Ping timeout: 276 seconds] 23:34:28 NihilistDandy [~ND@c-75-69-129-101.hsd1.nh.comcast.net] has joined #lisp 23:34:40 Grazl [~Grazl@196.Red-79-150-125.dynamicIP.rima-tde.net] has joined #lisp 23:38:04 -!- slyrus [~chatzilla@173-228-44-88.dsl.static.sonic.net] has quit [Ping timeout: 240 seconds] 23:39:00 -!- Davidbrcz [david@212-198-92-25.rev.numericable.fr] has quit [Read error: Operation timed out] 23:39:45 astoon_ [~astoon@109.188.225.39] has joined #lisp 23:42:32 -!- pizzledizzle [~pizdets@pool-96-250-215-244.nycmny.fios.verizon.net] has quit [Ping timeout: 255 seconds] 23:45:06 -!- malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has quit [Read error: Connection reset by peer] 23:45:14 malbertife [~marcoalbe@bl11-213-78.dsl.telepac.pt] has joined #lisp 23:46:40 does SBCL support watching variables / places? 23:46:51 ie. breaking when the value of a place changes 23:47:14 Sprayzor: you need an additional level of nesting around the form. 23:47:32 mathrick: not natively. 23:47:47 is it possible to support it non-natively? 23:50:18 -!- leifw [~leif@ool-18bac6ad.dyn.optonline.net] has quit [Ping timeout: 276 seconds] 23:50:48 -!- prxq [~mommer@mnhm-590c1cb4.pool.mediaWays.net] has quit [Quit: Leaving] 23:51:02 Phoodus [~foo@68.107.217.139] has joined #lisp 23:51:15 mathrick: I can think of a couple symbol-macro-based approaches; otherwise, you might be able to arrange something with memory protection tricks, but that would be hairy. 23:51:39 -!- mrSpec [~Spec@unaffiliated/mrspec] has quit [Remote host closed the connection] 23:51:58 pkhuong: nah, I simply figured out where I messed up and changed NREVERSE to REVERSE 23:52:52 *mathrick* notes that calling NREVERSE on input parameters is rarely a good idea 23:53:45 leifw [~leif@ool-18bac6ad.dyn.optonline.net] has joined #lisp