00:00:10 timjstewart [~tims@159.182.183.6] has joined #lisp
00:00:31 adeht: the 1.2 version of the protocol actually lets you give binary arguments to all commands: http://redis.io/topics/protocol
00:00:48 I have no idea if that translates to actual binary safety in the whole system, but it should in theory be possible
00:01:00 (all commands except SORT, that is, but I don't care about SORT)
00:01:55 antifuchs: yes, that is what I use
00:02:23 adeht: are you the author of cl-redis? (:
00:02:41 antifuchs: no, lredis: http://github.com/death/lredis
00:02:45 oh
00:02:49 cool, I should check that out
00:03:47 looks neat, I think I should use that (:
00:04:16 cool
00:05:23 agh, lredis isn't in ql yet (:
00:05:30 *antifuchs* makes a note to file a ticket about that
00:05:39 -!- pavelludiq [57f63ac1@gateway/web/freenode/ip.87.246.58.193] has quit [Ping timeout: 265 seconds]
00:05:45 -!- pierrep [~ppasteau@bas2-montreal42-3096486625.dsl.bell.ca] has quit [Remote host closed the connection]
00:06:08 -!- escapist1984 [57f63ac1@gateway/web/freenode/ip.87.246.58.193] has quit [Ping timeout: 265 seconds]
00:07:48 hah, drop-in replacement (:
00:08:16 pizzledizzle [~pizdets@pool-96-250-215-244.nycmny.fios.verizon.net] has joined #lisp
00:08:44 heh
00:09:30 pavelludiq [57f63ac1@gateway/web/freenode/ip.87.246.58.193] has joined #lisp
00:11:49 escapist1984 [57f63ac1@gateway/web/freenode/ip.87.246.58.193] has joined #lisp
00:11:54 seriously, this is way better (:
00:11:55 DarthShrine [~angus@pdpc/supporter/student/DarthShrine] has joined #lisp
00:12:02 -!- francogrex [~user@109.130.64.62] has quit [Quit: ERC Version 5.2 (IRC client for Emacs)]
00:12:44 glad it works for you
00:14:13 carlocci [~nes@93.37.195.204] has joined #lisp
00:15:50 -!- mejja [~chatzilla@c-b4b5e555.023-82-73746f38.cust.bredbandsbolaget.se] has quit [Quit: ChatZilla 0.9.86 [Firefox 3.6.13/20101203075014]]
00:16:17 -!- escapist1984 [57f63ac1@gateway/web/freenode/ip.87.246.58.193] has quit [Ping timeout: 265 seconds]
00:17:15 -!- pavelludiq [57f63ac1@gateway/web/freenode/ip.87.246.58.193] has quit [Ping timeout: 265 seconds]
00:17:49 antifuchs: note that if the function expects a response you can tell it to skip string conversion by passing :octets t
00:18:06 ah, that's cool
00:18:40 returning strings is good for debugability right now - I'll keep that in mind for later, though (:
00:18:46 (and I'm handling strings, just non-ascii ones)
00:18:54 -!- baoist [~baoist@c-98-240-174-169.hsd1.mn.comcast.net] has left #lisp
00:19:15 antifuchs: there's also some lispy "key" notation support.. e.g., you can use `(persons ,name id) when name is a string
00:19:51 parolang [~user@c-64-246-121-114.oregonrd-wifi-1261.amplex.net] has joined #lisp
00:20:14 antifuchs: and it'll translate to "PERSONS::ID"
00:20:27 nice!
00:21:43 escapist1984 [57f63ac1@gateway/web/freenode/ip.87.246.58.193] has joined #lisp
00:22:21 hey. does anyone know about a pure CL implementation for creating/extracting .tar.gz archives?
00:22:44 pavelludiq [57f63ac1@gateway/web/freenode/ip.87.246.58.193] has joined #lisp
00:23:09 dto: https://github.com/froydnj check chipz
00:23:13 and archive
00:23:22 -!- eugu [~Miranda@213.141.157.147] has quit [Quit: eugu]
00:23:35 are those in quicklisp?
00:23:42 i think xach uses something
00:23:46 in quicklisp itself
00:24:02 dto: I think xach uses froydnj code
00:25:57 -!- tmh [6c491b13@pdpc/supporter/sustaining/tmh] has quit [Ping timeout: 265 seconds]
00:26:02 adeht: yes, they're both in ql!
00:26:08 adeht: fabulous, thanks.
00:26:10 yvdriess [~Beef@109.129.148.152] has joined #lisp
00:26:32 Beetny [~Beetny@203.202.52.112] has joined #lisp
00:28:29 -!- yvdriess [~Beef@109.129.148.152] has quit [Client Quit]
00:28:51 -!- Beetny [~Beetny@203.202.52.112] has quit [Client Quit]
00:29:20 -!- pavelludiq [57f63ac1@gateway/web/freenode/ip.87.246.58.193] has quit [Ping timeout: 265 seconds]
00:30:15 -!- corruptmemory [~jim@96.246.167.18] has quit [Ping timeout: 245 seconds]
00:32:01 pavelludiq [57f63ac1@gateway/web/freenode/ip.87.246.58.193] has joined #lisp
00:33:49 -!- ltriant [~ltriant@lithium.mailguard.com.au] has quit [Read error: Connection reset by peer]
00:34:36 ltriant [~ltriant@lithium.mailguard.com.au] has joined #lisp
00:35:42 -!- Guthur [~Guthur@cpc11-belf9-2-0-cust855.2-1.cable.virginmedia.com] has quit [Quit: Leaving]
00:36:20 gigamonkey [~user@adsl-99-179-46-165.dsl.pltn13.sbcglobal.net] has joined #lisp
00:39:00 -!- pavelludiq [57f63ac1@gateway/web/freenode/ip.87.246.58.193] has quit [Ping timeout: 265 seconds]
00:39:00 -!- escapist1984 [57f63ac1@gateway/web/freenode/ip.87.246.58.193] has quit [Ping timeout: 265 seconds]
00:39:52 -!- Blkt [~user@93-45-213-247.ip104.fastwebnet.it] has quit [Ping timeout: 276 seconds]
00:40:02 -!- entropix [~entropi@192.55.55.39] has quit [Ping timeout: 250 seconds]
00:40:54 caoliver [~userName@75-134-208-20.dhcp.trcy.mi.charter.com] has joined #lisp
00:42:16 -!- caoliver [~userName@75-134-208-20.dhcp.trcy.mi.charter.com] has left #lisp
00:43:22 -!- zac314159 [~user@c-68-84-149-234.hsd1.nm.comcast.net] has quit [Remote host closed the connection]
00:46:50 -!- sixpoint8 [sixpoint8@d-ip-129-15-78-81.cs.ou.edu] has quit [Quit: leaving]
00:48:28 -!- timor1 [~timor@port-92-195-30-75.dynamic.qsc.de] has quit [Remote host closed the connection]
00:48:54 -!- Amadiro [~whoppix@ti0021a380-dhcp3255.bb.online.no] has quit [Quit: A subtle thought that is in error may yet give rise to fruitful inquiry that can establish truths of great value.]
00:49:24 sixpoint8 [sixpoint8@d-ip-129-15-78-81.cs.ou.edu] has joined #lisp
00:51:50 lredis talk made me recall http://paste.lisp.org/display/95670
00:52:01 vasile [~vasile@ool-4570abc6.dyn.optonline.net] has joined #lisp
00:53:15 pierrep [~ppasteau@bas1-montreal43-2925384990.dsl.bell.ca] has joined #lisp
00:53:43 -!- juniorroy [~juniorroy@212.36.224.57] has quit [Remote host closed the connection]
00:54:05 juniorroy [~juniorroy@212.36.224.57] has joined #lisp
00:54:07 nibbles!
00:54:19 -!- juniorroy [~juniorroy@212.36.224.57] has left #lisp
00:54:20 If only i had known that exists
00:54:34 Wouldn't have had to roll my own
00:54:52 drdo: talking about my mpd stats hack?
00:55:18 https://github.com/froydnj/nibbles
00:55:21 talking about this
00:55:23 oh
00:55:46 xyxxyyy [~xyxu@58.41.14.176] has joined #lisp
00:58:50 -!- freiksenet [~freiksene@cs181130165.pp.htv.fi] has quit [Ping timeout: 240 seconds]
01:01:35 -!- DarthShrine [~angus@pdpc/supporter/student/DarthShrine] has quit [Quit: DarthShrine]
01:03:10 -!- pinkwerks [2679e0fb@gateway/web/freenode/ip.38.121.224.251] has quit [Ping timeout: 265 seconds]
01:04:30 s0ber [~s0ber@111-240-229-100.dynamic.hinet.net] has joined #lisp
01:05:31 -!- HET2 [~diman@chello084114129176.4.15.vie.surfer.at] has quit [Quit: Leaving]
01:10:22 Salamander__ [~Salamande@ppp118-210-209-125.lns20.adl6.internode.on.net] has joined #lisp
01:12:31 -!- Salamander_ [~Salamande@ppp121-45-142-170.lns21.adl2.internode.on.net] has quit [Ping timeout: 240 seconds]
01:17:29 -!- PCChris [~PCChris@cpe-69-135-187-90.woh.res.rr.com] has quit [Ping timeout: 264 seconds]
01:26:26 kanru [~kanru@61-30-10-70.static.tfn.net.tw] has joined #lisp
01:27:31 pnq [~nick@ACA36943.ipt.aol.com] has joined #lisp
01:27:49 -!- zomgbie [~jesus@h081217131002.dyn.cm.kabsi.at] has quit [Ping timeout: 255 seconds]
01:30:26 -!- mahmul [~mrw@user-0can1en.cable.mindspring.com] has quit [Quit: WeeChat 0.3.2]
01:31:59 is there any way I can pass umlauts (encoded in a certain external format) to programs via run-program in sbcl?
01:32:03 it expects :ascii; setting :external-format on run-program has no effect, as does binding sb-alien:*default-c-string-external-format*
01:32:49 -!- ikki [~ikki@201.122.132.181] has quit [Ping timeout: 260 seconds]
01:33:39 antifuchs: iso-8859-1 and pretend characters are bytes?
01:33:44 pkhuong: :us-ascii
01:33:54 but it seems like it's sb-impl::*default-external-format* that does the trick
01:35:30 -!- rvncerr [~rvncerr@rvncerr.org] has quit [Ping timeout: 250 seconds]
01:36:53 ace4016 [ace4016@adsl-33-167-55.mia.bellsouth.net] has joined #lisp
01:37:05 TheSeparateOne [~jeffrey@ip72-207-124-108.sd.sd.cox.net] has joined #lisp
01:44:24 -!- parolang [~user@c-64-246-121-114.oregonrd-wifi-1261.amplex.net] has quit [Remote host closed the connection]
01:44:28 -!- TheSeparateOne [~jeffrey@ip72-207-124-108.sd.sd.cox.net] has quit [Remote host closed the connection]
01:44:39 parolang [~user@c-64-246-121-114.oregonrd-wifi-1261.amplex.net] has joined #lisp
01:46:14 -!- V-ille [~ville@dsl-olubrasgw1-fe4efb00-215.dhcp.inet.fi] has quit [Ping timeout: 260 seconds]
01:47:09 -!- Yuuhi [benni@p5483AD9B.dip.t-dialin.net] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)]
01:48:42 V-ille [~ville@dsl-olubrasgw1-fe4efb00-215.dhcp.inet.fi] has joined #lisp
01:49:45 -!- carlocci [~nes@93.37.195.204] has quit [Quit: eventually IE will rot and die]
01:51:05 -!- pierrep [~ppasteau@bas1-montreal43-2925384990.dsl.bell.ca] has quit [Ping timeout: 245 seconds]
01:51:05 PCChris [~PCChris@cpe-69-135-187-90.woh.res.rr.com] has joined #lisp
01:56:30 -!- PCChris [~PCChris@cpe-69-135-187-90.woh.res.rr.com] has quit [Ping timeout: 245 seconds]
01:56:50 fmeyer [~fmeyer@189.100.228.254] has joined #lisp
02:01:46 -!- xan_ [~xan@129.131.117.91.dynamic.mundo-r.com] has quit [Ping timeout: 276 seconds]
02:08:35 -!- sabalaba [~sabalaba@221.220.249.240] has quit [Ping timeout: 245 seconds]
02:10:13 -!- fmeyer [~fmeyer@189.100.228.254] has quit [Ping timeout: 240 seconds]
02:17:06 mtk [~mtk@ool-182c8e6c.dyn.optonline.net] has joined #lisp
02:18:54 -!- mtk [~mtk@ool-182c8e6c.dyn.optonline.net] has left #lisp
02:19:31 -!- me345 [~me345@adsl-71-131-133-80.dsl.sntc01.pacbell.net] has quit [Remote host closed the connection]
02:19:33 -!- Lochy [~lochy@59.94.101.145] has quit [Ping timeout: 240 seconds]
02:20:05 Lochy [~lochy@59.94.101.145] has joined #lisp
02:20:29 -!- Salamander__ is now known as Salamander
02:24:01 -!- pdelgallego [~pdelgalle@42.Red-217-125-2.staticIP.rima-tde.net] has quit [Ping timeout: 276 seconds]
02:25:44 abm [~chatzilla@ip68-227-28-42.lv.lv.cox.net] has joined #lisp
02:29:20 tmh [6c491b13@pdpc/supporter/sustaining/tmh] has joined #lisp
02:31:30 -!- schoppenhauer [~christoph@unaffiliated/schoppenhauer] has quit [Ping timeout: 245 seconds]
02:32:45 TheSeparateOne [~jeffrey@ip72-207-124-108.sd.sd.cox.net] has joined #lisp
02:32:46 mtk [~mtk@ool-182c8e6c.dyn.optonline.net] has joined #lisp
02:35:10 -!- parolang [~user@c-64-246-121-114.oregonrd-wifi-1261.amplex.net] has quit [Read error: Connection reset by peer]
02:35:28 -!- drdo [~user@2.208.54.77.rev.vodafone.pt] has quit [Remote host closed the connection]
02:35:35 -!- mtk [~mtk@ool-182c8e6c.dyn.optonline.net] has quit [Remote host closed the connection]
02:39:09 -!- gigamonkey [~user@adsl-99-179-46-165.dsl.pltn13.sbcglobal.net] has quit [Ping timeout: 260 seconds]
02:39:11 jsfb [~jon@unaffiliated/jsfb] has joined #lisp
02:40:04 drdo [~user@2.208.54.77.rev.vodafone.pt] has joined #lisp
02:41:46 mtk [~mtk@ool-182c8e6c.dyn.optonline.net] has joined #lisp
02:44:00 -!- mtk [~mtk@ool-182c8e6c.dyn.optonline.net] has left #lisp
02:45:11 -!- xyxxyyy [~xyxu@58.41.14.176] has quit [Ping timeout: 272 seconds]
02:45:33 xyxxyyy [~xyxu@58.41.14.176] has joined #lisp
02:48:05 -!- _s1gma [~herpderp@77.107.164.131] has quit [Read error: Connection reset by peer]
02:49:22 -!- abm [~chatzilla@ip68-227-28-42.lv.lv.cox.net] has quit [Quit: ChatZilla 0.9.86 [Firefox 3.6.13/20101206122310]]
02:55:26 -!- TheSeparateOne [~jeffrey@ip72-207-124-108.sd.sd.cox.net] has quit [Remote host closed the connection]
02:55:50 incandenza_ [~quassel@ip68-231-109-244.ph.ph.cox.net] has joined #lisp
02:56:06 -!- incandenza [~quassel@ip68-231-109-244.ph.ph.cox.net] has quit [Ping timeout: 250 seconds]
02:56:45 -!- incandenza_ is now known as incandenza
02:57:43 schoppenhauer [~christoph@unaffiliated/schoppenhauer] has joined #lisp
02:58:38 -!- s0ber [~s0ber@111-240-229-100.dynamic.hinet.net] has quit [Quit: leaving]
02:59:07 s0ber [~s0ber@111-240-229-100.dynamic.hinet.net] has joined #lisp
03:01:46 Alfa|WERK [~AlfaWolph@c-75-66-60-146.hsd1.tn.comcast.net] has joined #lisp
03:02:06 humasect [~humasect@S01060018f870b75e.rd.shawcable.net] has joined #lisp
03:03:05 On CCL, (TRUENAME #P"") => [directory that was current when Common Lisp was started]
03:03:35 In LispWorks, (TRUENAME #P"") => #P"C:/Windows/system32/"
03:04:19 So, the truename of the empty path is implementation specific. But, why is it valid at all?
03:04:26 cr0sis [~cr0sis@dsl-sp-81-140-21-243.in-addr.broadbandscope.com] has joined #lisp
03:04:34 -!- cr0sis [~cr0sis@dsl-sp-81-140-21-243.in-addr.broadbandscope.com] has left #lisp
03:05:10 tmh: ISTR it's NIL translating to :unspecific
03:05:29 that's NIL in pathname components. or maybe that was up to the implementation
03:06:08 dulouz [~dulouz@2002:d8fe:77db:0:211:2fff:fec3:eeea] has joined #lisp
03:06:51 Okay, that sort of makes sense. I think I would rather get an error, but I've found that when my expectations don't meet the behavior of CL, the CL version usually ends up having a good reason.
03:07:36 with pathnames that doesn't often tend to be true
03:08:50 I need to ruminate on this some more. I think a beer and college basketball on TV will help. :-)
03:09:06 have fun (:
03:09:24 -!- madnificent [~madnifice@83.101.62.132] has quit [Read error: Connection reset by peer]
03:10:23 madnificent [~madnifice@83.101.62.132] has joined #lisp
03:11:20 -!- rme [~rme@pool-70-105-86-63.chi.dsl-w.verizon.net] has left #lisp
03:14:13 -!- sdsds [~sdsds@dyn-16.sub2.cmts01.cable.TORON10.iasl.com] has quit [Ping timeout: 240 seconds]
03:24:09 DarthShrine [~angus@60-242-109-62.tpgi.com.au] has joined #lisp
03:24:09 -!- DarthShrine [~angus@60-242-109-62.tpgi.com.au] has quit [Changing host]
03:24:09 DarthShrine [~angus@pdpc/supporter/student/DarthShrine] has joined #lisp
03:25:10 In LOOP, is the BY clause in a FOR evaluated for each iteration or only once?
03:25:30 drl [~lat@125.167.140.159] has joined #lisp
03:25:54 sdsds [~sdsds@dyn-16.sub2.cmts01.cable.TORON10.iasl.com] has joined #lisp
03:26:42 eh, it's only once
03:26:54 Is there any way to have it evaluated each iteration?
03:27:47 -!- DarthShrine [~angus@pdpc/supporter/student/DarthShrine] has quit [Client Quit]
03:28:48 -!- Xantoz [~hejhej@c83-251-227-152.bredband.comhem.se] has quit [Ping timeout: 265 seconds]
03:29:20 -!- jimrthy [~jimrthy@ip68-13-249-220.ok.ok.cox.net] has left #lisp
03:29:58 -!- davazp [~user@3.Red-83-46-6.dynamicIP.rima-tde.net] has quit [Remote host closed the connection]
03:30:15 Xantoz [~hejhej@c83-251-227-152.bredband.comhem.se] has joined #lisp
03:32:18 DarthShrine [~angus@60-242-109-62.tpgi.com.au] has joined #lisp
03:32:18 -!- DarthShrine [~angus@60-242-109-62.tpgi.com.au] has quit [Changing host]
03:32:18 DarthShrine [~angus@pdpc/supporter/student/DarthShrine] has joined #lisp
03:34:25 -!- dto [~dto@pool-96-252-62-25.bstnma.fios.verizon.net] has quit [Ping timeout: 245 seconds]
03:36:46 dto [~dto@pool-96-252-62-25.bstnma.fios.verizon.net] has joined #lisp
03:38:49 -!- katesmith [~katesmith@unaffiliated/costume] has quit [Read error: Connection reset by peer]
03:39:39 katesmith [~katesmith@unaffiliated/costume] has joined #lisp
03:41:17 -!- schoppenhauer [~christoph@unaffiliated/schoppenhauer] has quit [Ping timeout: 265 seconds]
03:46:13 -!- drl [~lat@125.167.140.159] has quit [Quit: Leaving]
03:48:34 makao007 [~makao007@61.142.209.146] has joined #lisp
03:51:09 -!- makao007 [~makao007@61.142.209.146] has quit [Remote host closed the connection]
03:51:16 -!- dto [~dto@pool-96-252-62-25.bstnma.fios.verizon.net] has quit [Quit: Leaving.]
03:51:30 makao007 [~makao007@61.142.209.146] has joined #lisp
03:51:33 -!- kanru [~kanru@61-30-10-70.static.tfn.net.tw] has quit [Ping timeout: 240 seconds]
03:59:40 jimmybean [ada9ef02@gateway/web/freenode/ip.173.169.239.2] has joined #lisp
04:00:33 csmax [~max@p5DE8F408.dip.t-dialin.net] has joined #lisp
04:00:34 happy holidays #lisp
04:01:38 i'm having a little bit of trouble with a small piece of code, if anyone has some cycles to spare
04:03:53 -!- sdsds [~sdsds@dyn-16.sub2.cmts01.cable.TORON10.iasl.com] has quit [Ping timeout: 240 seconds]
04:04:07 -!- csmax_ [~max@p5DE8E905.dip.t-dialin.net] has quit [Ping timeout: 276 seconds]
04:04:11 jimmybean: Show it
04:05:46 ok
04:05:56 http://paste.lisp.org/+2J1E
04:06:00 jimmybean: also, don't ask to ask
04:06:22 What's the problem with the code?
04:06:30 stassats [~stassats@wikipedia/stassats] has joined #lisp
04:06:39 roger, thanks. for reference I am trying to answer problem 10 of the 99 lisp questions
04:06:55 -!- marijnjh [~user@p5DDB0B91.dip.t-dialin.net] has quit [Ping timeout: 245 seconds]
04:06:56 can i have a link to the problem description?
04:07:18 when the code runs with the example line at the bottom, it gives (2 4 1 1 9 1 (D))
04:07:19 sure
04:07:30 http://www.ic.unicamp.br/~meidanis/courses/mc336/2006s2/funcional/L-99_Ninety-Nine_Lisp_Problems.html
04:07:33 problem 10
04:08:28 i've had problems with using the list command in my recursive functions, it likes to make lists inside of lists etc. I think I don't understand the way it works
04:09:08 why does it have to be recursive?
04:10:03 It doesn't. I want it to be so I learn something new (1) and (2) I don't know common lisp looping very well, and so far i've been able to give recursive solutions
04:10:11 jimmybean: what lisp are you using?
04:10:19 one sec
04:10:34 tmh: (truename #P"") #P is specified to be equivalent to #.(parse-namestring "") therefore the *default-pathname-defaults* merging must be done at read time.
04:11:01 clozure, a week old checkout
04:11:31 common lisp then
04:11:49 I'm not saying I have the right answer, but pack-a2 gives me the right numbers, I just don't know why p10 doesn't make a new list each time its called
04:11:56 mitre: yes sorry, common lisp
04:12:28 -!- bgs100 [~ian@unaffiliated/bgs100] has quit [Quit: nighty night]
04:12:35 -!- humasect [~humasect@S01060018f870b75e.rd.shawcable.net] has quit [Read error: Connection reset by peer]
04:13:12 humasect [~humasect@S01060018f870b75e.rd.shawcable.net] has joined #lisp
04:13:18 jimmybean: did you solve number 9?
04:13:24 mitre: yes
04:13:55 mitre: i've solved them all up to 10 so far
04:15:12 (mapcar (lambda (list) (list (length list) (car list))) (p09-output))
04:15:15 mitre: so I did the same sort of thing with 09, in that I run the whole list through two functions on the top level.
04:15:19 jimmybean: fwiw, http://paste.lisp.org/display/117986#1 is how i'd write it
04:16:31 mitre: The reason I needed to change the top level of p10 is that I need to run a function that gives me a count of the items and then return that number, and a higher level function (probably) needs to return a list with the result of the count and the current element
04:17:23 stassats: thank you very much for the loop example, I'll try out an approach with it!
04:17:47 jimmybean: are you reading Practical Common Lisp?
04:18:26 kanru [~kanru@61-30-10-70.static.tfn.net.tw] has joined #lisp
04:18:47 stassats: yes, I haven't gotten far, but just passed the point where the different function argument types are enumerated. I understand that pcl has a good chapter on demystifying loop, right?
04:19:21 -!- humasect [~humasect@S01060018f870b75e.rd.shawcable.net] has quit [Quit: Leaving...]
04:19:34 jimmybean: that's right, so i suggest you to read those chapters beforehand
04:19:38 TraumaPrincess [~TraumaPon@124-148-49-251.dyn.iinet.net.au] has joined #lisp
04:19:49 -!- mheld [~mheld@pool-173-76-224-45.bstnma.fios.verizon.net] has quit [Quit: mheld]
04:20:20 stassats: love the use of shiftf there
04:21:39 -!- kanru [~kanru@61-30-10-70.static.tfn.net.tw] has quit [Excess Flood]
04:21:41 i didn't like to use it, but i figured it'd look better than "and (setf count 1)"
04:21:47 -!- TraumaPrincess [~TraumaPon@124-148-49-251.dyn.iinet.net.au] has left #lisp
04:22:25 mheld_ [~mheld@pool-173-76-224-45.bstnma.fios.verizon.net] has joined #lisp
04:23:04 i'm still unsure that using shiftf like this is more clear
04:23:06 kanru [~kanru@61-30-10-70.static.tfn.net.tw] has joined #lisp
04:23:50 mitre: does my code look sane?
04:24:39 jimmybean: if I say no, will you stop coding?
04:25:25 mitre: lol no.
04:25:29 jimmybean: I think it's painfully sane, but you'
04:25:40 you're in good company here
04:26:18 mitre: I know someone elses recursion can be hard to wrap your head around, or at least it is for me coming into lisp, but
04:28:01 thank yous for your help
04:28:22 jimmybean: PCL, Gentle Intro, CLHS
04:29:19 recursion isn't the easiest thing when it comes to iteration
04:30:56 i if i were to write this function as a recursive, i wouldn't use any helper functions, because it's not easy to compose them
04:31:13 pierrep [~ppasteau@bas1-montreal43-2925384990.dsl.bell.ca] has joined #lisp
04:31:28 -!- kmwallio [~kmwallio@pool-96-241-63-3.washdc.fios.verizon.net] has quit [Remote host closed the connection]
04:32:43 without doing the same thing twice, that is
04:33:04 because you have two almost identical functions
04:33:30 pjb: Thanks for the info. I need to think about how that impacts what I'm trying to do.
04:34:12 -!- rfg [~rfg@client-86-25-219-19.glw-bng-011.adsl.virginmedia.net] has quit [Quit: rfg]
04:34:49 jimmybean: modify ((null (cdr list)) list) in pack-a2 to ((null (cdr list)) 1)
04:35:10 pjb: In both CCL and LispWorks, *DEFAULT-PATHNAME-DEFAULTS* is also #P""
04:35:33 stassats: yes I am iritated that I have nearly 2 identical functions. For simpler recursions i pass an optional variable to hold my state, but for things like this where each loop needs to do different things, I don't have what it takes yet to remove this duplication without a loop structure
04:35:58 I think I'm going to have to read Chapter 19 of the hyperspec entirely, not just sections.
04:36:26 jimmybean: http://paste.lisp.org/display/117986#2
04:36:39 or better have it look that way
04:38:26 -!- pizzledizzle [~pizdets@pool-96-250-215-244.nycmny.fios.verizon.net] has quit []
04:38:31 MindVirus [~mindvirus@unaffiliated/mindvirus] has joined #lisp
04:39:15 stassats: I see. Copying old code that would work, I couldn't yet see how that section could be refined.
04:39:43 Could someone take a look at the error in the first annotation here? http://paste.lisp.org/display/117991
04:40:06 I don't understand the issue. The error occurs when I call (new-game). I included all relevant code in the paste.
04:41:28 osoleve: You have a 2D array and are using AREF with only 1 subscript
04:42:31 drdo: In place-boat? I thought I had both subscripts in the cond
04:43:11 It doesn't work like you think it does
04:43:19 (+ (x-coord pos) (* (if (< pos 50) 1 -1) offset))
04:43:24 This does nothing
04:44:07 oh? dang. what am i doing wrong?
04:44:29 (fun (progn 1 2))
04:44:46 This isn't equivalent to (fun 1 2), it's equivalent to (fun 2)
04:44:58 ohhh
04:45:00 That's your problem in the cond
04:45:02 osoleve: you're misusing cond
04:45:31 it's not like each clause is an IF
04:46:06 stassats: The problem is that he has 2 expressions in the implicit progn
04:46:22 and he was thinking aref would get called with the results of those 2
04:46:38 drdo: the problem is that osoleve thinks it's like two IFs
04:46:55 stassats: what is that supposed to mean?
04:46:58 osoleve: so you need (aref *ans-board* (if (= dir 0) x y) (if (= dir 1) x y))
04:47:04 drdo: this
04:47:22 stassats: with all due respect, drdo has my problem correct
04:47:23 That doesn't mean he thinks it's 2 if's
04:48:11 isn't what i said correct?
04:48:26 how do I kill a paren in paredit?
04:48:43 no, what i want to do is call BOTH x and y, not either
04:48:49 sunnyps [~sunnyps@36.snat-111-91-127.hns.net.in] has joined #lisp
04:48:49 ok, maybe you don't think that it's like two IFs, but two IFs is one of the solutions
04:48:58 stassats: The solution you proposed is correct
04:49:03 But that was not the confusion he had
04:49:37 i see what you're saying, though, stassats, and i'll try to implement it
04:50:19 the other is (multiple-value-call #'aref (cond ((= dir 0) (values x y) ((= dir 1) (values x y)))))
04:50:49 stassats: I was going to say that, but it's not possible
04:50:53 He's using SETF
04:51:10 right
04:51:22 (apply #'aref (cond ((= dir 0) (list x y) ((= dir 1) (list x y)))))
04:52:45 -!- tmh [6c491b13@pdpc/supporter/sustaining/tmh] has quit [Ping timeout: 265 seconds]
04:53:14 wow, setf is defined for apply?
04:53:47 (setf (row-major-aref array (cond ((= dir 0) (array-row-major-index array x y) ((= dir 1) (array-row-major-index array y x))))))
04:54:10 drdo: sure
04:54:22 for aref and friends, at least
04:54:39 fmeyer [~fmeyer@189.100.228.254] has joined #lisp
04:55:02 why not for multiple-value-call too then?
04:55:49 tmh [63972ac4@pdpc/supporter/sustaining/tmh] has joined #lisp
04:56:11 Weird network issues with my router.
04:56:42 i like the row-major-aref solution
04:56:50 it doesn't cons!
04:57:22 I don't like any solution, they are all pretty awkward
04:58:08 But yes, i think that's the best one considering the possibilities
04:59:49 too bad there's no column-major-aref
05:00:43 You could write one.
05:01:21 jimmybean: my take on run-length http://paste.lisp.org/display/117986#3
05:02:26 rvncerr [~rvncerr@rvncerr.org] has joined #lisp
05:03:50 woo! i got it working. I used stassats' if solution, and then had to modify x-coord so that it rounded
05:04:09 tomorrow's assignment will be to modify it so that the boats don't intersect or overlap
05:04:22 thanks for your help, guys
05:05:32 -!- mheld_ [~mheld@pool-173-76-224-45.bstnma.fios.verizon.net] has quit [Quit: mheld_]
05:07:14 mitre: wow. If i think I read the flow right, you have done what I wanted to do. Although, I see how crazy it is to read, you really gotta sit there for a second to let it steep
05:08:02 mitre: however, thank you! This style was what I was looking for!
05:08:22 np
05:10:34 -!- timjstewart [~tims@159.182.183.6] has left #lisp
05:11:13 Is there a function combining MEMBER and POSITION? (yet returns the values of both)
05:11:22 *i.e.
05:11:54 no
05:13:37 mitre: actually, I have a few questions about your approach. in your first cond test, why do you create a list of a list?
05:16:18 askatasuna [~askatasun@190.97.33.72] has joined #lisp
05:18:27 jimmybean: my modification of mitre's version: http://paste.lisp.org/display/117986#4
05:18:59 -!- fmeyer [~fmeyer@189.100.228.254] has quit [Ping timeout: 240 seconds]
05:20:20 stassats: thank you. this seems very clear
05:20:38 Goodnigth
05:20:41 http://paste.lisp.org/+2J1E/5
05:20:44 my take on it
05:20:44 *Goodnight*
05:20:49 -!- tmh [63972ac4@pdpc/supporter/sustaining/tmh] has quit [Quit: Page closed]
05:21:04 very clear i think
05:21:40 drdo: i see a striking resemblance to http://paste.lisp.org/display/117986#1
05:22:04 yes lol
05:22:08 i just scrolled up the page
05:22:10 and noticed it
05:23:20 I see that I was trying to return a recursive list of additions to get the count, when I really just wanted to pass the current count in as an argument. that would have opened up some doors. thanks
05:23:49 and i'll check out those chapters on the loop construct so maybe next time I can take advantage of it
05:24:18 -!- evhan [~evhan@76-250-39-229.lightspeed.mdsnwi.sbcglobal.net] has quit [Ping timeout: 250 seconds]
05:25:56 Has anyone got sane synaptics settings on a macbook?
05:26:49 -!- jsoft_ [~jsoft@unaffiliated/jsoft] has quit [Ping timeout: 240 seconds]
05:27:43 -!- SegFaultAX [~SegFaultA@c-24-4-147-168.hsd1.ca.comcast.net] has quit [Quit: Lost terminal]
05:27:56 -!- makao007 [~makao007@61.142.209.146] has left #lisp
05:28:34 jsoft_ [~jsoft@unaffiliated/jsoft] has joined #lisp
05:28:42 for loop-haters: http://paste.lisp.org/display/117986#6
05:29:20 -!- dulouz [~dulouz@2002:d8fe:77db:0:211:2fff:fec3:eeea] has quit [Remote host closed the connection]
05:29:46 I only hate loop in the sense that it's not extensible
05:30:31 and that it doesn't have something like cond
05:30:35 hating loop is cool and hip
05:30:55 writing lot's of END's in a row is awkward
05:31:02 i like loop
05:31:09 loop is wonderful gr8
05:31:17 rme [~rme@pool-70-105-86-63.chi.dsl-w.verizon.net] has joined #lisp
05:31:38 Quadrescence: you're boring and old-school, what do you understand in coll & hip?
05:31:43 cool
05:32:05 stassats: loop does have some problems
05:32:05 isnt haskell cool and hip these days?
05:32:10 no sign of loop there
05:33:10 -!- xavieran [~xavieran@ppp118-209-249-120.lns20.mel6.internode.on.net] has quit [Ping timeout: 276 seconds]
05:33:25 Haskell is cool for writing little fibonaccis
05:33:55 not so for big fibonacci?
05:34:16 when you try to write big fibonacci's it gets really awkward really fast
05:34:25 xavieran [~xavieran@ppp118-209-249-120.lns20.mel6.internode.on.net] has joined #lisp
05:35:17 learn a haskell here http://symbo1ics.com/blog/?p=87
05:35:36 drdo: good mind exercise, i guess, like crossword puzzles
05:35:54 And trying to remember precedence rules in haskell is a joke
05:35:57 though i bet unlambda is more suited for this
05:36:10 drdo: can't you write (+) 1 2
05:36:16 yes
05:36:17 There are 9 levels of precedence if i'm not mistaken, which you can specify for your functions
05:36:46 stassats: You can
05:37:07 But that defeats the whole purpose of having infix functions with 9 precedence levels!
05:38:08 I think they wanted to appeal to perl programmers too
05:38:16 Haskell code looks a lot like perl
05:38:54 i think that's enough non-lisp bashing, let's return to lisp-praising
05:39:56 Haskell has some nice ideas, but it's a disaster as far as syntax goes
05:40:25 i bet they grow to like it, like parenthesis
05:41:17 No one really reads parenthesis, we indent code for a reason
05:42:03 About that, "someone" should fix lisp-mode
05:42:32 I tried to do it, i swear, but each function is like 2 pages long and i gave up after looking at it
05:42:51 -!- MetalDust [~metaldust@75-32-203-61.lightspeed.ftwotx.sbcglobal.net] has quit [Read error: Connection reset by peer]
05:43:20 MetalDust [~metaldust@75-32-203-61.lightspeed.ftwotx.sbcglobal.net] has joined #lisp
05:43:26 -!- MetalDust [~metaldust@75-32-203-61.lightspeed.ftwotx.sbcglobal.net] has quit [Client Quit]
05:44:38 MetalDust [~metaldust@75-32-203-61.lightspeed.ftwotx.sbcglobal.net] has joined #lisp
05:45:03 slyrus [~chatzilla@adsl-75-36-217-249.dsl.pltn13.sbcglobal.net] has joined #lisp
05:45:11 drdo: i think it's unfair to judge something based on your current experience
05:45:38 many are afraid of parenthesis, because they haven't used them before in such a way
05:45:58 stassats: I know many are
05:45:59 -!- mindCrime is now known as _mindCrime
05:46:32 stassats: And it's not unfair, everyone was inexperienced when they started
05:47:17 well, some people are trying to project their previous experience, like say with Java or C, onto Lisp
05:47:58 I started programming in C
05:49:37 -!- jsfb [~jon@unaffiliated/jsfb] has quit [Quit: Leaving]
05:52:03 Is it possible to return another value when using MAXIMIZE in LOOP?
05:52:13 no
05:52:30 though, what do you mean by that?
05:52:32 I want to maximize something but i don't want the maximized value, i want the stuff that led to that maximum
05:52:45 right, no still holds
05:52:53 meh
05:53:14 that's my top dissatisfaction with loop
05:53:27 This is an example of a problem with loop
05:55:10 Now i'm going to have to write this by hand, which was the problem loop was supposed to solve
05:55:53 loop in sbcl is extensible
05:57:08 kushal [~kdas@fedora/kushal] has joined #lisp
05:58:20 Is there a dotimes where i can specify the starting value?
05:58:33 no
05:59:10 you can (dotimes (i (+ end start)) (let ((i (+ i offset))) ...))
05:59:19 s/offset/start/
06:01:04 That's really terrible :P
06:01:15 Might as well go ahead and use loop
06:01:48 ramkrsna [~ramkrsna@unaffiliated/ramkrsna] has joined #lisp
06:09:56 -!- ASau [~user@95-26-92-70.broadband.corbina.ru] has quit [Remote host closed the connection]
06:10:16 xud477_ [~aniall@212.203.98.114] has joined #lisp
06:11:51 ASau [~user@95-26-92-70.broadband.corbina.ru] has joined #lisp
06:12:01 -!- jimmybean [ada9ef02@gateway/web/freenode/ip.173.169.239.2] has quit [Ping timeout: 265 seconds]
06:16:01 dto [~user@pool-96-252-62-25.bstnma.fios.verizon.net] has joined #lisp
06:16:37 hello. i run sbcl SBCL 1.0.45.3. the following form causes sbcl to crash: (string #\GREEK_SMALL_LETTER_LAMDA)
06:16:53 crash, as in slime connection terminated unexpectedly.
06:18:07 happens here too, on sbcl 1.0.44
06:18:16 that it means that either of both aren't configured for unicode
06:18:27 -!- Salamander [~Salamande@ppp118-210-209-125.lns20.adl6.internode.on.net] has quit [Ping timeout: 265 seconds]
06:18:28 but if you add the B to lambda
06:18:34 it gives an error saying not found
06:18:38 and doesn't crash.
06:18:56 it's spelled correctly
06:19:13 i know
06:19:22 what i mean is that unicode seems to be availale
06:19:34 available, if it knows whether or not LAMDA is the correct one.
06:19:39 How do i change sbcl's encoding?
06:20:00 dto: no, slime and sbcl should be communicating using unicode
06:20:02 good evening stassats
06:20:16 (:EXTERNAL-FORMAT :LATIN-1):
06:20:16