00:00:58 -!- pspace [~andrew@adsl-75-10-158-45.dsl.bcvloh.sbcglobal.net] has quit [Ping timeout: 260 seconds] 00:04:56 *Xach* tries building clisp with clang 00:05:26 -!- Gertm [~Gertm@dD576D0D2.access.telenet.be] has quit [Ping timeout: 260 seconds] 00:05:36 it got to be better than gcc, they both start with "cl" 00:05:42 -!- marsell [~marsell@120.18.87.106] has quit [Ping timeout: 244 seconds] 00:06:24 I somehow suspect future failure... due to not supporting some gccism 00:06:50 you can build sbcl with clang with minimal changes to sbcl 00:07:24 stassats: Last time I looked into CLISP's code, I ran away screaming. SBCL didn't manage to do that once 00:07:24 p_l: I think the only gccism we use are related to inline. 00:07:32 if only i understood what thus changes were doing, i'd commit them 00:07:40 those 00:09:41 -!- mrSpec [~Spec@unaffiliated/mrspec] has quit [Remote host closed the connection] 00:09:48 although i don't think they break anything, so i might as well do this 00:13:29 It actually compiled do completion, unlike with gcc on this system. 00:14:31 to completion, rather. 00:15:26 -!- gigamonkey [~user@adsl-99-179-45-19.dsl.pltn13.sbcglobal.net] has quit [Ping timeout: 258 seconds] 00:17:35 -!- wildnux [~wildnux@68-191-210-76.dhcp.dntn.tx.charter.com] has quit [Ping timeout: 244 seconds] 00:22:05 -!- wishbone4 [~user@167.216.131.126] has quit [Remote host closed the connection] 00:22:30 *Xach* wonders if cmucl is the last #p"~/" holdout 00:25:45 replore [~replore@203.152.213.161.static.zoot.jp] has joined #lisp 00:26:14 tsuru`` [~charlie@adsl-98-87-49-34.bna.bellsouth.net] has joined #lisp 00:26:22 Xach: ~ is supported in lispworks, was there a reason you wrote ~/ 00:26:24 -!- lutok [~user@ip98-169-240-101.dc.dc.cox.net] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)] 00:26:49 -!- bhyde_ [~bhyde@c-66-30-201-212.hsd1.ma.comcast.net] has left #lisp 00:26:57 bhyde_ [~bhyde@c-66-30-201-212.hsd1.ma.comcast.net] has joined #lisp 00:27:27 bhyde_: I like my directory pathnames with trailing slashes in the namestring. 00:27:35 Amyn [~abennama@m328eth.crans.org] has joined #lisp 00:27:47 lars_t_h_ [~lars_t_h@0132300253.0.fullrate.dk] has joined #lisp 00:28:05 -!- tsuru` [~charlie@adsl-74-179-30-15.bna.bellsouth.net] has quit [Ping timeout: 258 seconds] 00:28:06 Xach: me too 00:29:28 -!- Amyn1 [~abennama@m328eth.crans.org] has quit [Ping timeout: 244 seconds] 00:29:53 akovalenko: thanks for the interesting exposition on sbcl-devel. 00:30:28 (equal (probe-file "~/") (probe-file "~")) --> T  it has always made my brain hurt 00:35:36 -!- Kenjin [~josesanto@bl15-226-231.dsl.telepac.pt] has quit [Quit: Get MacIrssi - http://www.sysctl.co.uk/projects/macirssi/] 00:36:33 -!- Bike [~Glossina@69.166.35.237] has quit [Ping timeout: 255 seconds] 00:41:34 Brendan_T [~brendan@46.105.251.111] has joined #lisp 00:42:58 -!- oudeis [~oudeis@222.126.197.129] has quit [Ping timeout: 260 seconds] 00:44:17 samebchase [~samuel@76.73.121.203] has joined #lisp 00:49:56 Fare [~Fare@173-9-65-97-NewEngland.hfc.comcastbusiness.net] has joined #lisp 00:50:35 ChibaPet [~mason@c-68-58-147-105.hsd1.in.comcast.net] has joined #lisp 01:04:26 xyxu [~xyxu@58.41.14.46] has joined #lisp 01:04:52 oudeis [~oudeis@59.37.63.109] has joined #lisp 01:05:53 -!- drwho [~drwho@static-76-160-37-137.dsl.cavtel.net] has quit [Quit: leaving] 01:06:09 superflit [~superflit@71-33-156-49.hlrn.qwest.net] has joined #lisp 01:07:21 -!- tangliSabotage [~tanglisha@c-71-231-137-202.hsd1.wa.comcast.net] has quit [Quit: tangliSabotage] 01:13:00 -!- df [~df@163.8.187.81.in-addr.arpa] has quit [Ping timeout: 255 seconds] 01:13:19 Bike_ [~Glossina@71-214-110-173.ptld.qwest.net] has joined #lisp 01:13:49 Bike__ [~Glossina@71-214-110-173.ptld.qwest.net] has joined #lisp 01:17:35 -!- Bike_ [~Glossina@71-214-110-173.ptld.qwest.net] has quit [Ping timeout: 252 seconds] 01:18:07 -!- Bike__ [~Glossina@71-214-110-173.ptld.qwest.net] has quit [Ping timeout: 248 seconds] 01:18:59 -!- dnolen [~davidnole@pool-68-161-99-216.ny325.east.verizon.net] has quit [Quit: dnolen] 01:20:14 Bike [~Glossina@71-214-110-173.ptld.qwest.net] has joined #lisp 01:20:58 tanglisha [~tanglisha@c-71-231-137-202.hsd1.wa.comcast.net] has joined #lisp 01:21:32 -!- SegFaultAX|work [~mkbernard@173.228.45.162] has quit [Quit: leaving] 01:21:58 gaidal [~gaidal@61.144.106.123] has joined #lisp 01:23:06 Administrator [~quassel@69.158.121.24] has joined #lisp 01:23:07 -!- gaidal [~gaidal@61.144.106.123] has quit [Read error: Connection reset by peer] 01:23:27 gaidal [~gaidal@61.144.106.123] has joined #lisp 01:23:32 -!- Administrator is now known as Guest43325 01:31:55 wildnux [~wildnux@68-191-210-76.dhcp.dntn.tx.charter.com] has joined #lisp 01:33:14 realitygrill [~realitygr@76.226.212.207] has joined #lisp 01:39:47 lutok [~user@ip98-169-240-101.dc.dc.cox.net] has joined #lisp 01:53:16 aliao [~john@123.5.152.134] has joined #lisp 01:55:53 -!- kennyd [~kennyd@93-138-102-57.adsl.net.t-com.hr] has quit [Ping timeout: 260 seconds] 01:56:56 -!- aliao [~john@123.5.152.134] has left #lisp 01:57:23 ISF [~ivan@201.82.172.81] has joined #lisp 01:57:34 sykopomp [~sykopomp@gateway/tor-sasl/sykopomp] has joined #lisp 02:01:16 phzbOx [~pheze@68.67.68.168] has joined #lisp 02:01:42 Hi! I'm searching a way to repeat a character n time. I've been trying my luck with make-string without success. Thank you 02:01:54 kennyd [~kennyd@93-141-27-31.adsl.net.t-com.hr] has joined #lisp 02:02:36 (make-string n :initial-element #\character) 02:02:48 -!- Brendan_T [~brendan@46.105.251.111] has quit [Remote host closed the connection] 02:03:06 oh, meh thank you sir 02:03:37 Brendan_T [~brendan@46.105.251.111] has joined #lisp 02:03:47 but what do you mean by repeat? do you want to print it? 02:04:08 No, what you said is exactly what I wanted 02:04:37 I wasn't using *literaly* the :initial-element.. I somewhat thought it was only there in the doc.. so I used (make-string n #\Space) :p 02:05:27 I'm still trying to figure out the big difference between macros and functions. 02:05:57 When I google it, I get 'you can extend the language with macros' everywhere, but not a single example illustrating this 02:06:07 phryk: Try to write the function 'if' 02:06:17 you shouldn't use google as your guide 02:06:24 -!- tanglisha [~tanglisha@c-71-231-137-202.hsd1.wa.comcast.net] has quit [Quit: tanglisha] 02:06:25 have you tried reading a proper book? 02:06:39 say, Practical Common Lisp? 02:07:03 i looked into pcl, and one book i have in paper at home as well as some articles and just didn't get it. 02:07:24 "looked" as in "read carefully"? 02:07:43 stassats: As in "gave up because I didn't understand shit" 02:08:05 that's why you didn't understand it, because you gave up 02:08:27 I do understand that functions return values while macros return a form (that the right term?) 02:08:28 superflit_ [~superflit@71-33-156-49.hlrn.qwest.net] has joined #lisp 02:08:50 -!- ikki [~ikki@201.155.92.12] has quit [Quit: Leaving] 02:08:53 macros are actually functions 02:08:54 zardoz8 [~zardoz8@76.73.16.26] has joined #lisp 02:08:58 -!- superflit [~superflit@71-33-156-49.hlrn.qwest.net] has quit [Read error: Connection reset by peer] 02:08:58 -!- superflit_ is now known as superflit 02:09:13 but they work at a different time than normal functions and they work on source code 02:10:26 so basically macros are not ever compiled? 02:10:38 phryk: Use any language you're familiar with and try to write the function 'if'.. You'll realise that's impossible because if you pass the if-clause and the else-clause to your function, they will both get executed. (say you pass to print statements). Macro let you create a function that operate at the code level... so your print isn't evaluated.. it's just passed as-code. And your macro-function returns *real code*, and only that get executed. 02:10:39 and they return source code as well, which you can call "a form" 02:11:25 phryk: your question doesn't make sense 02:12:04 That's right I had a wrong thought there. Sorry it's quite late over here. 02:12:23 macros are expanded before compilation 02:12:52 you may forget about compilation and say "they are expanded before execution" 02:13:07 this is a good simple example. http://common-lisp.net/project/araneida/araneida-release/utility/aif.lisp 02:13:24 it's like C++ #define but on steroids. (I'll probably get a ban for comparing C macro with Lisp but oh well) 02:14:43 Kron_ [~Kron@69.166.22.207] has joined #lisp 02:15:12 zardoz8: I don't get why the aif wouldn't work as function :( 02:15:20 try to write it with a function 02:15:42 I'd do exactly the same with defun instead of defmacro 02:16:08 and (aif (some-function) (use it)) will work ? 02:16:32 use being a function, it being the variable macro created 02:16:40 Probably not, but I only know that because you asked. 02:16:56 it is assigned to the return value of (some-function) 02:18:48 -!- wildnux [~wildnux@68-191-210-76.dhcp.dntn.tx.charter.com] has quit [Quit: Konversation terminated!] 02:19:10 wildnux [~wildnux@68-191-210-76.dhcp.dntn.tx.charter.com] has joined #lisp 02:19:30 -!- wildnux [~wildnux@68-191-210-76.dhcp.dntn.tx.charter.com] has quit [Read error: Connection reset by peer] 02:19:38 so it evaluates the return value of (some-function) doesn't it do the same when using a macro? 02:19:39 (macroexpand-1 '(aif (some-function) (use it))) => (LET ((IT (SOME-FUNCTION))) (IF IT (USE IT) NIL)) 02:19:49 wildnux [~wildnux@68-191-210-76.dhcp.dntn.tx.charter.com] has joined #lisp 02:20:32 (defun aif (condition then &optional (else constantly nil)) (funcall (if condition then else) condition)) 02:20:43 (aif 1 (lambda (it) it)) => 1 02:21:02 you can write it as a function, but its usage wouldn't look the same 02:21:23 phryk: (defun foo () '(+ 2 2)), (defmacro bar () '(+ 2 2)). Then (foo) => (+ 2 2), but (bar) => 4. See? 02:21:59 Bike: That only confuses me more 02:22:08 Bike: that's not really illuminating 02:22:58 Sorry. 02:23:51 phryk: do you know what "lexical" means? 02:23:54 stassats: I'm feeling kinda retarded here where is the difference between (lambda (it) it) and just putting the value? 02:24:06 -!- Intensity [hReZq3ilLP@unaffiliated/intensity] has quit [Ping timeout: 255 seconds] 02:24:18 phryk: which value? 02:24:27 *phzbOx* was strugling with understanding macro until I tried to write the function 'if' *sigh* 02:24:50 stassats: not really, no. I think it's one of the terms to classify one of the two(?) scopes cl has. 02:25:13 stassats: the value for it, so whatever you give that lambda. 02:25:16 phzbOx: can you write IF without using CL:IF, CL:COND, CL:WHEN, or CL:UNLESS (and similar things)? 02:25:38 can't use if without using macro 02:25:53 dnolen [~davidnole@cpe-98-14-92-234.nyc.res.rr.com] has joined #lisp 02:25:58 phryk: i'm not talking about scope, but lexical in a broader sense 02:26:53 you can't control lexical aspects of a program with just functions, i.e. scope, flow control, evaluation rules, etc. 02:27:01 Then even less. 02:27:17 phryk macros don't evaluate arguments. and they are executed before compilation, and whatever they return is passed to the compiler. that's all there is to them 02:27:27 -!- lars_t_h_ [~lars_t_h@0132300253.0.fullrate.dk] has quit [Quit: Leaving] 02:28:27 -!- lutok [~user@ip98-169-240-101.dc.dc.cox.net] has quit [Remote host closed the connection] 02:30:09 I 02:30:29 to create new syntax you take some input, and transform it to valid lisp forms 02:30:36 am0c [~am0c@222.235.56.83] has joined #lisp 02:30:49 'm still not understanding I guess i'll follow phzbOx advise and try to implement if (without cond and simliliar stuff) and see where that takes me 02:30:56 -!- Yuuhi` [benni@p5483B47E.dip.t-dialin.net] has quit [Ping timeout: 258 seconds] 02:31:28 it's hard to do without COND and other if-like things, especially if you're a novice 02:31:42 Can't i just use neq or something similiar? 02:34:18 I think I'm way to brainfucked right now to say anything that makes sense. I'll go to sleep and report back tomorrow. Maybe with a working if macro (and hopefully nonworking function) and know where the damned difference is 02:35:00 -!- killerboy [~mateusz@users69.kollegienet.dk] has quit [Quit: leaving] 02:35:10 phryk: Well, you can use 'if' to implement your 'my-if' functino if you want 02:35:14 try to implement if with a function using whatever you want. at best you will end up with something like this (my-if bool (lambda () ...) (lambda () ...) 02:35:36 (defun my-if (x y z) (if x y z)) 02:35:51 should work right? 02:35:58 nope 02:36:12 (if t 'okay (error "not really")) 02:36:21 phzbOx y and z are always evaluated 02:36:44 kennyd: that works like IF, but doesn't look like IF 02:36:47 lol, I was talking to phryk to make him understand how useful a macro is in this case :p 02:37:00 obviously you guys no it doesn't work ;-) 02:37:04 s/no/know 02:41:24 if without using IF: (defmacro fif (condition then &optional else) `(funcall (getf '(nil ,(lambda (x y) (declare (ignore x)) (funcall y))) ,condition (lambda (x y) (declare (ignore y)) (funcall x))) (lambda () ,then) (lambda () ,else))) 02:41:51 that's hard to read unformatted 02:42:15 http://paste.lisp.org/display/125626 02:42:50 stassats: My point was that it was impossible to write an 'if' function without using some kind of macro as the arguments would be evaluated. 02:43:08 but thanks for showing that, I'll look at it :p 02:43:50 -!- Riz__ [~chatzilla@adsl-75-57-174-140.dsl.emhril.sbcglobal.net] has left #lisp 02:44:22 well, that can be more simple 02:47:43 http://paste.lisp.org/display/125626#1 doesn't look as fun and doesn't remind you of lambda calculus 02:49:00 the implementation itself won't help you understand macros 02:50:05 kennyd: To be fair, I was suggesting to try to implement this without using any form of macro (i.e. with defun) 02:50:05 -!- gaidal [~gaidal@61.144.106.123] has quit [Read error: Connection reset by peer] 02:50:41 gaidal [~gaidal@61.144.106.123] has joined #lisp 02:53:07 -!- todun [~todun@SEAS335.wlan.seas.upenn.edu] has quit [Quit: :s] 02:57:36 -!- tsuru`` [~charlie@adsl-98-87-49-34.bna.bellsouth.net] has quit [Ping timeout: 240 seconds] 03:00:17 <_schulte_> phzbOx: it is not possible using only defun, defun evaluates all of its arguments 03:01:26 defun evaluates none of its arguments. 03:02:00 <_schulte_> all of defuns arguments are evaluated before being passed to defun 03:02:07 <_schulte_> to the defun'd function 03:02:35 phryk: have a look at "Casting SPELs in Lisp" http://lisperati.com/casting.html 03:02:50 I don't know the defuns operator. 03:04:02 <_schulte_> sorry, don't mean to be confusing, should have said: the arguments to function defined with `defun' are evaluated (unlike with macros) 03:04:22 <_schulte_> hence, if can not be defined with defun, because both the "else" and "then" statements will be evaluated 03:04:47 -!- bhyde_ [~bhyde@c-66-30-201-212.hsd1.ma.comcast.net] has left #lisp 03:05:04 Yes, when calling a function, (however it's defined), all the arguments of the function call are evaluated and the results are passed as parameter to the function. 03:05:05 -!- gaidal [~gaidal@61.144.106.123] has quit [Read error: Connection reset by peer] 03:05:54 gaidal [~gaidal@61.144.106.123] has joined #lisp 03:08:22 pspace [~andrew@adsl-75-10-158-45.dsl.bcvloh.sbcglobal.net] has joined #lisp 03:08:22 -!- gaidal [~gaidal@61.144.106.123] has quit [Read error: Connection reset by peer] 03:08:46 gaidal [~gaidal@61.144.106.123] has joined #lisp 03:15:39 -!- pspace [~andrew@adsl-75-10-158-45.dsl.bcvloh.sbcglobal.net] has quit [Read error: Connection reset by peer] 03:18:20 -!- _schulte_ [~eschulte@c-174-56-1-147.hsd1.nm.comcast.net] has quit [Quit: leaving] 03:22:50 -!- syrinx_ is now known as mrderp 03:23:36 -!- mrderp is now known as syrinx_ 03:26:10 Gertm [~Gertm@dD576D0D2.access.telenet.be] has joined #lisp 03:26:42 Intensity [~Intensity@unaffiliated/intensity] has joined #lisp 03:27:09 -!- phzbOx [~pheze@68.67.68.168] has left #lisp 03:27:49 todun [~todun@SEAS335.wlan.seas.upenn.edu] has joined #lisp 03:37:54 -!- Intensity [~Intensity@unaffiliated/intensity] has quit [Ping timeout: 255 seconds] 03:42:34 -!- djanatyn is now known as djanatyn|afk 03:45:23 gigamonkey [~user@adsl-99-179-45-19.dsl.pltn13.sbcglobal.net] has joined #lisp 03:48:15 -!- jleija [~jleija@50.8.10.126] has quit [Quit: leaving] 03:52:13 -!- loke [~elias@bb115-66-85-121.singnet.com.sg] has quit [Ping timeout: 240 seconds] 03:52:43 Zulu_Inuoe [~zulu12@c-174-58-204-235.hsd1.fl.comcast.net] has joined #lisp 03:56:21 -!- nialo- [~nialo@ool-182d1a3c.dyn.optonline.net] has quit [Ping timeout: 255 seconds] 03:57:09 loke [~elias@bb115-66-85-121.singnet.com.sg] has joined #lisp 03:58:35 drwho [~drwho@c-68-81-125-196.hsd1.pa.comcast.net] has joined #lisp 04:03:31 -!- trebor_dki [~user@mail.dki.tu-darmstadt.de] has quit [Ping timeout: 258 seconds] 04:04:15 -!- el-maxo [~max@p57A56CC8.dip.t-dialin.net] has quit [Ping timeout: 276 seconds] 04:04:29 pitlimit [~pitlimit@unaffiliated/pitlimit] has joined #lisp 04:04:46 Is there a lisp function that compares two lists and counts the number of elements in common? 04:05:01 Of course. 04:05:07 (lambda (a b) (length (intersection a b))) 04:08:26 -!- wildnux [~wildnux@68-191-210-76.dhcp.dntn.tx.charter.com] has quit [Remote host closed the connection] 04:10:18 thanks pjb 04:10:39 wildnux [~wildnux@68-191-210-76.dhcp.dntn.tx.charter.com] has joined #lisp 04:10:45 el-maxo [~max@p5DE8F553.dip.t-dialin.net] has joined #lisp 04:14:53 -!- ISF [~ivan@201.82.172.81] has quit [Read error: Operation timed out] 04:18:43 daniel_ [~daniel@p5082BA9F.dip.t-dialin.net] has joined #lisp 04:19:50 -!- dnolen [~davidnole@cpe-98-14-92-234.nyc.res.rr.com] has quit [Quit: dnolen] 04:21:51 airolson [~airolson@CPE00222d55a738-CM00222d55a735.cpe.net.cable.rogers.com] has joined #lisp 04:21:52 -!- gaidal [~gaidal@61.144.106.123] has quit [Read error: Connection reset by peer] 04:22:00 -!- daniel__ [~daniel@p5082903F.dip.t-dialin.net] has quit [Ping timeout: 260 seconds] 04:22:18 gaidal [~gaidal@61.144.106.123] has joined #lisp 04:26:14 -!- Brendan_T [~brendan@46.105.251.111] has quit [Remote host closed the connection] 04:26:35 spradnyesh [~pradyus@nat/yahoo/x-qoeryzhyuqweyeil] has joined #lisp 04:27:12 -!- zenlunatic [~justin@c-68-48-40-231.hsd1.md.comcast.net] has quit [Ping timeout: 240 seconds] 04:27:55 -!- am0c [~am0c@222.235.56.83] has quit [Remote host closed the connection] 04:32:18 kdas_ [kdas@nat/redhat/x-mrwjouwqkjpcpbnw] has joined #lisp 04:37:17 -!- airolson [~airolson@CPE00222d55a738-CM00222d55a735.cpe.net.cable.rogers.com] has quit [] 04:38:06 cfy [~cfy@122.228.135.216] has joined #lisp 04:38:06 -!- cfy [~cfy@122.228.135.216] has quit [Changing host] 04:38:06 cfy [~cfy@unaffiliated/chenfengyuan] has joined #lisp 04:43:35 superflit_ [~superflit@71-33-156-49.hlrn.qwest.net] has joined #lisp 04:44:01 -!- superflit [~superflit@71-33-156-49.hlrn.qwest.net] has quit [Read error: Connection reset by peer] 04:44:01 -!- superflit_ is now known as superflit 04:47:04 -!- gaidal [~gaidal@61.144.106.123] has quit [Ping timeout: 260 seconds] 04:48:45 -!- kdas_ [kdas@nat/redhat/x-mrwjouwqkjpcpbnw] has quit [Remote host closed the connection] 04:52:07 Administrator [~quassel@bas2-toronto61-2925081504.dsl.bell.ca] has joined #lisp 04:52:33 -!- Administrator is now known as Guest1561 04:54:24 -!- jaminja [~jaminja@unaffiliated/jaminja] has quit [Ping timeout: 240 seconds] 04:54:47 scombinator [~user@122-59-8-113.jetstream.xtra.co.nz] has joined #lisp 04:54:57 -!- Guest43325 [~quassel@69.158.121.24] has quit [Ping timeout: 260 seconds] 04:55:23 -!- xjrn [~chatzilla@c-76-21-48-114.hsd1.ca.comcast.net] has quit [Ping timeout: 245 seconds] 04:56:18 Hey, which is the most likely candidate for consing: loop with no accumulation or collection, destructuring-bind, or multiple-value-bind? 04:56:34 -!- wildnux [~wildnux@68-191-210-76.dhcp.dntn.tx.charter.com] has quit [Remote host closed the connection] 04:57:06 scombinator: I'd guess the middle one. 04:57:18 you can test easily, of course 04:58:11 How so? 04:58:31 wildnux [~wildnux@68-191-210-76.dhcp.dntn.tx.charter.com] has joined #lisp 04:58:57 It's a bind on an argument to a function, that I'm surprised is allocating anything 04:59:25 with time. 05:02:22 -!- Kron_ [~Kron@69.166.22.207] has quit [Quit: Kron awayyy!] 05:02:25 what kind of bind? 05:03:27 jaminja [~jaminja@76.76.24.43] has joined #lisp 05:03:27 -!- jaminja [~jaminja@76.76.24.43] has quit [Changing host] 05:03:27 jaminja [~jaminja@unaffiliated/jaminja] has joined #lisp 05:04:59 destructuring-bind on a single '(x y) 05:05:19 sb-profile:profile claims it's consing and time agrees 05:06:10 Does (values A B) cons, or does it just store values on a call stack? 05:06:24 the latter 05:06:54 do you cons that x y? 05:08:11 No, it's done before the function is called; It comes in as an argument 05:08:36 enough poking in the dark, show us the code 05:09:08 -!- replore [~replore@203.152.213.161.static.zoot.jp] has quit [Remote host closed the connection] 05:11:32 (defun check-move (new-xs new-ys pos dir) 05:11:32 "Returns T if we can move pos along dir given that we are 05:11:32 moving ants to new-xs, new-ys" 05:11:32 (destructuring-bind (x y) pos 05:11:32 (if (water? x y dir) 05:11:33 NIL 05:11:33 (multiple-value-bind (x y) (new-location x y dir) 05:11:34 (loop 05:11:34 for new-x across new-xs 05:11:35 for new-y across new-ys 05:11:35 finally (return T) 05:11:36 do (when (and (= x new-x) 05:11:36 (= y new-y)) 05:11:37 (return NIL))))))) 05:11:39 don't paste here 05:11:43 -!- scombinator [~user@122-59-8-113.jetstream.xtra.co.nz] has left #lisp 05:12:41 cyrillos [~cyrill@188.134.33.194] has joined #lisp 05:12:42 -!- emma [~em@unaffiliated/emma] has quit [Ping timeout: 258 seconds] 05:13:32 also use slime-indent 05:13:51 -!- MoALTz [~no@host-92-18-25-69.as13285.net] has quit [Ping timeout: 248 seconds] 05:13:54 by the way, you can write that loop as (loop for for new-x across new-xs for new-y across new-ys never (and (= x new-x) (= y new-y))) 05:13:54 actually just disable tabs 05:14:36 emma [~em@unaffiliated/emma] has joined #lisp 05:15:47 scombinator [~user@122-59-8-113.jetstream.xtra.co.nz] has joined #lisp 05:16:07 RDove [~ronnie@unaffiliated/rdove] has joined #lisp 05:17:09 hyko- [~toby@my.unixuni.com] has joined #lisp 05:17:17 the statistical profiler is more useful. 05:17:56 I wouldn't be surprised if it's new-location or water? that conses. 05:18:20 http://paste.lisp.org/+2OXN 05:18:29 I have those profiled too 05:18:34 replore_ [~replore@203.152.213.161.static.zoot.jp] has joined #lisp 05:19:07 water? conses, but so does check-move 05:19:09 -!- phryk [~phryk@yggdrasil.phryk.net] has quit [Ping timeout: 260 seconds] 05:19:37 phryk [~phryk@yggdrasil.phryk.net] has joined #lisp 05:19:44 -!- hyko [~toby@my.unixuni.com] has quit [Ping timeout: 260 seconds] 05:19:44 -!- cpape [~user@cpape.eu] has quit [Ping timeout: 260 seconds] 05:19:44 -!- Neronus [christian@heraklit.ayous.org] has quit [Ping timeout: 260 seconds] 05:19:44 -!- foocraft [foocraft@ibawizard.net] has quit [Ping timeout: 260 seconds] 05:19:49 foocraft [foocraft@ibawizard.net] has joined #lisp 05:19:50 Neronus [christian@heraklit.ayous.org] has joined #lisp 05:20:05 tanglisha [~tanglisha@c-71-231-137-202.hsd1.wa.comcast.net] has joined #lisp 05:20:07 -!- AntiSpamMeta [~MetaBot@unaffiliated/afterdeath/bot/antispambot] has quit [Excess Flood] 05:20:26 cpape [~user@cpape.eu] has joined #lisp 05:20:30 did you now that you can write (multiple-value-bind (x y) (new-location row col direction) (= 1 (aref (game-map *state*) x y))) as (= 1 (multiple-value-call #'aref (game-map *state*) (new-location row col direction))) 05:20:47 Huh 05:20:57 That's neat 05:21:22 why do you use "water?" in check-move but have waterp definition? 05:21:52 (setf (symbol-function 'water?) #'waterp) ;backwards compat 05:22:06 AntiSpamMeta [~MetaBot@unaffiliated/afterdeath/bot/antispambot] has joined #lisp 05:22:39 that doesn't work well with redefinitions of waterp 05:23:43 Not my code, that's from the base cl package for ai-contest.com 05:24:45 fwiw, check-move doesn't cons. 05:25:07 (Not directly, that is). 05:25:10 From the profile it's consing an average of 200 each call. 05:25:14 unless new-location is inlined and conses 05:25:47 From the profile new-location doesn't cons at all. It's basically a cond and an aref 05:26:32 gravicappa [~gravicapp@ppp91-77-177-229.pppoe.mtu-net.ru] has joined #lisp 05:26:48 scombinator: use the statistical profiler. 05:27:27 Do calls to functions with &rest cause consing? 05:27:35 Consing is tracked at a fairly high granularity, so some patterns will tend to assign consing to the wrong location. 05:27:40 scombinator: usually, yes. 05:28:04 neoesque [~neoesque@210.59.147.226] has joined #lisp 05:28:30 And, the deterministic profiler depends on instrumentation. It's hard to tell the difference between events happening in a profiled function or in one of its unprofiled callees. 05:28:52 gko [~gko@27.242.27.254] has joined #lisp 05:30:12 -!- wildnux [~wildnux@68-191-210-76.dhcp.dntn.tx.charter.com] has quit [Ping timeout: 256 seconds] 05:32:36 I'm not sure how to see consing from sb-sprof 05:33:22 you can use M-x slime-sprof-alloc 05:33:35 ":mode If :cpu, run the profiler in cpu profiling mode. If :alloc, run the profiler in allocation profiling mode. If :time, run the profiler in wallclock profiling mode. " 05:33:38 From the manual. 05:33:40 if you have slime-sprof contrib enabled 05:33:49 I could, but it's nicer to compile this, so I can use actual input on it 05:34:30 that was a response to what? 05:34:50 um, the M-x slime and so on 05:35:17 scombinator: You'll have to explain your thinking more so we can understand what you understand wrong. 05:36:05 I'm wrapping my main call with sb-sprof:with-profiling 05:37:03 -!- Guest1561 [~quassel@bas2-toronto61-2925081504.dsl.bell.ca] has quit [Remote host closed the connection] 05:37:04 -!- nanoc [~conanhome@186.123.182.144] has quit [Read error: Connection reset by peer] 05:38:22 with slime-sprof-start-alloc you would first start the profiler, run the code in the repl, run M-x slime-sprof-report 05:38:31 -!- tanglisha [~tanglisha@c-71-231-137-202.hsd1.wa.comcast.net] has quit [Quit: tanglisha] 05:47:05 -!- alvis [~alvis@tx-71-2-123-220.dhcp.embarqhsd.net] has quit [Ping timeout: 252 seconds] 05:48:47 -!- replore_ [~replore@203.152.213.161.static.zoot.jp] has quit [Ping timeout: 252 seconds] 05:49:23 -!- gigamonkey [~user@adsl-99-179-45-19.dsl.pltn13.sbcglobal.net] has quit [Remote host closed the connection] 05:49:28 gigamonkey [~user@adsl-99-179-45-19.dsl.pltn13.sbcglobal.net] has joined #lisp 05:49:50 -!- realitygrill [~realitygr@76.226.212.207] has quit [Quit: realitygrill] 05:52:29 ramkrsna [ramkrsna@unaffiliated/ramkrsna] has joined #lisp 05:52:29 WARNING: No sampling progress... ? 05:54:19 easyE [QuBiSortOM@panix2.panix.com] has joined #lisp 06:00:06 alvis [~alvis@tx-71-2-123-220.dhcp.embarqhsd.net] has joined #lisp 06:00:39 -!- EmmanuelOga [~emmanuel@190.244.27.236] has quit [Ping timeout: 252 seconds] 06:01:45 -!- jaminja [~jaminja@unaffiliated/jaminja] has quit [Ping timeout: 260 seconds] 06:01:47 mcsontos [mcsontos@nat/redhat/x-fpemhhzzkdckifes] has joined #lisp 06:03:12 -!- stassats [~stassats@wikipedia/stassats] has quit [Ping timeout: 276 seconds] 06:04:00 -!- scombinator [~user@122-59-8-113.jetstream.xtra.co.nz] has quit [Ping timeout: 260 seconds] 06:07:33 daigo [~daigo@EM117-55-65-140.emobile.ad.jp] has joined #lisp 06:20:38 Joreji [~thomas@vpn-eu1.unidsl.de] has joined #lisp 06:21:18 MoALTz [~no@host-92-18-9-215.as13285.net] has joined #lisp 06:21:29 jaminja [~jaminja@unaffiliated/jaminja] has joined #lisp 06:24:27 MoALTz_ [~no@host-92-18-9-215.as13285.net] has joined #lisp 06:24:32 -!- ltriant [~ltriant@lithium.mailguard.com.au] has quit [Quit: Computer has gone to sleep] 06:27:13 dmiles [~dmiles@dsl-72-19-44-148.cascadeaccess.com] has joined #lisp 06:27:14 -!- dmiles_afk [~dmiles@dsl-72-19-44-148.cascadeaccess.com] has quit [Read error: Connection reset by peer] 06:27:51 -!- MoALTz [~no@host-92-18-9-215.as13285.net] has quit [Ping timeout: 252 seconds] 06:29:53 Joreji_ [~thomas@vpn-eu1.unidsl.de] has joined #lisp 06:30:36 Davidbrcz [~david@proxysup.isae.fr] has joined #lisp 06:32:05 -!- Joreji [~thomas@vpn-eu1.unidsl.de] has quit [Ping timeout: 260 seconds] 06:38:04 sdemarre [~serge@91.176.50.149] has joined #lisp 06:38:23 -!- todun [~todun@SEAS335.wlan.seas.upenn.edu] has quit [Quit: :s] 06:38:46 -!- Davidbrcz [~david@proxysup.isae.fr] has quit [Ping timeout: 256 seconds] 06:39:03 H4ns [57a9edb2@gateway/web/freenode/ip.87.169.237.178] has joined #lisp 06:40:37 -!- Joreji_ [~thomas@vpn-eu1.unidsl.de] has quit [Ping timeout: 240 seconds] 06:41:12 mrSpec [~Spec@unaffiliated/mrspec] has joined #lisp 06:44:53 I know I can use intersection to see how many elements two lists have in common, but what if I have two lists : (1 1 1) and (1 0 1) ... I want the resulting list to be (1 1) ... is that possible? 06:44:58 In other words, I don't want (1 1 1) 06:46:26 pitlimit: no, it is impossible. 06:46:38 hm 06:46:46 How about if I know ahead of time what value the dupes will be 06:46:48 pitlimit: i'm making fun of you. 06:46:51 oh 06:46:59 are we past the making fun stage 06:47:03 and the answer my q stage :) 06:47:10 pitlimit: of course it is possible, but you may have to write your own function to do it. 06:47:26 :) 06:47:37 ok 06:47:38 pitlimit: "have in common" means "have the same value in the same list position"? 06:47:45 position does not matter 06:48:02 though.... 06:48:03 -!- ehu [~ehuels@ip118-64-212-87.adsl2.static.versatel.nl] has quit [Ping timeout: 276 seconds] 06:48:36 eh I could strip out the value I Know to be the 'dupe value' 06:48:44 and do an intersection on the remainign elements 06:49:32 pitlimit: you could also use (delete-duplicates (intersection a b)) 06:49:39 ok thanks :) 06:49:41 i'll check it out 06:49:51 -!- Bike [~Glossina@71-214-110-173.ptld.qwest.net] has quit [Quit: leaving] 06:51:03 H4ns: intersection is permitted to share structure with its arguments. Remove-duplicates is what you have to use unless you own the arguments too. 06:51:20 akovalenko: thanks! 06:52:13 akovalenko: the windows sbcl port is impressive! i had problems compiling hunchentoot because the default line ending for lisp source files seems to be lf, though. is there a way to change that? 06:52:49 sbcl has no line ending support in external formats :( 06:54:34 H4ns: btw, is that caused by git/win32 checkouts rewriting line endings? I had no such problems here (linux + sbcl on wine) 06:54:36 akovalenko: oh, that's bad. so, basically i can't use ~ in format directives? 06:54:58 no, ~ would be a non-conforming non-solution.. 06:54:59 akovalenko: ah, yes, that is quite likely the issue. 06:55:35 it's sometimes annoying that you can have _either_ sbcl _or_ notepad.exe working with your files correctly. 06:55:39 akovalenko: what i mean to say is that programs which have ~\r\n in format strings fail to compile with the default git/win32 settings. 06:56:12 akovalenko: i don't care much about notepad, but i care about working defaults. 06:56:46 akovalenko: but i understand that this is not controlled by you. i'll look up how to convince git to use unix line endings. 06:57:11 I haven't even touched this area, though... except that there are #\newlines and not crlf in /console input/ now. 06:58:06 -!- Fare [~Fare@173-9-65-97-NewEngland.hfc.comcastbusiness.net] has quit [Quit: Leaving] 06:58:09 ok. thanks for the clarification! 06:59:16 H4ns: git config core.autocrlf 06:59:28 false/input/off/on 07:00:05 okok, i'll boot my windows box :) 07:00:19 -!- rcharle2 [~rcharles@dhcp145.gradapt1.iit.edu] has left #lisp 07:02:58 H4ns: well, "git config core.eol lf" may be better (it overrides the notion of "local system line endings") 07:03:09 rcharle2 [~rcharles@dhcp145.gradapt1.iit.edu] has joined #lisp 07:03:20 -!- rcharle2 [~rcharles@dhcp145.gradapt1.iit.edu] has left #lisp 07:03:42 i used "git config --global core.autocrlf off" and that worked. 07:04:43 i feel tempted to switch back to my windows laptop. 07:04:54 I hope to get my hands on SBCL external formats soon -- there's too much macrology there for casual hacking... 07:05:40 rcharle2 [~rcharles@dhcp145.gradapt1.iit.edu] has joined #lisp 07:11:52 df [~df@163.8.187.81.in-addr.arpa] has joined #lisp 07:12:50 rtoym: aroundp 07:18:46 Joreji [~thomas@91-249.eduroam.RWTH-Aachen.DE] has joined #lisp 07:19:01 -!- daigo [~daigo@EM117-55-65-140.emobile.ad.jp] has quit [Ping timeout: 258 seconds] 07:21:41 -!- H4ns [57a9edb2@gateway/web/freenode/ip.87.169.237.178] has quit [Quit: later] 07:26:02 -!- jaminja [~jaminja@unaffiliated/jaminja] has quit [Read error: Operation timed out] 07:31:47 jaminja [~jaminja@unaffiliated/jaminja] has joined #lisp 07:32:49 -!- sykopomp [~sykopomp@gateway/tor-sasl/sykopomp] has quit [Remote host closed the connection] 07:34:10 am0c [~am0c@119.192.218.97] has joined #lisp 07:36:35 -!- zardoz8 [~zardoz8@76.73.16.26] has quit [Quit: CGI:IRC (Session timeout)] 07:38:58 sykopomp [~sykopomp@gateway/tor-sasl/sykopomp] has joined #lisp 07:39:45 -!- loke [~elias@bb115-66-85-121.singnet.com.sg] has quit [Ping timeout: 260 seconds] 07:39:52 Beetny [~Beetny@ppp118-208-56-70.lns20.bne1.internode.on.net] has joined #lisp 07:51:36 loke [~elias@bb115-66-85-121.singnet.com.sg] has joined #lisp 07:51:44 leo2007 [~leo@119.255.41.67] has joined #lisp 08:00:17 Zhivago [~zhivago@li49-59.members.linode.com] has joined #lisp 08:03:06 -!- Amyn [~abennama@m328eth.crans.org] has quit [Ping timeout: 258 seconds] 08:03:46 todun [~todun@SEAS335.wlan.seas.upenn.edu] has joined #lisp 08:06:19 marsell [~marsell@120.20.66.233] has joined #lisp 08:09:36 KingNato [~patno@fw.polopoly.com] has joined #lisp 08:11:31 H4ns [5ddba06d@gateway/web/freenode/ip.93.219.160.109] has joined #lisp 08:13:01 chenbing [~user@125.122.209.95] has joined #lisp 08:17:16 trebor_dki [~user@mail.dki.tu-darmstadt.de] has joined #lisp 08:18:14 naeg [~naeg@194.208.239.170] has joined #lisp 08:19:11 benkard [~benkard@mnch-d9bdcdc2.pool.mediaWays.net] has joined #lisp 08:19:51 when c-x c-b in emacs,erc will reconnecting,this is annoying 08:20:39 Athas [~athas@130.225.165.40] has joined #lisp 08:24:59 -!- neoesque [~neoesque@210.59.147.226] has quit [Quit: Bye!] 08:25:00 -!- anfairch1 [~anthony@c-76-22-14-22.hsd1.wa.comcast.net] has quit [Read error: Connection reset by peer] 08:25:43 -!- Joreji [~thomas@91-249.eduroam.RWTH-Aachen.DE] has quit [Ping timeout: 258 seconds] 08:26:53 anfairch [~anthony@c-76-22-14-22.hsd1.wa.comcast.net] has joined #lisp 08:27:13 -!- smartviking [~smartviki@unaffiliated/smartviking] has quit [Read error: Operation timed out] 08:31:00 -!- drwho [~drwho@c-68-81-125-196.hsd1.pa.comcast.net] has quit [Ping timeout: 244 seconds] 08:32:26 Blkt [~user@89-96-199-46.ip13.fastwebnet.it] has joined #lisp 08:33:35 -!- hyko- is now known as hyko 08:34:47 -!- insomniaSalt [~milan@unaffiliated/iammilan] has quit [Read error: Operation timed out] 08:35:41 Joreji [~thomas@91-249.eduroam.RWTH-Aachen.DE] has joined #lisp 08:36:04 jdz [~jdz@193.206.22.97] has joined #lisp 08:37:36 spacefrogg [~spacefrog@unaffiliated/spacefrogg] has joined #lisp 08:37:36 -!- Salamander [~Salamande@ppp118-210-144-108.lns20.adl6.internode.on.net] has quit [Ping timeout: 240 seconds] 08:38:38 insomniaSalt [~milan@unaffiliated/iammilan] has joined #lisp 08:40:05 nikodemus [~Nikodemus@cs181063174.pp.htv.fi] has joined #lisp 08:42:31 jtza8 [~jtza8@wbs-196-2-106-67.wbs.co.za] has joined #lisp 08:45:11 nha [~prefect@imamac13.epfl.ch] has joined #lisp 08:45:19 chrisdone [c1ce1661@gateway/web/freenode/ip.193.206.22.97] has joined #lisp 08:45:24 what does #:foo mean? 08:45:33 uninterned symbol named FOO 08:45:44 thanks 08:45:48 (symbol-package '#:foo) => NIL 08:47:41 -!- chrisdone [c1ce1661@gateway/web/freenode/ip.193.206.22.97] has left #lisp 08:47:48 ahinki [~chatzilla@212.99.10.150] has joined #lisp 08:50:35 Salamander [~Salamande@ppp121-45-159-164.lns10.adl6.internode.on.net] has joined #lisp 08:56:00 -!- nikodemus [~Nikodemus@cs181063174.pp.htv.fi] has quit [Remote host closed the connection] 08:56:34 mishoo [~mishoo@86.124.148.84] has joined #lisp 08:57:26 -!- H4ns [5ddba06d@gateway/web/freenode/ip.93.219.160.109] has quit [Ping timeout: 265 seconds] 08:58:31 -!- mishoo [~mishoo@86.124.148.84] has quit [Client Quit] 08:59:29 mishoo [~mishoo@86.124.148.84] has joined #lisp 09:04:40 -!- cfy [~cfy@unaffiliated/chenfengyuan] has quit [Remote host closed the connection] 09:04:52 cfy [~cfy@122.228.135.216] has joined #lisp 09:04:52 -!- cfy [~cfy@122.228.135.216] has quit [Changing host] 09:04:52 cfy [~cfy@unaffiliated/chenfengyuan] has joined #lisp 09:07:34 hlavaty [~user@91-65-217-112-dynip.superkabel.de] has joined #lisp 09:09:55 nikodemus [~nikodemus@cs181056239.pp.htv.fi] has joined #lisp 09:11:39 Shin-LaC [~LaC@adsl-69-211-50-177.dsl.chcgil.ameritech.net] has joined #lisp 09:13:56 anybody here done cvs 09:14:06 to git migration on common-lisp.net? 09:14:48 -!- zfx- [~zfx@host86-145-66-157.range86-145.btcentralplus.com] has quit [Ping timeout: 240 seconds] 09:16:07 Jeanne-Kamikaze [~Jeanne-Ka@210.Red-88-6-232.staticIP.rima-tde.net] has joined #lisp 09:17:01 H4ns [55b3895b@gateway/web/freenode/ip.85.179.137.91] has joined #lisp 09:19:40 c_arenz [arenz@nat/ibm/x-adronbdevqvcywpd] has joined #lisp 09:22:20 I have some lisp source in utf-8 09:22:24 containing things like #\´ 09:22:32 and clozure cl is choking on it 09:24:08 of course it is 09:24:34 Shin-LaC: you'll have to set ccl:*default-external-format* to :utf-8 09:24:42 Shin-LaC: have you copy/pasted it from a pdf or something? 09:24:43 Shin-LaC: i think. 09:24:56 nanoc [~conanhome@186.12.74.175] has joined #lisp 09:25:41 oh, I see 09:25:43 let me try that 09:26:46 works! 09:27:27 I'm using lispbox and I haven't been able to set it up to use utf-8 completely 09:32:22 what might be the right place to put (setf ccl:*default-file-character-encoding* :utf-8) for use with slime? 09:32:46 Shin-LaC: .ccl-init.lisp 09:33:04 in my home? 09:33:11 Shin-LaC: ack 09:33:26 thanks 09:33:45 Shin-LaC: if you intend to be serious about lisp, i'd recommend that you get rid of lispbox soon and upgrade to quicklisp 09:33:54 the strange thing is that swank-loader is being passed :coding-system "utf-8-unix" 09:33:57 Shin-LaC: lispbox is rather outdated. just saying. 09:34:21 duly noted 09:34:42 the version I have is from february, I think 09:35:06 Shin-LaC: uh? i didn't know there was an update. i thought it was abandoned. noted, too. 09:36:47 nialo- [~nialo@ool-182d1a3c.dyn.optonline.net] has joined #lisp 09:39:08 -!- todun [~todun@SEAS335.wlan.seas.upenn.edu] has quit [Remote host closed the connection] 09:39:26 todun [~todun@seasnet-58-02.seas.upenn.edu] has joined #lisp 09:41:49 -!- Tordek [tordek@supporter.blinkenshell.org] has quit [Ping timeout: 240 seconds] 09:42:11 Tordek [tordek@supporter.blinkenshell.org] has joined #lisp 09:44:25 e-user [e-user@nat/nokia/x-ufmlyotbsygqevxl] has joined #lisp 09:44:31 akahl [e-user@nat/nokia/x-pihlcipayntggkhd] has joined #lisp 09:48:31 -!- ramkrsna [ramkrsna@unaffiliated/ramkrsna] has quit [Quit: Leaving] 09:51:05 -!- leo2007 [~leo@119.255.41.67] has quit [Ping timeout: 244 seconds] 09:51:52 -!- benkard [~benkard@mnch-d9bdcdc2.pool.mediaWays.net] has quit [Quit: benkard] 09:53:05 zfx [~zfx@unaffiliated/zfx] has joined #lisp 09:56:31 xan_ [~xan@62.Red-2-138-181.dynamicIP.rima-tde.net] has joined #lisp 09:58:27 -!- Tasser [~freak@subtle/contributor/Tass] has left #lisp 10:02:19 (subst "a" "b" "abc") since characters are sequence,why subst str not work? 10:03:19 chenbing: you'll need to specify characters to search for: (subst #\a #\b "abc") 10:03:26 -!- c_arenz [arenz@nat/ibm/x-adronbdevqvcywpd] has quit [Quit: Ex-Chat] 10:03:29 chenbing: not exactly sure what you want to say with that sentence, however i think you should think about this: a string is a sequence of characters, not a string of strings. 10:03:31 it won't search for sequences in sequences 10:03:39 chenbing: and you want substitute, not subst 10:04:11 wasn't there a function to substitute sequences as well? 10:04:16 ramusara [~ramusara@220.156.210.236.user.e-catv.ne.jp] has joined #lisp 10:04:25 thanks above,relly 10:06:50 chenbing: depending on what you really want to achieve, there's cl-ppcre, too 10:08:33 on a similar note ... when I'm reading programming books and see things like "substring" etc., with an explanation that it takes the character position as parameter -- most of the times I'm fairly sure that this won't be true, ie. that it specifies the byte offset instead ... 10:09:03 c_arenz [arenz@nat/ibm/x-xmjvobwkhzmcbrya] has joined #lisp 10:09:22 do so few people think outside of ASCII (or ANSI, or ISO8859-1, or whatever their "nearest" locale is)? 10:09:31 Oo 10:10:19 flip214: like reading MTBF 1000000 million hours in a spec, makes me think it's just 1e6 hours. though with sequences, you're sure it's the character, not just the byte offset. 10:10:20 H4ns: is that meant for me or the people who write these books? 10:10:48 flip214: no, the java heads think in non-ascii stuff, i think. 10:10:52 flip214: i'm unsure. maybe you just read the wrong books 10:10:57 madnificent: eg. SBCL specifies that it stores characters as 32bit entities, so that's clear here. 10:11:19 madnificent: but java uses UCS-16 or something similar, which won't work with the whole set of unicode points, too! 10:11:34 H4ns: perhaps ... 10:11:50 flip214: which is why i deliberately chose not to say unicode or anything of the likes in that sentence. 10:14:14 I'd have thought that non-US people (especially europeans and people from asia) _know_ about these issues ... umlauts, greek characters, CJK, etc ... 10:17:42 gensym [~user@dslb-088-071-149-049.pools.arcor-ip.net] has joined #lisp 10:18:32 gensym``` [~user@95.156.194.105] has joined #lisp 10:18:43 -!- gensym``` is now known as gensym` 10:20:31 -!- drdo` [~drdo@85.207.54.77.rev.vodafone.pt] has quit [Remote host closed the connection] 10:20:46 drdo`` [~drdo@85.207.54.77.rev.vodafone.pt] has joined #lisp 10:21:41 -!- ruediger [ruediger@pseudoterminal.org] has quit [Quit: No Ping reply in 180 seconds.] 10:21:55 -!- lbc [~quassel@1908ds1-aboes.0.fullrate.dk] has quit [Quit: No Ping reply in 180 seconds.] 10:21:57 ruediger_ [ruediger@pseudoterminal.org] has joined #lisp 10:22:12 -!- nowhereman [~pierre@AStrasbourg-551-1-129-23.w90-26.abo.wanadoo.fr] has quit [Remote host closed the connection] 10:22:17 lbc_ [~quassel@1908ds1-aboes.0.fullrate.dk] has joined #lisp 10:22:46 -!- gensym [~user@dslb-088-071-149-049.pools.arcor-ip.net] has quit [Remote host closed the connection] 10:22:50 mstevens [~mstevens@fsf/member/pdpc.active.mstevens] has joined #lisp 10:23:01 -!- Demosthenes [~demo@206.180.155.43.adsl.hal-pc.org] has quit [Quit: leaving] 10:23:18 akovalen` [~anton@95.72.168.23] has joined #lisp 10:23:31 -!- levi [~user@c-174-52-219-147.hsd1.ut.comcast.net] has quit [Remote host closed the connection] 10:23:33 -!- Iceland_jack [~baldur@earth.sudo.is] has quit [Ping timeout: 252 seconds] 10:23:59 levi` [~user@c-174-52-219-147.hsd1.ut.comcast.net] has joined #lisp 10:24:15 -!- cesarbp [~cbolano@189.227.235.57] has quit [Ping timeout: 248 seconds] 10:24:33 Iceland_1ack [~baldur@earth.sudo.is] has joined #lisp 10:24:39 -!- pchrist [~spirit@gentoo/developer/pchrist] has quit [Ping timeout: 252 seconds] 10:24:42 -!- samebchase [~samuel@76.73.121.203] has quit [Ping timeout: 255 seconds] 10:24:50 -!- BlastHardcheese [chris@pdpc/supporter/active/blasthardcheese] has quit [Ping timeout: 260 seconds] 10:25:09 -!- akovalenko [~anton@95.73.104.74] has quit [Ping timeout: 255 seconds] 10:25:51 pchrist_ [~spirit@gentoo/developer/pchrist] has joined #lisp 10:26:07 -!- hyko [~toby@my.unixuni.com] has quit [Ping timeout: 252 seconds] 10:26:07 -!- lusory_ [~bart@bb115-66-195-54.singnet.com.sg] has quit [Ping timeout: 252 seconds] 10:26:07 -!- sanjoyd [~sanjoyd@unaffiliated/sanjoyd] has quit [Ping timeout: 252 seconds] 10:26:25 -!- daniel_ [~daniel@p5082BA9F.dip.t-dialin.net] has quit [Remote host closed the connection] 10:26:30 oiiii [~oiiii@82.71.241.25] has joined #lisp 10:26:39 daniel__1 [~daniel@p5082BA9F.dip.t-dialin.net] has joined #lisp 10:26:51 -!- rgrinberg [~rudi@24.52.246.61] has quit [Ping timeout: 252 seconds] 10:27:10 -!- ineiros [~itniemin@james.ics.hut.fi] has quit [Ping timeout: 260 seconds] 10:27:12 lusory [~bart@bb115-66-195-54.singnet.com.sg] has joined #lisp 10:27:26 -!- djanatyn|afk is now known as djanatyn 10:27:45 -!- cYmen [~cymen@squint.a-oben.org] has quit [Ping timeout: 260 seconds] 10:27:52 ineiros_ [~itniemin@james.ics.hut.fi] has joined #lisp 10:28:05 cYmen_ [~cymen@squint.a-oben.org] has joined #lisp 10:28:22 -!- Tristam [~Tristam@cpe-72-226-124-205.nycap.res.rr.com] has quit [*.net *.split] 10:28:22 -!- eli [~eli@winooski.ccs.neu.edu] has quit [*.net *.split] 10:28:22 -!- spacebat [~spacebat@ubermonkey.net] has quit [*.net *.split] 10:28:22 -!- herbieB_ [~herbie@u15287329.onlinehome-server.com] has quit [*.net *.split] 10:28:22 -!- xan_ [~xan@62.Red-2-138-181.dynamicIP.rima-tde.net] has quit [*.net *.split] 10:28:22 -!- jdz [~jdz@193.206.22.97] has quit [*.net *.split] 10:28:22 -!- oudeis [~oudeis@59.37.63.109] has quit [*.net *.split] 10:28:22 -!- stepnem [~stepnem@176.119.broadband10.iol.cz] has quit [*.net *.split] 10:28:22 -!- wolgo [~jarrod@184-106-197-125.static.cloud-ips.com] has quit [*.net *.split] 10:28:23 -!- kloeri [~kloeri@freenode/staff/exherbo.kloeri] has quit [*.net *.split] 18:09:52 ccl-logbot [~ccl-logbo@setf.clozure.com] has joined #lisp 18:09:52 18:09:52 -!- names: ccl-logbot drake01 codelurker EmmanuelOga Amyn mcsontos m7w todun antgreen milanj ISF Qworkescence nha xok jewel Davidbrcz sykopomp ramkrsna lars_t_h wccoder benkard SegFaultAX|work chrnybo` joshe cesarbp wbooze homie tsuru` Vutral Kron_ superflit Bike wishbone4 Intensity oconnore nyef gravicappa jaminja tanglisha araujo wildnux Jeanne-Kamikaze gtrak am0c xjrn claint benbelly spacefrogg e-user MoALTz gavinharper boei bobbysmith007 nicdev_ dlowe naryl 18:09:52 -!- names: fe[nl]ix zenlunatic kruhft Odin- Yuuhi bhyde easyE ch077179 Gertm Salamander Zhivago The_third_man mvilleneuve lester2 iwillig peterhil leo2007 Houl Kenjin sanjoyd BlastHardcheese dfox BrianRice billstclair lemoinem rtoym hakzsam inklesspen vsync peterhil` djinni` hugod CaZe Fade slyrus samebchase hyde____ sellout- fmu juniorroy Guest30207 jsnell el-maxo ``Erik ramus Guest59099 rootzlevel pokes aperturefever bfein dcrawford DrForr kpal limetree_ 18:09:52 -!- names: deepfire CrazyEddy acieroid jasom austinh aditya` frozencemetery tali713 varjag nuba GeneralMaximus ski_ jtza8 ineiros_ dnjaramba tvaalen luis boyscared trigen Obfuscate morphling kjellkt tempire zakwilson housel Saeren StrmSrfr eno Aisling _3b Patzy bigjust frodef jamesstanley mindCrime PuffTheMagic dodecahedron dRbiG PissedNumlock vpit3833 flip214 Guest34174 churib Jabberwockey maxm- allandee antoszka felideon clog Jasko2 galdor Zephyrus Ralith Modius 18:09:52 -!- names: __class__ djanatyn MasseR otakutomo koollman McMAGIC--Copy rabite joast dsp_ scharan kennyd emma Neronus dmiles df loke trebor_dki insomniaSalt nikodemus nanoc Tordek c_arenz akovalenko Iceland_jack muep wormphlegm hyko p_l lanthan__ setmeaway2 initself ace4016 cataska cYmen_ lusory daniel__1 pchrist_ levi` lbc_ ruediger_ drdo`` gensym` ramusara Shin-LaC mishoo naeg chenbing rcharle2 sdemarre alvis cpape foocraft phryk RDove cyrillos Zulu_Inuoe oudeis 18:09:52 -!- names: ChibaPet blackwolf s0ber quackv2 parabolize abeaumont SHODAN ecraven vert2 benny jeekl X-Scale Mandus TristamWrk madnificent Jasko3 Nisstyre freiksenet finnrobi cods MjrTom stepnem Harag longtheta mornfall Adrinael newcup cnl jiacobucci Pepe_ SegFaultAX cmm markskilbeck anonus schme mdh OliverUv psyllo wolgo syrinx_ jesse sbryant derrida kloeri whoops lonstein armence derekv Dodek karswell __main__ qsun Phoodus Euthy blumbri BlankVerse antifuchs tessier 18:09:52 -!- names: acelent Khisanth anvandare cmatei EyesIsServer petter` schoppenhauer wtetzner theBlackDragon ljos aoh orangejuice Axioplase daimrod prip jlaire _krappie_ rainyrhy_away eMBee oGMo pinterface kanru Xof foom j_king vhost- egn micro__ bieber scode les arbscht adeht kleppari froggey sepisultrum surrounder cpt_nemo Yamazaki-kun shachaf klutometis mgr phadthai clop2 Ober CallToPower hyoyoung setheus redline6561 zbigniew guaqua tty234 elliottcable |3b| 18:09:52 -!- names: SpitfireWP a7p Nshag herbieB_ spacebat eli Tristam reb mal sshirokov tomaw z0d elliottjohnson erg mikejs gemelen felipe yan_ Bucciarati albino df_aldur yahooooo larva rsynnott literal Borbus guther Xach jrockway rotty wormwood Kovensky cmbntr pjb johs mon_key ve MikeSeth devhost pkhuong daedric pok_ tychoish C-Keen wivlaro 18:12:06 ... I don't suppose there's a version of :import-from which bitches about non-external symbols, is there? 18:13:30 There isn't. 18:13:32 huh, does it? 18:13:34 eek 18:13:36 It would be pretty obnoxious if it does. 18:14:10 yeah, it would be! 18:14:31 -!- ljos [~mozzyb@login1.uib.no] has quit [Remote host closed the connection] 18:15:08 But, but... I -want- a version which complains! 18:15:48 (shadow 'defpackage) (defmacro defpackage ...) 18:16:13 Call it something else, like :timidly-import-from 18:16:15 Clearly, I'm just going to have to start collecting my own reimplementations of various important bits of standard functionality, leading to frustration for anyone who tries to make use of my projects... 18:16:45 nyef: that's what I did :D 18:17:08 now I just use :snarc instead of :cl and it's all good 18:17:20 dlowe: It's not an uncommon approach... unfortunately. 18:17:33 :/ 18:17:51 -!- Davidbrcz [~david@proxysup.isae.fr] has quit [Remote host closed the connection] 18:18:13 Davidbrcz [~david@proxysup.isae.fr] has joined #lisp 18:20:50 Man, nothing quite like combining #. and backquote. 18:22:21 -!- gavinharper [~gavinharp@dyn3-82-128-184-20.psoas.suomi.net] has quit [] 18:22:49 dmitrymatveev [~dm@83.149.44.152] has joined #lisp 18:22:59 -!- maxm- [~user@p84-72.acedsl.com] has quit [Read error: Operation timed out] 18:23:33 So! Hygiene question. Why is package::function discouraged? Is it simply that the author hid it and you shouldn't expect to understand side effects? Or is there another issue? 18:23:36 Actually, that might make an interesting common lisp tip. 18:24:46 ChibaPet: It's discouraged because the internal symbols of a package aren't typically part of the public interface of the package. 18:25:01 ChibaPet: something that is not exported is a way for the author to say "this is part of the internal implementation and might change without notice" 18:26:21 Alright. That sounds reasonable. In this case I suspect that the utility of exporting it might be conveyed to the code's maintainers. We'll see I guess! 18:26:43 Thank you for the help. I've noted several of the methods noted. 18:26:46 Or, less frequently, "I haven't thought about how to publish an external interface I'm willing to support long-term" 18:27:09 as with pdf-parser (or whatever it's called) in cl-pdf 18:27:43 Then there's also the concept of "internal packages". An entire package, with external symbols, basically saying "don't use any of this directly". 18:28:22 -!- dmitrymatveev [~dm@83.149.44.152] has quit [Quit: Lost terminal] 18:28:47 The desired function here is resize-frame in StumpWM. There are analogous functions for windows that are published. I'll try to find a dev mailing list and suggest the change there. (The issue, and why I want to do this, is that while you can programmatically resize windows, they are bounded by their frames - a slightly different concept from window-frames.) 18:31:25 -!- ramkrsna [~ramkrsna@unaffiliated/ramkrsna] has quit [Remote host closed the connection] 18:39:21 -!- e-user [e-user@nat/nokia/x-ghdyqecojjdvyxju] has quit [Read error: Connection reset by peer] 18:40:26 -!- sellout- [~Adium@c-98-245-162-253.hsd1.co.comcast.net] has quit [Quit: Leaving.] 18:41:27 -!- am0c [~am0c@222.235.56.83] has quit [Remote host closed the connection] 18:41:37 FreeArtMan [~FreeArtMa@93.177.213.54] has joined #lisp 18:42:33 mjs2600 [~user@user-0c999kc.cable.mindspring.com] has joined #lisp 18:43:31 zfx [~zfx@host86-145-66-157.range86-145.btcentralplus.com] has joined #lisp 18:43:32 -!- zfx [~zfx@host86-145-66-157.range86-145.btcentralplus.com] has quit [Changing host] 18:43:32 zfx [~zfx@unaffiliated/zfx] has joined #lisp 18:43:37 -!- c_arenz [arenz@nat/ibm/x-xmjvobwkhzmcbrya] has quit [Ping timeout: 258 seconds] 18:43:41 -!- leo2007 [~leo@123.114.32.55] has quit [Ping timeout: 252 seconds] 18:44:44 -!- drake01 [~drake01@unaffiliated/drake01] has quit [Quit: Ex-Chat] 18:47:12 ljos [~mozzyb@login1.uib.no] has joined #lisp 18:47:27 -!- surrounder [~surrounde@d130031.upc-d.chello.nl] has quit [Quit: server update] 18:47:43 -!- zfx [~zfx@unaffiliated/zfx] has quit [Ping timeout: 248 seconds] 18:49:04 wbooze` [~levgue@xdsl-78-35-177-246.netcologne.de] has joined #lisp 18:49:14 homie` [~levgue@xdsl-78-35-177-246.netcologne.de] has joined #lisp 18:50:18 -!- Kenjin [~josesanto@bl15-226-231.dsl.telepac.pt] has quit [Quit: Computer has gone to sleep] 18:50:21 devinus [~devinus@65.107.181.222.ptr.us.xo.net] has joined #lisp 18:50:41 how do you guys nav history in slime? 18:50:57 M-p and M-n in the REPL? 18:51:31 tritchey [~tritchey@50-90-120-31.res.bhn.net] has joined #lisp 18:51:34 nyef: yep, works like a charm 18:51:40 -!- wbooze [~levgue@xdsl-78-35-143-123.netcologne.de] has quit [Ping timeout: 258 seconds] 18:51:40 -!- homie [~levgue@xdsl-78-35-143-123.netcologne.de] has quit [Ping timeout: 255 seconds] 18:51:51 nyef: happen to know clearing the repl or clearing the history line? 18:51:59 Not offhand, no. 18:52:13 devinus: C-c M-o clears the repl 18:52:19 C-c C-o clears the last output 18:52:25 (The other option for the nav history question was "with the slime-tardis contrib, new as of sometime in 2327.") 18:52:32 Xach: exactly what i wanted, thanks 18:52:44 devinus: http://slime-tips.tumblr.com is how i learned it. 18:53:18 H4ns [57a9edb2@gateway/web/freenode/ip.87.169.237.178] has joined #lisp 18:53:21 Xach: How's your lisp tips queue these days? 18:55:03 I have two weeks of draft tips to polish. 18:56:33 https://github.com/nikodemus/sb-texinfo # if someone is using a hacked docstrings.lisp in their project, i'd be happy to receive patches to this 18:56:34 ehu [~ehuels@ip118-64-212-87.adsl2.static.versatel.nl] has joined #lisp 18:57:09 -!- CaZe [~CaZe@pool-108-20-100-16.bstnma.east.verizon.net] has quit [Changing host] 18:57:09 CaZe [~CaZe@unaffiliated/y354c] has joined #lisp 18:57:28 schaueho [~schaueho@dslb-088-066-024-135.pools.arcor-ip.net] has joined #lisp 18:59:58 *Xach* sees a docstrings.lisp in alexandria, antik, elephant, esrap, mcclim, pileup, sb-cga, and screamer 19:00:20 nyef: have you any tips to share? 19:00:45 Combining #. with backquote? 19:00:48 that should have everything from alexandria, esrap, pileup, sb-cga, and screamer 19:00:54 askatasuna [~askatasun@190.177.4.198] has joined #lisp 19:01:01 nyef: That is not tippy enough 19:01:09 -!- nikodemus [~nikodemus@cs181056239.pp.htv.fi] has quit [Quit: This computer has gone to sleep] 19:01:39 Xach: Toss it in with combining #+/#- and #. ? 19:02:19 What I mean is I have no idea what you're talking about, so you'd have to tip me off too. 19:02:58 Ah. 19:03:18 I do know a bit about #+/#- and #., but not #. and ` 19:03:33 #.(let ((accessor (compute-accessor-name))) `(progn ... (,accessor ...))) 19:04:05 -!- mcsontos [~mcsontos@hotspot8.rywasoft.net] has quit [Quit: Leaving] 19:04:10 Also allows you to splice with ,@. 19:06:40 sellout- [~Adium@c-50-134-130-65.hsd1.co.comcast.net] has joined #lisp 19:07:13 -!- cnl [~cnl@95.106.27.202] has quit [Ping timeout: 260 seconds] 19:07:21 What sort of accessor name might you want to compute at read time? 19:07:33 I haven't seen that style before so my imagination is lacking. 19:08:08 rgrinberg [~rudi@24.52.246.61] has joined #lisp 19:08:33 -!- scharan [~scharan@169.235.25.47] has quit [Read error: Connection reset by peer] 19:08:51 Most recently, (intern (format nil "BVREF-~D" sb!vm:n-word-bits)). 19:09:18 It also works if you want to do something like #.`( ... ,@some-list ...). 19:10:48 -!- Jeanne-Kamikaze [~Jeanne-Ka@242.Red-88-24-175.staticIP.rima-tde.net] has quit [Ping timeout: 260 seconds] 19:11:11 Jeanne-Kamikaze [~Jeanne-Ka@242.Red-88-24-175.staticIP.rima-tde.net] has joined #lisp 19:13:13 -!- FreeArtMan [~FreeArtMa@93.177.213.54] has quit [Quit: 1/0] 19:14:19 lnostdal [~Lars@ti0030a380-dhcp0111.bb.online.no] has joined #lisp 19:15:01 FreeArtMan [~FreeArtMa@93.177.213.54] has joined #lisp 19:15:41 -!- todun [~todun@c-68-80-95-42.hsd1.pa.comcast.net] has quit [Quit: :q] 19:17:20 Xach: it's an alternative to macrolet that can be particularly useful in a non-evaluation context. 19:17:32 cnl [~cnl@95.106.27.202] has joined #lisp 19:18:01 -!- Davidbrcz [~david@proxysup.isae.fr] has quit [Remote host closed the connection] 19:18:25 Davidbrcz [~david@proxysup.isae.fr] has joined #lisp 19:20:55 -!- schaueho [~schaueho@dslb-088-066-024-135.pools.arcor-ip.net] has quit [Ping timeout: 255 seconds] 19:23:47 It's also effectively anonymous. 19:27:21 -!- benny [~benny@i577A8958.versanet.de] has quit [Ping timeout: 258 seconds] 19:30:51 Any reason this would just ... not run ? http://paste.lisp.org/display/125641 19:31:13 -!- ch077179 [~ch077179@unaffiliated/ch077179] has quit [Read error: Connection reset by peer] 19:31:19 The SBCL process just.. stops, no recorded CPU activity during its evaluation at the REPL 19:31:40 sbcl compiler is smart. 19:32:06 but it doesn't take me back to the REPL, it's as though it's doing something, but it's not 19:32:42 ccl does, in 3.136 micro seconds. 19:32:51 ccl does, in 6.136 micro seconds. 19:33:20 marsell [~marsell@120.18.47.41] has joined #lisp 19:33:21 this is bizzare. Does this count as a bug ? 19:33:30 It should return. 19:33:34 Zulu_Inuoe: Give it a SIGINT and see if there's anything interesting in the backtrace? 19:33:56 Zulu_Inuoe: you might see that if you haven't closed all your parens yet. 19:34:37 Xach: bwahahaa oh boy I'm feeling really ashamed right now. Sorry all 19:35:04 Zulu_Inuoe: if only i could say i had never made that mistake myself... 19:35:39 waveman [~tim@124.170.43.134] has joined #lisp 19:35:43 I think this signals that I need to take a break for a few minutes 19:35:55 Or use emacs. 19:35:55 -!- m7w [50f9568f@gateway/web/freenode/ip.80.249.86.143] has quit [Ping timeout: 265 seconds] 19:36:16 -!- FreeArtMan [~FreeArtMa@93.177.213.54] has quit [Quit: 1/0] 19:36:24 *Xach* made that mistake in emacs more than once 19:36:30 -!- gravicappa [~gravicapp@80.90.116.82] has quit [Remote host closed the connection] 19:36:34 emacs balances parentheses... 19:37:09 Emacs doesn't make mistakes. People make mistakes. 19:38:22 ^ 19:45:20 -!- oconnore [~Eric@75-150-66-254-NewEngland.hfc.comcastbusiness.net] has quit [Quit: Leaving.] 19:45:52 ch077179 [~ch077179@unaffiliated/ch077179] has joined #lisp 19:46:33 todun [~todun@SEAS008.wlan.seas.upenn.edu] has joined #lisp 19:49:41 -!- boei [~boei@44.Red-83-33-86.dynamicIP.rima-tde.net] has quit [Quit: Leaving] 19:50:32 is there a way to restart slime/repl to reload quicklisp on an update? 19:51:08 M-x slime-restart-inferior-lisp is one way. 19:51:30 It's kind of a big hammer, you lose any state you had in the session. 19:51:39 benny [~benny@i577A2430.versanet.de] has joined #lisp 19:54:55 -!- devinus [~devinus@65.107.181.222.ptr.us.xo.net] has quit [Ping timeout: 256 seconds] 19:57:23 devinus [~devinus@65.107.181.222.ptr.us.xo.net] has joined #lisp 19:58:04 also you don't get to use updated slime this way 19:58:19 for that, you need an even bigger hammer 20:01:20 -!- trebor_dki [~user@mail.dki.tu-darmstadt.de] has quit [Ping timeout: 248 seconds] 20:02:05 -!- dnjaramba [~dnjaramba@41.72.193.86] has quit [] 20:02:09 tsuru`` [~charlie@adsl-98-87-46-38.bna.bellsouth.net] has joined #lisp 20:02:33 mishoo_ [~mishoo@86.124.148.84] has joined #lisp 20:02:38 -!- mishoo [~mishoo@86.124.148.84] has quit [Remote host closed the connection] 20:02:59 -!- H4ns [57a9edb2@gateway/web/freenode/ip.87.169.237.178] has quit [Ping timeout: 265 seconds] 20:03:51 -!- tsuru` [~charlie@adsl-98-87-47-198.bna.bellsouth.net] has quit [Read error: Connection reset by peer] 20:04:13 -!- Modius [~Modius@cpe-70-123-140-183.austin.res.rr.com] has quit [Quit: "Object-oriented design" is an oxymoron] 20:05:03 -!- Ralith [~ralith@S010600221561996a.vc.shawcable.net] has quit [Ping timeout: 248 seconds] 20:05:52 acelent` [~user@2001:690:2100:4:200:1aff:fe19:ddfc] has joined #lisp 20:07:23 -!- acelent [~user@2001:690:2100:4:200:1aff:fe19:ddfc] has quit [Remote host closed the connection] 20:08:39 Is there some reasonably efficient way to set a value in a hash-table if (and only if) the key does not already have a value? 20:09:24 do you mean, without calling GETHASH two times ? 20:09:30 Yeah, basically. 20:09:34 (unless (nth-value 1 (gethash k h)) (setf (gethash k h) v)) 20:09:44 peddie [~peddie@repl.esden.net] has joined #lisp 20:09:49 gethash is called once. Setf doesn't call gethash. 20:10:04 but it will hash the key two times 20:10:07 It still has to hash the key. 20:10:13 unless the hashes are cached 20:10:20 I can think of two methods to avoid it. 20:10:21 Now, the problem is whatever setf calls is implementation dependent. You can hope for a smart implementation that caches the slot search. 20:11:35 One of which is actually a define-modify-macro for an identity transform. 20:16:58 mrSpec [~Spec@unaffiliated/mrspec] has joined #lisp 20:17:26 -!- Shin-LaC [~LaC@adsl-69-211-50-177.dsl.chcgil.ameritech.net] has quit [Quit: This computer has gone to sleep] 20:18:11 -!- Davidbrcz [~david@proxysup.isae.fr] has quit [Remote host closed the connection] 20:18:33 Davidbrcz [~david@proxysup.isae.fr] has joined #lisp 20:19:13 surrounder [~surrounde@d130031.upc-d.chello.nl] has joined #lisp 20:20:03 Amadiro [~Amadiro@ti0021a380-dhcp3462.bb.online.no] has joined #lisp 20:20:32 -!- jewel [~jewel@196-215-117-72.dynamic.isadsl.co.za] has quit [Ping timeout: 248 seconds] 20:23:27 -!- Bike [~Glossina@69.166.35.233] has quit [Ping timeout: 252 seconds] 20:26:07 mstevens [~mstevens@fsf/member/pdpc.active.mstevens] has joined #lisp 20:26:35 -!- sellout- [~Adium@c-50-134-130-65.hsd1.co.comcast.net] has quit [Read error: Connection reset by peer] 20:29:52 codelurker1 [~codelurke@c-65-96-208-17.hsd1.ma.comcast.net] has joined #lisp 20:30:41 -!- codelurker1 [~codelurke@c-65-96-208-17.hsd1.ma.comcast.net] has quit [Client Quit] 20:33:44 -!- wbooze` [~levgue@xdsl-78-35-177-246.netcologne.de] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)] 20:33:49 -!- homie` [~levgue@xdsl-78-35-177-246.netcologne.de] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)] 20:33:57 gravicappa [~gravicapp@ppp91-77-164-160.pppoe.mtu-net.ru] has joined #lisp 20:36:06 schaueho [~schaueho@dslb-088-064-182-195.pools.arcor-ip.net] has joined #lisp 20:38:21 rmarianski [~rmariansk@mail.marianski.com] has joined #lisp 20:38:24 Ralith [~ralith@d142-058-093-062.wireless.sfu.ca] has joined #lisp 20:39:45 -!- lester2 [~lester2@76.73.16.26] has quit [Quit: CGI:IRC (Session timeout)] 20:40:14 -!- jtza8 [~jtza8@wbs-196-2-106-67.wbs.co.za] has quit [Remote host closed the connection] 20:41:36 jtza8 [~jtza8@wbs-196-2-106-67.wbs.co.za] has joined #lisp 20:45:23 -!- nyef [~nyef@c-174-63-105-188.hsd1.ma.comcast.net] has quit [Quit: G'night all.] 20:46:33 -!- claint [~user@88.242.64.178] has quit [Remote host closed the connection] 20:47:07 killerboy [~mateusz@users69.kollegienet.dk] has joined #lisp 20:47:12 -!- xjrn [~chatzilla@c-76-21-48-114.hsd1.ca.comcast.net] has quit [Ping timeout: 248 seconds] 20:47:17 ltriant [~ltriant@lithium.mailguard.com.au] has joined #lisp 20:48:10 -!- abeaumont [~abeaumont@90.165.165.246] has quit [Read error: Connection reset by peer] 20:48:51 -!- mjs2600 [~user@user-0c999kc.cable.mindspring.com] has quit [Remote host closed the connection] 20:50:16 Joreji [~thomas@vpn-ho1.unidsl.de] has joined #lisp 20:50:39 jsn [~jsn@c-98-225-158-149.hsd1.pa.comcast.net] has joined #lisp 20:51:25 hello, does anyone know of a CCL compatible lib for writing zip (PKZIP) archives? 20:51:33 I've tried the :zip from quicklisp 20:51:47 but it appears broken on ccl & sbcl (os x 10.72) 20:53:21 eck [~user@c-98-225-158-149.hsd1.pa.comcast.net] has joined #lisp 20:53:32 xjrn [~chatzilla@c-76-21-48-114.hsd1.ca.comcast.net] has joined #lisp 20:53:55 -!- devinus [~devinus@65.107.181.222.ptr.us.xo.net] has quit [Read error: Connection reset by peer] 20:53:57 -!- eck [~user@c-98-225-158-149.hsd1.pa.comcast.net] has left #lisp 20:53:58 devinus_ [~devinus@65.107.181.222.ptr.us.xo.net] has joined #lisp 20:54:25 -!- oudeis [~oudeis@59.37.63.109] has quit [Ping timeout: 256 seconds] 20:54:25 ah well 20:54:27 Bike [~Glossina@71-214-110-173.ptld.qwest.net] has joined #lisp 20:55:50 -!- ISF [~ivan@201.82.172.81] has quit [Quit: WeeChat 0.3.6] 20:59:12 jsn: odd, might be interesting to note it in #quicklisp /and/ to inform the developers of zip. 21:00:01 ISF [~ivan@201.82.172.81] has joined #lisp 21:00:38 @madnificent thanks, will do. 21:01:26 jsn: salza2 IIRC is the one 21:03:45 -!- dlowe [dlowe@nat/google/x-kghddhohtjlxtjak] has quit [Quit: Leaving.] 21:04:01 tmh [4b25e09f@pdpc/supporter/sustaining/tmh] has joined #lisp 21:04:07 Greetings lispers. 21:04:15 greetings tmh 21:05:46 -!- ISF [~ivan@201.82.172.81] has quit [Ping timeout: 255 seconds] 21:05:59 -!- benbelly [~bholm1@cpe-72-230-177-107.rochester.res.rr.com] has left #lisp 21:06:36 LispWorks signals a SIMPLE-ERROR when there is no applicable method for the arguments to a generic function. Are the conditions that are signaled standardized? 21:07:08 In other words, would SBCL also signal a SIMPLE-ERROR for no applicable method? 21:08:01 tsuru: thanks I'll look into that as well 21:08:26 -!- Joreji [~thomas@vpn-ho1.unidsl.de] has quit [Ping timeout: 244 seconds] 21:10:04 astalla [~alexkidd@dynamic-adsl-94-36-45-245.clienti.tiscali.it] has joined #lisp 21:10:38 oconnore [~Eric@c-66-31-125-56.hsd1.ma.comcast.net] has joined #lisp 21:10:55 -!- oconnore [~Eric@c-66-31-125-56.hsd1.ma.comcast.net] has quit [Client Quit] 21:11:49 gringomorcego [~gringo@c-24-63-173-131.hsd1.ma.comcast.net] has joined #lisp 21:13:22 tmh: thought so, but not entirely certain. check no-applicable-method in clhs. it says that it signals an error of type error. (and simple-error is a subtype of that) 21:16:31 drwho [~drwho@c-68-81-125-196.hsd1.pa.comcast.net] has joined #lisp 21:16:43 madnificent: Thanks, I just checked SBCL and get a SIMPLE-ERROR, I didn't get to no-applicable-method in the CLHS. 21:18:21 -!- Davidbrcz [~david@proxysup.isae.fr] has quit [Remote host closed the connection] 21:18:43 -!- jtza8 [~jtza8@wbs-196-2-106-67.wbs.co.za] has quit [Remote host closed the connection] 21:18:45 Davidbrcz [~david@proxysup.isae.fr] has joined #lisp 21:20:25 tfb [~tfb@restormel.cley.com] has joined #lisp 21:20:46 madnificent: Good pointer, NO-APPLICABLE-METHOD is exactly how I should handle that. Thanks. 21:21:30 tmh: think i saw it pop up in the debugger sometime, that's why i went searching there. i should probably read the spec completely 21:21:36 enjoy the code :) 21:21:40 AntiSpamMeta [~MetaBot@unaffiliated/afterdeath/bot/antispambot] has joined #lisp 21:24:12 -!- schaueho [~schaueho@dslb-088-064-182-195.pools.arcor-ip.net] has quit [Ping timeout: 240 seconds] 21:24:29 -!- Ralith [~ralith@d142-058-093-062.wireless.sfu.ca] has quit [Ping timeout: 240 seconds] 21:24:48 freeone3000 [~james@Syncleus/dev/freeone3000] has joined #lisp 21:24:53 -!- gravicappa [~gravicapp@ppp91-77-164-160.pppoe.mtu-net.ru] has quit [Remote host closed the connection] 21:26:20 nicdev [~user@c-76-24-21-219.hsd1.ma.comcast.net] has joined #lisp 21:28:01 I have http://paste.lisp.org/display/125642 . Now, SBCL complains of an error in "read-in-compile-file" at character 3236. That corresponds to the end of the "or" at line 101. My parens match, so what's the error? (sbcl refuses to tell me anything mroe) 21:28:44 -!- tritchey [~tritchey@50-90-120-31.res.bhn.net] has quit [Quit: tritchey] 21:28:57 -!- codelurker [~codelurke@c-65-96-208-17.hsd1.ma.comcast.net] has quit [Quit: WeeChat 0.3.6] 21:29:17 -!- mstevens [~mstevens@fsf/member/pdpc.active.mstevens] has quit [Quit: leaving] 21:30:05 prxq [~mommer@mnhm-4d01223f.pool.mediaWays.net] has joined #lisp 21:30:25 edgar-rft [~user@HSI-KBW-078-043-123-191.hsi4.kabel-badenwuerttemberg.de] has joined #lisp 21:30:29 freeone3000: style police is warning you about the position of your parens, you don't close them like you close curly braces :) 21:30:54 hi 21:31:46 freeone3000: slime-compile-region works here... 21:31:56 -!- jsn [~jsn@c-98-225-158-149.hsd1.pa.comcast.net] has quit [Quit: jsn] 21:32:04 -!- edgar-rft [~user@HSI-KBW-078-043-123-191.hsi4.kabel-badenwuerttemberg.de] has quit [Client Quit] 21:33:37 Which means that either it's an sbcl problem, or that sbcl is lying about the position. Either way, different interperter. Thanks. 21:34:44 freeone3000: this is probably not going to do anything, but why not try it. could you copy the text from the paste into your lisp repl, form by form and see if it still spits out the error. 21:35:20 perhaps something went haywire in the file itself. it could also be interesting to know the platform your on and the version of your lisp (in case the previous half-hearted attempt fails) 21:35:26 Joreji [~thomas@vpn-eu2.unidsl.de] has joined #lisp 21:38:33 oudeis [~oudeis@222.126.197.129] has joined #lisp 21:39:00 -!- askatasuna [~askatasun@190.177.4.198] has quit [Quit: WeeChat 0.3.6] 21:39:37 Copy-pasted all the forms shown. Worked fine. Copy-pasted the rest of the file, error cropped up due to an unmatched paren, nearly thirty lines after the character sbcl stated. Thanks. 21:40:07 still a tad odd imo, the paste works fine here 21:40:29 the paste probably filters some unprintable characters. 21:41:02 -!- Jeanne-Kamikaze [~Jeanne-Ka@242.Red-88-24-175.staticIP.rima-tde.net] has quit [Quit: Did you hear that ?] 21:41:43 i had once a null byte embedded into a file. Lots of hilarity before I found out what the problem was. 21:41:54 -!- naeg [~naeg@194.208.239.170] has quit [Quit: WeeChat 0.3.6] 21:42:03 -!- iwillig [~ivan@ool-ad03c1a0.dyn.optonline.net] has quit [Quit: Leaving] 21:44:26 -!- bhyde [~bhyde@c-66-31-28-194.hsd1.ma.comcast.net] has left #lisp 21:47:07 prxq: i was hoping that it was such a character. though i'd have assumed that sbcl would've warned on an unreadable character in that case. 21:47:30 -!- tfb [~tfb@restormel.cley.com] has quit [Remote host closed the connection] 21:48:19 freeone3000: if you copy that back from the paste site, does the problem disappear? 21:48:40 -!- devinus_ [~devinus@65.107.181.222.ptr.us.xo.net] has quit [Quit: devinus_] 21:49:21 prxq: It does, which is what I did to fix it. 21:49:48 then it's likely to be that. 21:50:31 freeone3000: that style of paren arangement is called "nailclippings" 21:51:17 -!- sdemarre [~serge@91.176.50.149] has quit [Ping timeout: 240 seconds] 21:52:18 I do curly brace languages 90% of the time. Lisp style is much harder for me to read, and I doubt that I'll figure it out by the time this project is done. 21:52:55 Oddity [~Oddity@unaffiliated/oddity] has joined #lisp 21:53:14 freeone3000: what editor are you using? 21:53:35 prxq: vim. Might migrate to slvim, but probably not. 21:53:48 -!- tmh [4b25e09f@pdpc/supporter/sustaining/tmh] has quit [Quit: Page closed] 21:54:29 sellout- [~Adium@c-98-245-162-253.hsd1.co.comcast.net] has joined #lisp 21:55:23 -!- Harag [~phil@41.56.50.149] has left #lisp 21:56:04 gffa [~gffa@unaffiliated/gffa] has joined #lisp 21:57:21 -!- hakzsam [~hakzsam@aqu33-5-82-245-96-206.fbx.proxad.net] has quit [Quit: Leaving] 21:58:00 freeone3000: another nitpick: note that sbcl is not an interpreter. 21:58:45 iwillig [~ivan@pool-173-68-253-246.nycmny.east.verizon.net] has joined #lisp 21:59:08 I put in lisp expressions, it gives me the result of these expressions. What is it if not an interpreter? 21:59:18 a compiler 21:59:47 just not the kind you usually see :) 21:59:54 freeone3000: though some implementations offer an interpreter as well :) 22:02:51 nicdev_` [~user@static-72-74-85-37.bstnma.fios.verizon.net] has joined #lisp 22:02:51 -!- nicdev_ [~user@static-72-74-85-37.bstnma.fios.verizon.net] has quit [Read error: Connection reset by peer] 22:04:43 lutok [~user@ip98-169-240-101.dc.dc.cox.net] has joined #lisp 22:08:17 -!- Kron_ [~Kron@129-97-120-116.uwaterloo.ca] has quit [Read error: Connection reset by peer] 22:09:58 -!- McMAGIC--Copy [~McMAGIC--@gateway/tor-sasl/mcmagic--copy] has quit [Remote host closed the connection] 22:12:41 -!- prxq [~mommer@mnhm-4d01223f.pool.mediaWays.net] has quit [Quit: Leaving] 22:13:03 -!- Oddity [~Oddity@unaffiliated/oddity] has quit [Ping timeout: 248 seconds] 22:14:29 -!- benkard [~benkard@141.84.69.67] has quit [Ping timeout: 240 seconds] 22:14:31 McMAGIC--Copy [~McMAGIC--@gateway/tor-sasl/mcmagic--copy] has joined #lisp 22:17:22 benkard [~benkard@141.84.69.67] has joined #lisp 22:18:31 -!- Davidbrcz [~david@proxysup.isae.fr] has quit [Remote host closed the connection] 22:18:54 Davidbrcz [~david@proxysup.isae.fr] has joined #lisp 22:22:24 maxm- [~user@p84-72.acedsl.com] has joined #lisp 22:23:12 -!- gringomorcego [~gringo@c-24-63-173-131.hsd1.ma.comcast.net] has quit [Quit: gringomorcego] 22:23:14 Athas [~athas@130.225.165.40] has joined #lisp 22:24:05 -!- nha [~prefect@5-74.104-92.cust.bluewin.ch] has quit [Ping timeout: 260 seconds] 22:25:34 DaDaDosPrompt [~DaDaDosPr@184.99.15.205] has joined #lisp 22:27:21 -!- ehu [~ehuels@ip118-64-212-87.adsl2.static.versatel.nl] has quit [Ping timeout: 256 seconds] 22:29:23 -!- cyrillos [~cyrill@188.134.33.194] has quit [Ping timeout: 276 seconds] 22:32:22 ISF [~ivan@201.82.172.81] has joined #lisp 22:33:20 DataLinkDKT [~AndChat@1.148.36.249] has joined #lisp 22:34:12 -!- Davidbrcz [~david@proxysup.isae.fr] has quit [Ping timeout: 244 seconds] 22:36:57 -!- acelent` is now known as acelent 22:38:14 gensym [~user@dslb-088-071-149-049.pools.arcor-ip.net] has joined #lisp 22:42:07 bhyde [~bhyde@c-66-30-201-212.hsd1.ma.comcast.net] has joined #lisp 22:42:37 -!- astalla [~alexkidd@dynamic-adsl-94-36-45-245.clienti.tiscali.it] has quit [Quit: Sto andando via] 22:43:07 Administrator [~quassel@bas2-toronto61-2925081504.dsl.bell.ca] has joined #lisp 22:43:33 -!- Administrator is now known as Guest47704 22:46:02 -!- peterhil [~peterhil@193-64-22-193-nat.elisa-mobile.fi] has quit [Ping timeout: 260 seconds] 22:50:15 -!- spacefrogg [~spacefrog@unaffiliated/spacefrogg] has quit [Quit: spacefrogg] 22:50:38 udzinari [~user@ip-89-102-12-6.net.upcbroadband.cz] has joined #lisp 22:51:00 -!- gensym [~user@dslb-088-071-149-049.pools.arcor-ip.net] has quit [Ping timeout: 260 seconds] 22:51:04 peterhil [~peterhil@GGZYMKCCCVI.gprs.sl-laajakaista.fi] has joined #lisp 22:59:19 -!- iwillig [~ivan@pool-173-68-253-246.nycmny.east.verizon.net] has quit [Quit: Leaving] 23:00:23 tsuru``` [~charlie@adsl-74-179-31-75.bna.bellsouth.net] has joined #lisp 23:01:41 -!- tsuru`` [~charlie@adsl-98-87-46-38.bna.bellsouth.net] has quit [Ping timeout: 240 seconds] 23:02:23 -!- acelent [~user@2001:690:2100:4:200:1aff:fe19:ddfc] has quit [Remote host closed the connection] 23:02:27 acelent [~user@2001:690:2100:4:200:1aff:fe19:ddfc] has joined #lisp 23:09:47 Oddity [~Oddity@unaffiliated/oddity] has joined #lisp 23:10:26 -!- benkard [~benkard@141.84.69.67] has quit [Quit: benkard] 23:15:52 Davidbrcz [~david@proxysup.isae.fr] has joined #lisp 23:16:32 xan_ [~xan@62.Red-2-138-181.dynamicIP.rima-tde.net] has joined #lisp 23:17:33 nialo- [~nialo@ool-182d1a3c.dyn.optonline.net] has joined #lisp 23:18:30 -!- wildnux [~wildnux@68-191-210-76.dhcp.dntn.tx.charter.com] has quit [Ping timeout: 258 seconds] 23:21:10 -!- Davidbrcz [~david@proxysup.isae.fr] has quit [Remote host closed the connection] 23:22:15 -!- lanthan__ [~ze@pD9FEAA58.dip.t-dialin.net] has quit [Ping timeout: 244 seconds] 23:24:21 zmv [~zmv@c95339f3.virtua.com.br] has joined #lisp 23:26:29 iwillig [~ivan@ool-ad03c1a0.dyn.optonline.net] has joined #lisp 23:26:30 zmv_ [~zmv@c95339f3.virtua.com.br] has joined #lisp 23:27:06 -!- Athas [~athas@130.225.165.40] has quit [Remote host closed the connection] 23:27:20 -!- zmv [~zmv@c95339f3.virtua.com.br] has quit [Disconnected by services] 23:27:24 -!- zmv_ is now known as zmv 23:30:02 scharan [~scharan@169.235.25.47] has joined #lisp 23:33:02 -!- milanj [~milanj_@93-87-194-178.dynamic.isp.telekom.rs] has quit [Quit: Leaving] 23:34:12 -!- juniorroy [~dima@212.36.228.103] has quit [Ping timeout: 240 seconds] 23:35:41 lanthan__ [~ze@pD9E3ABFE.dip.t-dialin.net] has joined #lisp 23:40:47 ikki [~ikki@219-externo-1p5ec.vxn.itelcel.com] has joined #lisp 23:45:46 askatasuna [~askatasun@190.97.54.87] has joined #lisp 23:46:24 Ralith [~ralith@S010600221561996a.vc.shawcable.net] has joined #lisp 23:50:11 -!- mishoo_ [~mishoo@86.124.148.84] has quit [Ping timeout: 260 seconds] 23:50:36 -!- zmv [~zmv@c95339f3.virtua.com.br] has quit [Ping timeout: 240 seconds] 23:51:38 mishoo [~mishoo@86.124.148.84] has joined #lisp 23:53:56 rtoyg [chatzilla@nat/google/x-plejkkkurlaekist] has joined #lisp 23:54:06 vlion [~Adium@76.178.165.160] has joined #lisp 23:54:30 -!- vlion [~Adium@76.178.165.160] has left #lisp 23:57:32 Younder [~john@49.157.202.84.customer.cdi.no] has joined #lisp 23:58:00 -!- tanglisha [~tanglisha@c-71-231-137-202.hsd1.wa.comcast.net] has quit [Quit: tanglisha] 23:59:22 I find it strange that Ubuntu tries to emulate a Mac. Just today I fund a guy who had installed Ubuntu on a Mac.