00:13:28 -!- dnolen [~davidnole@184.152.69.75] has quit [Quit: dnolen] 00:17:04 protv_ [ubuntu@117.192.106.137] has joined #scheme 00:17:54 -!- protv [ubuntu@117.192.96.75] has quit [Ping timeout: 260 seconds] 00:18:53 -!- protv_ is now known as protv 00:18:57 -!- protv is now known as protv_ 00:18:59 -!- protv_ is now known as protv 00:19:02 -!- protv is now known as protv_ 00:19:04 -!- protv_ is now known as protv 00:21:11 wingo [~wingo@90.164.198.39] has joined #scheme 00:24:18 jonrafkind [~jon@jonr5.dsl.xmission.com] has joined #scheme 00:31:38 -!- wingo [~wingo@90.164.198.39] has quit [Ping timeout: 246 seconds] 00:33:27 aidalgol [~user@114-134-7-23.rurallink.co.nz] has joined #scheme 00:34:11 -!- kilimanjaro [~kilimanja@unaffiliated/kilimanjaro] has quit [Ping timeout: 240 seconds] 00:35:15 -!- infid [~infid@rrcs-173-198-12-38.west.biz.rr.com] has quit [Ping timeout: 260 seconds] 00:36:39 -!- samth is now known as samth_away 00:37:11 saiko-chriskun [~chris-kun@fsf/member/saiko-chriskun] has joined #scheme 00:37:12 infid [~infid@99-101-15-134.lightspeed.sndgca.sbcglobal.net] has joined #scheme 00:47:47 ymasory_ [~ymasory@c-76-99-55-224.hsd1.pa.comcast.net] has joined #scheme 00:51:10 -!- Geef [~Geef@249.Red-83-33-83.dynamicIP.rima-tde.net] has quit [Quit: Error: Out of Cheese] 00:54:14 -!- Fare [~Fare@ita4fw1.itasoftware.com] has quit [Quit: Leaving] 00:55:45 -!- MrFahrenheit [~RageOfTho@users-146-140.vinet.ba] has quit [Ping timeout: 260 seconds] 01:03:25 -!- hussaibi [~hussaibi@wirewall.cs.toronto.edu] has quit [Quit: Ex-Chat] 01:17:33 -!- Nisstyre [~nisstyre@infocalypse-net.info] has quit [Remote host closed the connection] 01:25:15 Nisstyre [~nisstyre@infocalypse-net.info] has joined #scheme 01:26:27 protv_ [ubuntu@117.192.110.114] has joined #scheme 01:28:14 -!- protv [ubuntu@117.192.106.137] has quit [Ping timeout: 240 seconds] 01:32:13 tauntaun [~Crumpet@ool-44c72ce0.dyn.optonline.net] has joined #scheme 01:33:56 -!- nowhereman [pierre@AStrasbourg-551-1-2-136.w92-141.abo.wanadoo.fr] has quit [Read error: Connection reset by peer] 01:34:45 nowhere_man [pierre@AStrasbourg-551-1-2-136.w92-141.abo.wanadoo.fr] has joined #scheme 01:38:50 -!- tauntaun [~Crumpet@ool-44c72ce0.dyn.optonline.net] has quit [Quit: Ex-Chat] 01:45:58 -!- evhan [~evhan@76-250-39-229.lightspeed.mdsnwi.sbcglobal.net] has quit [Ping timeout: 240 seconds] 01:45:59 -!- protv_ [ubuntu@117.192.110.114] has quit [Read error: Connection reset by peer] 01:49:15 protv [ubuntu@117.192.112.223] has joined #scheme 01:51:33 -!- bzzbzz [~franco@modemcable240.34-83-70.mc.videotron.ca] has quit [Quit: leaving] 02:10:45 -!- ijp [~user@host86-150-74-195.range86-150.btcentralplus.com] has left #scheme 02:11:39 -!- saiko-chriskun [~chris-kun@fsf/member/saiko-chriskun] has quit [Read error: Connection reset by peer] 02:17:19 -!- leppie [~lolcow@196-215-49-168.dynamic.isadsl.co.za] has quit [Ping timeout: 240 seconds] 02:17:37 xwl [~user@123.108.223.27] has joined #scheme 02:20:25 leppie [~lolcow@196-215-49-168.dynamic.isadsl.co.za] has joined #scheme 02:35:34 dnolen [~davidnole@184.152.69.75] has joined #scheme 02:42:06 groovy2shoes [~cory@unaffiliated/groovebot] has joined #scheme 02:44:44 mjonsson [~mjonsson@38.109.95.149] has joined #scheme 02:48:00 -!- realitygrill [~realitygr@adsl-76-226-112-248.dsl.sfldmi.sbcglobal.net] has quit [Read error: Connection reset by peer] 02:51:31 pearle [~pearle@blk-224-181-222.eastlink.ca] has joined #scheme 03:02:10 -!- Riastradh [debian-tor@fsf/member/riastradh] has quit [Ping timeout: 246 seconds] 03:03:04 jrt4 [~jrtaylori@207-118-45-56.dyn.centurytel.net] has joined #scheme 03:04:08 -!- groovy2shoes [~cory@unaffiliated/groovebot] has quit [Remote host closed the connection] 03:04:30 groovy2shoes [~cory@unaffiliated/groovebot] has joined #scheme 03:06:51 -!- xwl [~user@123.108.223.27] has quit [Read error: Connection reset by peer] 03:07:03 -!- groovy2shoes [~cory@unaffiliated/groovebot] has quit [Client Quit] 03:09:48 -!- dnolen [~davidnole@184.152.69.75] has quit [Quit: dnolen] 03:11:24 groovy2shoes [~cory@unaffiliated/groovebot] has joined #scheme 03:18:09 -!- groovy2shoes [~cory@unaffiliated/groovebot] has quit [Read error: Connection reset by peer] 03:18:25 xwl [~user@123.108.223.27] has joined #scheme 03:27:20 groovy2shoes [~cory@unaffiliated/groovebot] has joined #scheme 03:32:31 -!- groovy2shoes [~cory@unaffiliated/groovebot] has quit [Read error: Connection reset by peer] 03:34:14 groovy2shoes [~cory@unaffiliated/groovebot] has joined #scheme 03:34:27 -!- groovy2shoes [~cory@unaffiliated/groovebot] has quit [Client Quit] 03:46:06 evhan [~evhan@76-250-39-229.lightspeed.mdsnwi.sbcglobal.net] has joined #scheme 03:50:51 -!- pearle [~pearle@blk-224-181-222.eastlink.ca] has quit [Quit: Leaving] 03:53:42 kilimanjaro [~kilimanja@unaffiliated/kilimanjaro] has joined #scheme 03:59:29 -!- soveran [~soveran@186.19.214.247] has quit [Remote host closed the connection] 03:59:42 Jafet [~Jafet@unaffiliated/jafet] has joined #scheme 04:02:32 -!- bgs100 [~ian@unaffiliated/bgs100] has quit [Quit: nihgt] 04:16:18 -!- aidalgol [~user@114-134-7-23.rurallink.co.nz] has quit [Ping timeout: 258 seconds] 04:17:20 realitygrill [~realitygr@adsl-76-226-112-248.dsl.sfldmi.sbcglobal.net] has joined #scheme 04:29:45 -!- aisa [~aisa@c-68-35-164-105.hsd1.nm.comcast.net] has quit [Quit: aisa] 04:39:20 littlebobby [~bob@unaffiliated/littlebobby] has joined #scheme 04:56:02 would you say that the sicp video lectures add anything in case you're already reading the book? 05:00:05 littlebobby: yes, they do. They don't follow the book too closely, and it's a lively experience. 05:03:04 pjb: thanks 05:09:41 superjudge [~superjudg@c83-250-110-188.bredband.comhem.se] has joined #scheme 05:38:50 -!- cafesofie [~cafesofie@ool-18b97779.dyn.optonline.net] has quit [Remote host closed the connection] 05:40:59 aidalgol [~user@114-134-7-23.rurallink.co.nz] has joined #scheme 05:44:11 -!- XTL [~XTL@dsl-olubrasgw2-fe6af800-251.dhcp.inet.fi] has quit [Ping timeout: 240 seconds] 05:47:18 -!- jonrafkind [~jon@jonr5.dsl.xmission.com] has quit [Ping timeout: 240 seconds] 05:50:50 -!- tupi [~david@189.60.162.71] has quit [Quit: Leaving] 06:07:47 -!- araujo [~araujo@gentoo/developer/araujo] has quit [Quit: Leaving] 06:24:04 -!- littlebobby [~bob@unaffiliated/littlebobby] has quit [Quit: Ex-Chat] 06:31:23 -!- blueadept [~blueadept@unaffiliated/blueadept] has quit [Remote host closed the connection] 06:33:08 XTL [~XTL@dsl-olubrasgw2-fe6af800-251.dhcp.inet.fi] has joined #scheme 06:36:12 -!- nteon [~nteon@c-98-210-195-105.hsd1.ca.comcast.net] has quit [Ping timeout: 240 seconds] 06:55:07 mmc [~michal@82-148-210-75.fiber.unet.nl] has joined #scheme 06:55:54 -!- kilimanjaro [~kilimanja@unaffiliated/kilimanjaro] has quit [Read error: Connection reset by peer] 07:03:32 AtnNn [~welcome@modemcable060.239-177-173.mc.videotron.ca] has joined #scheme 07:18:23 -!- XTL [~XTL@dsl-olubrasgw2-fe6af800-251.dhcp.inet.fi] has quit [Ping timeout: 258 seconds] 07:19:27 XTL [~XTL@dsl-olubrasgw2-fe6af800-251.dhcp.inet.fi] has joined #scheme 07:19:51 djcb [~user@a88-112-253-18.elisa-laajakaista.fi] has joined #scheme 07:20:46 -!- monqy [~chap@pool-71-102-217-117.snloca.dsl-w.verizon.net] has quit [Quit: hello] 07:22:59 -!- ymasory_ [~ymasory@c-76-99-55-224.hsd1.pa.comcast.net] has quit [Ping timeout: 240 seconds] 07:30:04 -!- superjudge [~superjudg@c83-250-110-188.bredband.comhem.se] has quit [Quit: superjudge] 07:38:34 homie [~levgue@xdsl-84-44-211-249.netcologne.de] has joined #scheme 07:49:53 -!- XTL [~XTL@dsl-olubrasgw2-fe6af800-251.dhcp.inet.fi] has quit [Ping timeout: 276 seconds] 07:52:53 -!- pchrist [~spirit@gentoo/developer/pchrist] has quit [Quit: leaving] 07:53:38 pchrist [~spirit@gentoo/developer/pchrist] has joined #scheme 07:55:04 -!- jrt4 [~jrtaylori@207-118-45-56.dyn.centurytel.net] has quit [Ping timeout: 246 seconds] 08:02:47 -!- realitygrill [~realitygr@adsl-76-226-112-248.dsl.sfldmi.sbcglobal.net] has quit [Quit: realitygrill] 08:20:37 -!- mmc [~michal@82-148-210-75.fiber.unet.nl] has quit [Quit: Leaving.] 08:28:32 araujo [~araujo@gentoo/developer/araujo] has joined #scheme 08:34:31 -!- aidalgol [~user@114-134-7-23.rurallink.co.nz] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)] 08:35:39 jewel [~jewel@196-209-224-248.dynamic.isadsl.co.za] has joined #scheme 08:46:15 protv_ [ubuntu@117.192.105.31] has joined #scheme 08:46:33 which is the first with sussman? 08:46:58 -!- protv [ubuntu@117.192.112.223] has quit [Ping timeout: 240 seconds] 08:49:21 aidalgol [~user@114-134-7-23.rurallink.co.nz] has joined #scheme 08:53:23 -!- AtnNn [~welcome@modemcable060.239-177-173.mc.videotron.ca] has quit [Ping timeout: 276 seconds] 08:53:28 AtnNn [~welcome@modemcable060.239-177-173.mc.videotron.ca] has joined #scheme 08:53:50 wingo [~wingo@90.164.198.39] has joined #scheme 08:58:55 stis [~stis@1-1-1-39a.veo.vs.bostream.se] has joined #scheme 09:01:34 -!- rasterba_ [~rasterbar@99-113-184-115.lightspeed.sntcca.sbcglobal.net] has quit [Ping timeout: 246 seconds] 09:01:58 rasterbar [~rasterbar@unaffiliated/rasterbar] has joined #scheme 09:11:23 -!- aidalgol [~user@114-134-7-23.rurallink.co.nz] has quit [Remote host closed the connection] 09:13:43 X-Scale` [email@2001:470:1f08:b3d::2] has joined #scheme 09:14:07 -!- X-Scale [email@2001:470:1f08:b3d::2] has quit [Ping timeout: 248 seconds] 09:14:12 -!- X-Scale` is now known as X-Scale 09:21:20 aidalgol [~user@114-134-7-23.rurallink.co.nz] has joined #scheme 09:27:27 -!- X-Scale [email@2001:470:1f08:b3d::2] has quit [Ping timeout: 248 seconds] 09:34:09 mathk [~mathk@194.177.62.22] has joined #scheme 09:35:49 X-Scale [email@2001:470:1f08:b3d::2] has joined #scheme 09:41:59 -!- xwl [~user@123.108.223.27] has quit [Ping timeout: 260 seconds] 09:45:29 -!- milli [~milli@rasler.acmeps.com] has quit [Ping timeout: 260 seconds] 09:52:25 milli [~milli@rasler.acmeps.com] has joined #scheme 10:04:13 leo2007 [~leo@2402:f000:5:2901:225:4bff:fea9:b9e4] has joined #scheme 10:04:31 -!- ckrailo [~ckrailo@pool-173-71-46-119.dllstx.fios.verizon.net] has quit [Quit: Computer has gone to sleep.] 10:10:44 -!- aidalgol [~user@114-134-7-23.rurallink.co.nz] has quit [Remote host closed the connection] 10:17:53 MichaelRaskin [~MichaelRa@195.91.224.225] has joined #scheme 10:23:54 dRbiG [drbig@unhallowed.pl] has joined #scheme 10:38:08 Is it possible to evaluate a string like (read) does to user input? 10:40:50 Give read a string port? 10:41:12 I guess I will have to figure out Scheme ports then. 10:45:31 rudybot: eval (with-input-from-string "(1 2 3)" read) 10:45:31 ohwow: your sandbox is ready 10:45:31 ohwow: ; Value: (1 2 3) 10:45:37 ivartj_: ^ 10:45:43 aha 10:57:03 postrediori [~Miranda@77-52-88-210.dialup.umc.net.ua] has joined #scheme 10:57:51 -!- postrediori [~Miranda@77-52-88-210.dialup.umc.net.ua] has left #scheme 11:00:57 -!- wingo [~wingo@90.164.198.39] has quit [Ping timeout: 240 seconds] 11:10:24 -!- protv_ [ubuntu@117.192.105.31] has quit [Read error: Connection reset by peer] 11:17:31 superjudge [~superjudg@c83-250-110-188.bredband.comhem.se] has joined #scheme 11:22:37 -!- superjudge [~superjudg@c83-250-110-188.bredband.comhem.se] has quit [Quit: superjudge] 11:22:54 protv [ubuntu@117.202.65.231] has joined #scheme 11:31:35 ijp [~user@host86-150-74-195.range86-150.btcentralplus.com] has joined #scheme 11:36:02 -!- djcb [~user@a88-112-253-18.elisa-laajakaista.fi] has quit [Remote host closed the connection] 11:47:20 talin [~talin@fw.nteb.no] has joined #scheme 11:47:26 -!- talin [~talin@fw.nteb.no] has left #scheme 11:51:34 Dark-Star [~michael@HSI-KBW-078-043-206-184.hsi4.kabel-badenwuerttemberg.de] has joined #scheme 11:56:41 -!- X-Scale [email@2001:470:1f08:b3d::2] has quit [Remote host closed the connection] 11:58:12 What is the best way to represent a matrix? Multidimentional array (srfi/25)? 12:01:03 depends. if it's a sparse matrix, a lookup table could be faster 12:04:48 -!- Jafet [~Jafet@unaffiliated/jafet] has quit [Ping timeout: 260 seconds] 12:05:47 Jafet [~Jafet@unaffiliated/jafet] has joined #scheme 12:08:29 MrFahrenheit [~RageOfTho@users-146-140.vinet.ba] has joined #scheme 12:10:44 alaricsp [~alaric@93.191.34.45] has joined #scheme 12:12:51 -!- alaricsp [~alaric@93.191.34.45] has quit [Client Quit] 12:16:52 What about vecor of vectors? 12:23:11 -!- AtnNn [~welcome@modemcable060.239-177-173.mc.videotron.ca] has quit [Remote host closed the connection] 12:23:16 AtnNn [~welcome@modemcable060.239-177-173.mc.videotron.ca] has joined #scheme 12:25:40 XTL [~XTL@dsl-olubrasgw2-fe6af800-251.dhcp.inet.fi] has joined #scheme 12:25:53 ah, i'll just use matrix module from PLaneT 12:38:53 protv_ [ubuntu@117.192.106.111] has joined #scheme 12:42:52 -!- protv [ubuntu@117.202.65.231] has quit [Ping timeout: 240 seconds] 12:44:01 http://paste.debian.net/116264/ Can somebody please help me finding error in this? :/ 12:45:39 ah nevermind me 12:45:45 i feel dumb today :S 12:59:31 superjudge [~superjudg@c83-250-110-188.bredband.comhem.se] has joined #scheme 13:07:11 protv [ubuntu@117.192.113.252] has joined #scheme 13:10:52 -!- protv_ [ubuntu@117.192.106.111] has quit [Ping timeout: 240 seconds] 13:13:03 -!- stis [~stis@1-1-1-39a.veo.vs.bostream.se] has quit [Ping timeout: 248 seconds] 13:18:27 soveran [~soveran@186.19.214.247] has joined #scheme 13:37:49 cfy [~cfy@unaffiliated/chenfengyuan] has joined #scheme 13:37:52 -!- cfy [~cfy@unaffiliated/chenfengyuan] has left #scheme 13:42:31 pearle [~pearle@blk-224-181-222.eastlink.ca] has joined #scheme 13:53:23 protv_ [ubuntu@117.192.108.229] has joined #scheme 13:54:56 stis [~stis@1-1-1-39a.veo.vs.bostream.se] has joined #scheme 13:56:27 dsmith [~dsmith@cpe-184-56-129-232.neo.res.rr.com] has joined #scheme 13:57:15 -!- protv [ubuntu@117.192.113.252] has quit [Ping timeout: 240 seconds] 13:59:15 -!- jewel [~jewel@196-209-224-248.dynamic.isadsl.co.za] has quit [Ping timeout: 240 seconds] 14:00:29 how do I solve this macro question? http://paste.lisp.org/display/121844 14:08:38 simonh [~simonh@92.28.95.82] has joined #scheme 14:09:31 wingo [~wingo@90.164.198.39] has joined #scheme 14:16:44 -!- protv_ [ubuntu@117.192.108.229] has quit [Read error: Connection reset by peer] 14:20:05 protv [ubuntu@117.192.99.222] has joined #scheme 14:22:27 stis: if check_s is a syntax object, then you can just move it from the let to the with-syntax, no? 14:22:46 tupi [~david@189.60.162.71] has joined #scheme 14:25:57 ijp, chsck_x is a lambda, a function, I tried to just make it a syntax object but that does not work on funciton objects 14:27:41 right, I'm pretty sure you can't use expand time functions at run time 14:28:08 ApeShot [~user@207.59.145.201] has joined #scheme 14:28:14 Hi #scheme 14:28:25 trying to get my head around syntax-case 14:28:27 Anyone here? 14:28:32 stis: Is it possible for you to create a lambda syntax object rather than a lambda? 14:29:53 ApeShot: what don't you understand? 14:31:39 Well, I understand how to use datum->syntax to create identifiers which share the scope of an identifier in the expansion 14:31:59 That is, I believe I get how create macros which bind symbols in their bodies 14:32:33 So I can imagine creating `let-x` where x is defined in the body of `let-x` 14:32:57 Suppose, however, that the body of let-x is itself expanded by another macro 14:33:06 Within that expansion, x is no longer visible 14:33:37 So the inner-body cannot reference the outer variable x 14:33:48 Not making sense 14:34:07 Sorry, I'm kind of new, and I think I lack the vocabulary to clearly express the issue. 14:34:25 Give me a second to use lisp-paste to create an example 14:36:03 ApeShot: Any reference to x in the second macro is going to be bound hygeinically unless you specifically capture it 14:37:20 It seems that to allow inner bodies to see x, I have to create a let around an identifier created via datum->syntax in each expansion 14:37:55 But given that the macro by its very nature is expanding inside the previously generate let expression, it seems the body should see those xs 14:38:03 At least it seems weird to introduce a series of nested scopes 14:38:20 Although I guess a reasonable compiler will see that they are redundant in the generated code? 14:38:44 -!- Jafet [~Jafet@unaffiliated/jafet] has quit [Remote host closed the connection] 14:38:50 I am imagining that the generated code would look like: 14:39:01 Jafet [~Jafet@unaffiliated/jafet] has joined #scheme 14:39:17 (let ((x 10)) (let ((x x)) (let ((x x)) ,@body))) 14:39:35 But the extra lets are just there to introduce appropriately lexically scoped x's 14:39:45 Even though they are obviously redundant 14:40:02 ApeShot: syntax-case macros don't refer to identifiers by name, but by lexcial binding 14:40:10 Yes. 14:40:21 I think I understand how syntax-case works 14:40:24 protv_ [ubuntu@117.192.126.194] has joined #scheme 14:40:36 rtra [~user@unaffiliated/rtra] has joined #scheme 14:40:39 so, x means x where the macro is defined, not the use site 14:40:40 In that I can certainly write a macro that works 14:40:50 -!- protv [ubuntu@117.192.99.222] has quit [Ping timeout: 240 seconds] 14:41:00 unless you use datum->syntax 14:41:16 Let me create a lisp-paste 14:41:53 -!- homie [~levgue@xdsl-84-44-211-249.netcologne.de] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)] 14:44:39 gcartier [~gcartier@modemcable041.134-82-70.mc.videotron.ca] has joined #scheme 14:44:43 Man, programming with syntax-case is like having sex with a condom when you are used to not using one. 14:44:50 Sorry sorry. 14:45:11 homie [~levgue@xdsl-84-44-211-249.netcologne.de] has joined #scheme 14:45:33 So defmacro is catholic? 14:45:40 not appropriate here, imo... 14:47:01 my best take at documenting syntax case is here: http://www.gnu.org/software/guile/manual/html_node/Macros.html#Macros 14:47:08 tauntaun [~Crumpet@ool-44c72ce0.dyn.optonline.net] has joined #scheme 14:47:31 Thanks 14:50:00 I notice that we are taking values out of and putting them into the syntax all over the place 14:50:06 Is syntax a monad of some kind? 14:52:56 sale87 [~sale@unaffiliated/sale87] has joined #scheme 14:59:23 -!- protv_ is now known as protv 14:59:39 -!- protv is now known as protv_ 14:59:43 -!- protv_ is now known as protv 14:59:53 -!- protv is now known as protv_ 15:01:23 Is lisp-paste broken? 15:01:34 It doesn't seem to be submitting 15:01:55 Yeah, you need to post it here yourself ATM 15:01:57 rtra` [~user@bl8-164-81.dsl.telepac.pt] has joined #scheme 15:02:31 -!- rtra` [~user@bl8-164-81.dsl.telepac.pt] has quit [Remote host closed the connection] 15:02:49 Just as text 15:02:50 ? 15:02:55 It won't even give me a page to paste 15:03:06 Just a white screen when I press submit 15:03:25 http://paste.lisp.org/display/121847 <- this? 15:03:27 -!- Pepe_ [~ppjet@bouah.net] has quit [Ping timeout: 248 seconds] 15:03:51 That is it 15:03:59 -!- rtra [~user@unaffiliated/rtra] has quit [Ping timeout: 260 seconds] 15:04:08 with-xs is the example I am interested in 15:04:24 But actually, just trying to use inner-with-xs will demonstrate the question 15:04:37 No, wait, it won't. 15:05:23 I don't even know if I have a question anymore, except for "Is there a nicer way to do this than passing bound identifiers into each sub-expansion? 15:05:27 " 15:07:37 I guess just put more logic into the syntax-case code rather than relying on sub-expanders would be cleaner 15:08:33 Ok, I know what to do now 15:08:39 Thanks for listening to me think it out 15:13:12 ravi_ [~ravi@118-92-157-20.dsl.dyn.ihug.co.nz] has joined #scheme 15:13:50 -!- simonh [~simonh@92.28.95.82] has quit [Ping timeout: 276 seconds] 15:19:17 -!- homie [~levgue@xdsl-84-44-211-249.netcologne.de] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)] 15:20:08 ApeShot: syntax case is tricky at first, but if you want two identifiers to be the same, they have to be created in the same expansion. 15:20:28 Since you're using racket, you should check out the macro stepper they have 15:22:02 I think I've figured it out 15:22:27 But I will 15:22:30 They are confusing at first 15:22:41 But also they have the feel of something very well designed 15:24:26 bgs100 [~ian@h50.105.187.173.dynamic.ip.windstream.net] has joined #scheme 15:24:27 -!- bgs100 [~ian@h50.105.187.173.dynamic.ip.windstream.net] has quit [Changing host] 15:24:27 bgs100 [~ian@unaffiliated/bgs100] has joined #scheme 15:24:37 dnolen [~davidnole@184.152.69.75] has joined #scheme 15:29:15 -!- gcartier [~gcartier@modemcable041.134-82-70.mc.videotron.ca] has quit [Read error: Connection reset by peer] 15:29:22 gcartier_ [~gcartier@modemcable041.134-82-70.mc.videotron.ca] has joined #scheme 15:32:08 -!- gcartier_ [~gcartier@modemcable041.134-82-70.mc.videotron.ca] has quit [Quit: ~ Trillian Astra - www.trillian.im ~] 15:33:05 gcartier_ [~gcartier@modemcable041.134-82-70.mc.videotron.ca] has joined #scheme 15:34:48 monqy [~chap@pool-71-102-217-117.snloca.dsl-w.verizon.net] has joined #scheme 15:35:50 bzzbzz [~franco@modemcable240.34-83-70.mc.videotron.ca] has joined #scheme 15:42:23 -!- ineiros_ [~itniemin@cs27065016.pp.htv.fi] has quit [Remote host closed the connection] 15:50:49 -!- soveran [~soveran@186.19.214.247] has quit [Remote host closed the connection] 15:53:39 http://paste.lisp.org/display/121850 15:53:43 Ok, so maybe I don't get it 15:53:48 There is the actual code I am working on 15:53:57 the form `with-monad` works when used at top level 15:54:06 That is, it produces the appropriate bindings inside its body 15:54:24 But when I use it inside another macro during expansion, the body doesn't seem to be associated with the scope of the let 15:54:59 See the first clause of mlet-inner for when with-monad is invoked 15:55:34 Basically mlet-inner peals off and binds the forms in mlet* and when it runs out runs the body with with-monad 15:55:41 Everything else works 15:56:08 You can even explicitely use (with-monad m-list ...) in the body of mlet* and the bindings behave appropriately 15:56:38 I must be missing some subtle point in expansion, since I think I am passing the appropriate pieces of syntax around? 16:02:03 Is this because the body is expanding by the first macro? 16:02:10 And so its scope is fixed there? 16:03:22 -!- dnolen [~davidnole@184.152.69.75] has quit [Quit: dnolen] 16:08:55 realitygrill [~realitygr@adsl-76-226-112-248.dsl.sfldmi.sbcglobal.net] has joined #scheme 16:11:55 i've tried sticking with-monad everywhere, and nothing seems to prevent m-return in mlet* from being top-level 16:12:02 -!- rdd [~rdd@c83-250-52-16.bredband.comhem.se] has quit [] 16:15:08 -!- Lectus [~fred@189.104.240.201] has quit [Ping timeout: 240 seconds] 16:21:37 This seems to basically be an issue of macros calling eachother 16:22:43 dnolen [~davidnole@pool-68-161-93-24.ny325.east.verizon.net] has joined #scheme 16:24:46 soveran [~soveran@186.19.214.247] has joined #scheme 16:25:46 homie [~levgue@xdsl-84-44-211-249.netcologne.de] has joined #scheme 16:31:04 -!- ApeShot [~user@207.59.145.201] has quit [Remote host closed the connection] 16:40:57 -!- realitygrill [~realitygr@adsl-76-226-112-248.dsl.sfldmi.sbcglobal.net] has quit [Read error: Connection reset by peer] 16:43:34 realitygrill [~realitygr@adsl-76-226-102-230.dsl.sfldmi.sbcglobal.net] has joined #scheme 16:45:43 Ppjet6 [~ppjet@tri59-1-195-36-251-195.dsl.club-internet.fr] has joined #scheme 16:47:01 lbc_ [~quassel@1908ds1-aboes.0.fullrate.dk] has joined #scheme 16:47:24 -!- Ppjet6 is now known as Pepe_ 16:50:03 -!- REPLeffect [~REPLeffec@69.54.115.254] has quit [Ping timeout: 252 seconds] 16:52:28 rdd [~rdd@c83-250-52-16.bredband.comhem.se] has joined #scheme 16:58:47 Hello guys, I am looking for something like map, but I need my list to grow in size.. 16:59:13 (f (lambda (x) (list x 2)) '(1 2 3)) --> (1 2 2 2 3 2) 16:59:17 something like this 16:59:27 is there a built-in function? 17:00:42 append-map (srfi 1) 17:03:51 thanks! 17:06:09 REPLeffect [~REPLeffec@69.54.115.254] has joined #scheme 17:07:32 -!- realitygrill [~realitygr@adsl-76-226-102-230.dsl.sfldmi.sbcglobal.net] has quit [Ping timeout: 240 seconds] 17:08:38 realitygrill [~realitygr@adsl-76-232-150-230.dsl.sfldmi.sbcglobal.net] has joined #scheme 17:15:14 kilimanjaro [~kilimanja@unaffiliated/kilimanjaro] has joined #scheme 17:20:23 simonh [~simonh@92.28.85.140] has joined #scheme 17:22:16 -!- alexgordon [~alexgordo@beyond.conceited.net] has quit [Read error: Operation timed out] 17:23:27 -!- mathk [~mathk@194.177.62.22] has left #scheme 17:28:33 -!- REPLeffect [~REPLeffec@69.54.115.254] has quit [Ping timeout: 252 seconds] 17:30:05 -!- soveran [~soveran@186.19.214.247] has quit [Remote host closed the connection] 17:32:37 Is there something like `trim' in Perl? 17:32:53 removes "\r" and "\n" from the end of the string? 17:34:09 -!- simonh [~simonh@92.28.85.140] has left #scheme 17:39:05 Yes 17:39:15 At least I have a vague memory. .chomp() ? 17:39:46 *XTL* has been happily almost perl-free since 2003 or something 17:40:00 You want string-trim-right from srfi 13 17:42:49 REPLeffect [~REPLeffec@69.54.115.254] has joined #scheme 17:43:04 Of course there's always regexes, but they're probably less efficient. 17:58:56 BoWozZ [~BackTrack@180.249.188.243] has joined #scheme 18:04:28 -!- BoWozZ [~BackTrack@180.249.188.243] has quit [] 18:09:40 -!- evhan [~evhan@76-250-39-229.lightspeed.mdsnwi.sbcglobal.net] has quit [Read error: Operation timed out] 18:09:45 -!- lbc_ [~quassel@1908ds1-aboes.0.fullrate.dk] has quit [Remote host closed the connection] 18:12:48 pnkfelix [~Adium@c-68-82-87-23.hsd1.pa.comcast.net] has joined #scheme 18:15:13 evhan [~evhan@76-250-39-229.lightspeed.mdsnwi.sbcglobal.net] has joined #scheme 18:19:01 thanks again ijp! 18:21:33 -!- MrFahrenheit [~RageOfTho@users-146-140.vinet.ba] has quit [Ping timeout: 258 seconds] 18:27:32 -!- REPLeffect [~REPLeffec@69.54.115.254] has quit [Remote host closed the connection] 18:31:59 -!- pygospa [~TheRealPy@kiel-4dbedef2.pool.mediaWays.net] has quit [Disconnected by services] 18:32:11 pygospa [~TheRealPy@kiel-5f77b131.pool.mediaWays.net] has joined #scheme 18:35:00 alexgordon [~alexgordo@beyond.conceited.net] has joined #scheme 18:36:19 ASau` [~user@95-26-159-184.broadband.corbina.ru] has joined #scheme 18:36:34 -!- ASau [~user@95-26-159-184.broadband.corbina.ru] has quit [Read error: Connection reset by peer] 18:38:23 masm [~masm@bl15-64-30.dsl.telepac.pt] has joined #scheme 18:39:19 littlebobby [~bob@unaffiliated/littlebobby] has joined #scheme 18:39:39 protv [ubuntu@117.192.107.46] has joined #scheme 18:40:13 Is there a procedure for list ``substraction''? E.g. (1 2 3 4 1) - (1 1 2) = (3 4) ? 18:41:38 -!- protv_ [ubuntu@117.192.126.194] has quit [Ping timeout: 276 seconds] 18:45:03 ohwow: iset egg? 18:45:17 (in chicken) 18:45:52 Hm, judging from a name it deals with sets, but I also have lists like (1 1 2) (eg: with duplicate elements) 18:46:55 for your example that would not make any difference since you are describing a set operation 18:47:15 hm 18:47:18 I'll look at it, thanks 18:47:52 or should the two 1s be taken out only if there are two 1s in the second list? 18:49:34 -!- leo2007 [~leo@2402:f000:5:2901:225:4bff:fea9:b9e4] has quit [Quit: rcirc on GNU Emacs 23.3.50.1] 18:49:37 homie` [~levgue@xdsl-78-35-181-135.netcologne.de] has joined #scheme 18:50:13 leo2007 [~leo@2402:f000:5:2901:225:4bff:fea9:b9e4] has joined #scheme 18:50:50 -!- MichaelRaskin [~MichaelRa@195.91.224.225] has left #scheme 18:51:41 -!- homie [~levgue@xdsl-84-44-211-249.netcologne.de] has quit [Ping timeout: 240 seconds] 18:56:12 choas [~lars@d86-33-20-45.cust.tele2.at] has joined #scheme 18:57:58 blueadept [~blueadept@unaffiliated/blueadept] has joined #scheme 18:59:46 saiko-chriskun [~chris-kun@fsf/member/saiko-chriskun] has joined #scheme 19:09:43 -!- leo2007 [~leo@2402:f000:5:2901:225:4bff:fea9:b9e4] has quit [Quit: rcirc on GNU Emacs 23.3.50.1] 19:12:54 rramsden [~rramsden@S0106000352036ade.pk.shawcable.net] has joined #scheme 19:17:00 rramsden_ [~rramsden@S0106000352036ade.pk.shawcable.net] has joined #scheme 19:17:03 MichaelRaskin [~MichaelRa@195.91.224.225] has joined #scheme 19:17:05 -!- rramsden [~rramsden@S0106000352036ade.pk.shawcable.net] has left #scheme 19:21:52 C-Keen: only if there are two 1s in second list 19:21:58 well i already wrote my own proc 19:24:22 -!- infid [~infid@99-101-15-134.lightspeed.sndgca.sbcglobal.net] has quit [Read error: Operation timed out] 19:27:16 Riastradh [debian-tor@fsf/member/riastradh] has joined #scheme 19:27:34 infid [~infid@rrcs-173-198-12-38.west.biz.rr.com] has joined #scheme 19:31:00 -!- kilimanjaro [~kilimanja@unaffiliated/kilimanjaro] has quit [Ping timeout: 260 seconds] 19:34:51 -!- Riastradh [debian-tor@fsf/member/riastradh] has quit [Remote host closed the connection] 19:35:57 Riastradh [debian-tor@fsf/member/riastradh] has joined #scheme 19:43:51 lbc_ [~quassel@1908ds1-aboes.0.fullrate.dk] has joined #scheme 19:47:17 -!- rramsden_ [~rramsden@S0106000352036ade.pk.shawcable.net] has quit [Quit: Leaving] 20:10:16 rramsden [~rramsden@s64-180-62-209.bc.hsia.telus.net] has joined #scheme 20:19:13 -!- githogori [~githogori@adsl-66-123-22-146.dsl.snfc21.pacbell.net] has quit [Read error: Operation timed out] 20:22:14 -!- dnolen [~davidnole@pool-68-161-93-24.ny325.east.verizon.net] has quit [Quit: dnolen] 20:23:40 -!- pnkfelix [~Adium@c-68-82-87-23.hsd1.pa.comcast.net] has quit [Quit: Leaving.] 20:26:09 -!- superjudge [~superjudg@c83-250-110-188.bredband.comhem.se] has quit [Quit: superjudge] 20:27:26 alaricsp [~alaric@relief.warhead.org.uk] has joined #scheme 20:32:22 Hmm, what's the closest Racket macro to dotimes? 20:33:46 do ((i 0 (+ i 1))) ((>= i n)) 20:35:17 That works too. :-) 20:35:37 I think Racket also has (for ((i (in-range n))) ...), so. Hmm. 20:35:45 The form you had is obviously more standard. 20:38:16 Nibble [~Nibble@90-227-5-107-no113.tbcn.telia.com] has joined #scheme 20:40:26 You can also do (loop ((for i (up-from 0 (to n)))) ...), if you like the whole non-standard thing, provided that you load foof-loop first. 20:41:40 *nods* 20:50:22 protv_ [ubuntu@117.192.101.84] has joined #scheme 20:50:52 -!- protv [ubuntu@117.192.107.46] has quit [Ping timeout: 240 seconds] 20:53:56 -!- Modius [~Modius@cpe-70-123-140-183.austin.res.rr.com] has quit [Quit: "Object-oriented design" is an oxymoron] 20:57:36 mmc [~michal@82-148-210-75.fiber.unet.nl] has joined #scheme 21:01:24 -!- bzzbzz [~franco@modemcable240.34-83-70.mc.videotron.ca] has quit [Quit: leaving] 21:06:35 -!- Euthydemus [~euthydemu@vaxjo4.213.cust.blixtvik.net] has quit [Ping timeout: 276 seconds] 21:07:18 Euthydemus [~euthydemu@vaxjo4.213.cust.blixtvik.net] has joined #scheme 21:08:40 protv [ubuntu@117.192.99.212] has joined #scheme 21:09:35 -!- protv_ [ubuntu@117.192.101.84] has quit [Ping timeout: 260 seconds] 21:10:14 jonrafkind [~jon@jonr5.dsl.xmission.com] has joined #scheme 21:10:59 dnolen [~davidnole@184.152.69.75] has joined #scheme 21:17:57 gravicappa [~gravicapp@ppp91-77-167-194.pppoe.mtu-net.ru] has joined #scheme 21:19:21 -!- rdd [~rdd@c83-250-52-16.bredband.comhem.se] has quit [] 21:32:59 arcfide [1000@c-69-136-5-227.hsd1.in.comcast.net] has joined #scheme 21:37:54 -!- saiko-chriskun [~chris-kun@fsf/member/saiko-chriskun] has quit [Quit: WeeChat 0.3.4] 21:38:31 rdd [~rdd@c83-250-52-16.bredband.comhem.se] has joined #scheme 21:44:14 pnkfelix [~Adium@108.113.66.238] has joined #scheme 21:44:37 -!- choas [~lars@d86-33-20-45.cust.tele2.at] has quit [Quit: leaving] 21:58:00 -!- gravicappa [~gravicapp@ppp91-77-167-194.pppoe.mtu-net.ru] has quit [Ping timeout: 260 seconds] 22:00:27 -!- masm [~masm@bl15-64-30.dsl.telepac.pt] has quit [Quit: Leaving.] 22:12:15 MrFahrenheit [~RageOfTho@users-146-140.vinet.ba] has joined #scheme 22:17:14 -!- stis [~stis@1-1-1-39a.veo.vs.bostream.se] has left #scheme 22:29:47 -!- JuanDaugherty [~Ren@cpe-72-228-177-92.buffalo.res.rr.com] has quit [Quit: Exeunt IRC] 22:41:49 -!- bgs100 [~ian@unaffiliated/bgs100] has quit [Ping timeout: 240 seconds] 22:41:54 -!- mmc [~michal@82-148-210-75.fiber.unet.nl] has quit [Quit: Leaving.] 22:43:39 -!- rramsden [~rramsden@s64-180-62-209.bc.hsia.telus.net] has quit [Quit: Leaving] 23:01:50 -!- pnkfelix [~Adium@108.113.66.238] has quit [Quit: Leaving.] 23:15:04 -!- homie` [~levgue@xdsl-78-35-181-135.netcologne.de] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)] 23:16:58 -!- littlebobby [~bob@unaffiliated/littlebobby] has quit [Quit: Ex-Chat] 23:19:44 homie [~levgue@xdsl-78-35-181-135.netcologne.de] has joined #scheme 23:31:12 open [~thesk@unaffiliated/open] has joined #scheme 23:38:34 -!- wingo [~wingo@90.164.198.39] has quit [Ping timeout: 258 seconds] 23:41:13 -!- ijp [~user@host86-150-74-195.range86-150.btcentralplus.com] has left #scheme 23:54:07 -!- Riastradh [debian-tor@fsf/member/riastradh] has quit [Ping timeout: 246 seconds] 23:54:35 githogori [~githogori@225.sub-75-208-12.myvzw.com] has joined #scheme 23:54:56 -!- acarrico [~acarrico@pppoe-68-142-62-150.gmavt.net] has quit [Ping timeout: 276 seconds]