00:03:06 zmv_ [~Telefonic@187.35.233.130] has joined #scheme 00:06:21 -!- zmv [~Telefonic@187.35.233.130] has quit [Ping timeout: 258 seconds] 00:16:15 -!- alfa_y_omega [~alfa_y_om@90.166.231.220] has quit [Ping timeout: 260 seconds] 00:17:55 alfa_y_omega [~alfa_y_om@90.166.231.220] has joined #scheme 00:22:02 -!- phao [phao@189.119.50.105] has quit [Quit: Fui embora] 00:22:43 -!- realitygrill [~realitygr@c-24-5-7-139.hsd1.ca.comcast.net] has quit [Quit: realitygrill] 00:22:54 bohanlon [~bohanlon@pool-108-20-68-105.bstnma.fios.verizon.net] has joined #scheme 00:23:43 how do i control writing sexps in the racket repl? 00:23:49 i'd like it to insert more line breaks 00:24:58 zmv [~Telefonic@187.35.233.130] has joined #scheme 00:27:41 -!- zmv_ [~Telefonic@187.35.233.130] has quit [Ping timeout: 240 seconds] 00:34:15 -!- pygospa [~TheRealPy@kiel-d9bfc1e6.pool.mediaWays.net] has quit [Disconnected by services] 00:34:24 pygospa [~TheRealPy@kiel-4dbecdaf.pool.mediaWays.net] has joined #scheme 00:35:17 pretty-print-extend-style-table, if you must 00:39:56 can't access it in r6rs 00:44:14 phao [phao@189.119.50.105] has joined #scheme 00:45:32 rudybot_ [~luser@ec2-204-236-167-175.us-west-1.compute.amazonaws.com] has joined #scheme 00:46:26 zmv_ [~Telefonic@187.35.233.130] has joined #scheme 00:47:12 stchang_ [~stchang@login.ccs.neu.edu] has joined #scheme 00:47:17 crypto_ [~z0d@artifact.hu] has joined #scheme 00:47:20 sjamaan_ [~sjamaan@frohike.xs4all.nl] has joined #scheme 00:48:11 is there a test suite for scheme impls for some rNrs? 00:49:28 lolcow [~lolcow@196-215-83-98.dynamic.isadsl.co.za] has joined #scheme 00:49:47 -!- zmv [~Telefonic@187.35.233.130] has quit [Ping timeout: 240 seconds] 00:50:00 -!- DrDuck [~duck@adsl-98-81-80-109.hsv.bellsouth.net] has quit [Ping timeout: 255 seconds] 00:51:52 -!- Akrasiac [~Akrasiac@c-24-7-16-152.hsd1.ca.comcast.net] has quit [*.net *.split] 00:51:52 -!- proq [~user@unaffiliated/proqesi] has quit [*.net *.split] 00:51:52 -!- z0d [~z0d@unaffiliated/z0d] has quit [*.net *.split] 00:51:52 -!- leppie [~lolcow@196-215-83-98.dynamic.isadsl.co.za] has quit [*.net *.split] 00:51:52 -!- sjamaan [~sjamaan@netbsd/developer/sjamaan] has quit [*.net *.split] 00:51:53 -!- eli [~eli@winooski.ccs.neu.edu] has quit [*.net *.split] 00:51:53 -!- samth_away [~samth@punge.ccs.neu.edu] has quit [*.net *.split] 00:51:53 -!- rudybot [~luser@ec2-204-236-167-175.us-west-1.compute.amazonaws.com] has quit [*.net *.split] 00:51:53 -!- micro [~micro@www.bway.net] has quit [*.net *.split] 00:51:53 -!- stchang [~stchang@login.ccs.neu.edu] has quit [*.net *.split] 00:56:53 doc_who [~doc_who@pool-108-28-6-47.washdc.fios.verizon.net] has joined #scheme 00:59:25 samth_away [~samth@punge.ccs.neu.edu] has joined #scheme 01:00:17 weirdo, yes... I don't have the link 01:00:27 but I've seen some already 01:00:34 not sure if I really understood your question 01:00:39 though 01:01:03 kilimanjaro [~kilimanja@unaffiliated/kilimanjaro] has joined #scheme 01:02:03 phao, i'm writing a new implementation and i'd like to test some edge cases 01:03:07 hmm 01:03:11 not sure though 01:03:18 the standard itself has some code 01:03:21 not edge cases though 01:03:29 try the srfi 01:16:59 -!- zmv_ [~Telefonic@187.35.233.130] has quit [Ping timeout: 240 seconds] 01:18:42 zmv [~Telefonic@187.35.233.130] has joined #scheme 01:25:23 -!- phao [phao@189.119.50.105] has quit [Read error: Connection reset by peer] 01:25:33 phao [phao@189.119.50.105] has joined #scheme 01:30:20 -!- gnomon [~gnomon@CPE0022158a8221-CM000f9f776f96.cpe.net.cable.rogers.com] has quit [Ping timeout: 260 seconds] 01:30:36 gnomon [~gnomon@CPE0022158a8221-CM000f9f776f96.cpe.net.cable.rogers.com] has joined #scheme 01:32:21 -!- zmv [~Telefonic@187.35.233.130] has quit [Ping timeout: 252 seconds] 01:33:33 zmv [~Telefonic@187.35.233.130] has joined #scheme 01:49:50 -!- zmv [~Telefonic@187.35.233.130] has quit [Ping timeout: 258 seconds] 01:54:54 -!- dnolen_ [~davidnole@184.152.69.75] has quit [Quit: dnolen_] 02:21:16 -!- kilimanjaro [~kilimanja@unaffiliated/kilimanjaro] has quit [Ping timeout: 260 seconds] 02:22:39 pbalduino [c8a2d045@gateway/web/freenode/ip.200.162.208.69] has joined #scheme 02:23:32 -!- pbalduino [c8a2d045@gateway/web/freenode/ip.200.162.208.69] has left #scheme 02:25:19 -!- MrFahrenheit [~RageOfTho@users-151-140.vinet.ba] has quit [Ping timeout: 258 seconds] 02:34:59 -!- Obfuscate [~keii@ip98-176-17-38.sd.sd.cox.net] has quit [Ping timeout: 246 seconds] 02:35:00 -!- Intensity [aAERzbcdXs@unaffiliated/intensity] has quit [Ping timeout: 246 seconds] 02:39:22 soveran [~soveran@186.19.214.247] has joined #scheme 02:41:35 Obfuscate [~keii@ip98-176-17-38.sd.sd.cox.net] has joined #scheme 02:59:50 -!- Obfuscate [~keii@ip98-176-17-38.sd.sd.cox.net] has quit [*.net *.split] 03:03:44 eli [~eli@winooski.ccs.neu.edu] has joined #scheme 03:18:49 Intensity [1x1OYOPeDn@unaffiliated/intensity] has joined #scheme 03:29:46 phao_ [phao@187.80.72.105] has joined #scheme 03:29:48 -!- phao [phao@189.119.50.105] has quit [Read error: Connection reset by peer] 03:35:10 -!- G_ [~G@41.51.68.86.rev.sfr.net] has quit [Quit: leaving] 03:40:39 Obfuscate [~keii@ip98-176-17-38.sd.sd.cox.net] has joined #scheme 03:50:01 -!- Obfuscate [~keii@ip98-176-17-38.sd.sd.cox.net] has quit [Ping timeout: 246 seconds] 03:50:28 i need help with cps-xform 03:50:53 don't know how to treat quoted-literals and begin 03:54:04 oh i found this 03:54:04 http://www.cliki.net/CPS 03:55:19 Obfuscate [~keii@ip98-176-17-38.sd.sd.cox.net] has joined #scheme 03:59:25 you can probably treat `(begin ...)' as `((lambda ignored (begin ...)) )' 04:23:45 -!- doc_who [~doc_who@pool-108-28-6-47.washdc.fios.verizon.net] has quit [Ping timeout: 255 seconds] 04:24:09 Obfuscate` [~keii@ip98-176-17-38.sd.sd.cox.net] has joined #scheme 04:25:43 -!- Obfuscate [~keii@ip98-176-17-38.sd.sd.cox.net] has quit [Ping timeout: 246 seconds] 04:26:50 -!- mithridates [~mithridat@142.167.234.173] has quit [Quit: leaving] 04:27:34 ski, what if foo calls some k? 04:31:31 G_ [~G@41.51.68.86.rev.sfr.net] has joined #scheme 04:31:56 if it doesn't save its continuation first, then `(begin ...)' will never be executed 04:32:46 hm, it occurs to me that i ought to have said either 04:32:54 ((lambda (ignored) (begin ...)) ) 04:32:56 or 04:33:40 (call-with-values (lambda () ) 04:33:41 (lambda ignored (begin ...))) 04:33:43 before 04:34:49 (the former requires `' to yield exactly one value (in case it returns). the latter allows `' to return any number of values to its continuation) 04:35:58 thank you 04:37:03 you could probably handle `begin' directly. if you want to, you could handle `call-with-values' as a primitive procedure, too 04:39:46 (`call-with-values' can be implemented in terms of `call-with-current-continuation', though that might be overkill, depending on how the latter is implemented) 04:40:52 it'll be implemented as primitive function 04:47:56 damn. i can't find out how it's supposed to be :( 04:48:02 it has to be recursive, but... 04:52:53 -!- bgs100 [~ian@unaffiliated/bgs100] has quit [Quit: [insert quit message]] 05:11:10 mojavy [~takayuki@softbank126120241177.bbtec.net] has joined #scheme 05:11:44 -!- soveran [~soveran@186.19.214.247] has quit [Remote host closed the connection] 05:35:45 -!- pyro- [~pyro@CPE-124-180-186-25.lns12.lon.bigpond.net.au] has quit [Ping timeout: 255 seconds] 05:41:47 -!- tupi [~david@189.60.162.202] has quit [Quit: Leaving] 05:48:10 -!- preflex_ [~preflex@unaffiliated/mauke/bot/preflex] has quit [Ping timeout: 240 seconds] 05:48:19 preflex [~preflex@unaffiliated/mauke/bot/preflex] has joined #scheme 05:49:09 pyro- [~pyro@CPE-124-180-186-25.lns12.lon.bigpond.net.au] has joined #scheme 06:30:56 -!- phao_ [phao@187.80.72.105] has quit [Quit: Fui embora] 06:46:57 gravicappa [~gravicapp@p57A40947.dip0.t-ipconnect.de] has joined #scheme 06:48:48 mithridates [~mithridat@142.167.234.173] has joined #scheme 06:49:42 Moin! 06:50:25 moin moin 07:05:01 kilimanjaro [~kilimanja@unaffiliated/kilimanjaro] has joined #scheme 07:12:51 mudshark [~dvgb@c114-77-112-238.chirn2.vic.optusnet.com.au] has joined #scheme 07:18:48 -!- kilimanjaro [~kilimanja@unaffiliated/kilimanjaro] has quit [Quit: Leaving] 07:21:51 -!- mojavy [~takayuki@softbank126120241177.bbtec.net] has quit [Remote host closed the connection] 07:25:30 yay! i won! 07:26:23 http://paste.lisp.org/display/123480 07:40:48 -!- kennyd [~kennyd@93-141-81-36.adsl.net.t-com.hr] has quit [Ping timeout: 276 seconds] 07:43:12 kennyd [~kennyd@93-141-118-167.adsl.net.t-com.hr] has joined #scheme 07:53:09 -!- mudshark [~dvgb@c114-77-112-238.chirn2.vic.optusnet.com.au] has quit [Ping timeout: 276 seconds] 08:08:45 -!- Quetzalcoatl_ [~Administr@cpe-75-186-5-185.cinci.res.rr.com] has quit [Ping timeout: 260 seconds] 08:12:25 Quetzalcoatl_ [~Administr@cpe-75-186-5-185.cinci.res.rr.com] has joined #scheme 08:18:58 -!- gravicappa [~gravicapp@p57A40947.dip0.t-ipconnect.de] has quit [*.net *.split] 08:25:20 Sgeo [~Sgeo@ool-ad034d00.dyn.optonline.net] has joined #scheme 08:25:35 Why does http://www.jazzscheme.org/images/screenshots/text_jazz.htm remind me so much of Java? :/ 08:29:01 based on the keyword similarities alone, I'd guess it's intentional. 08:31:15 haha. "Jazz borrows ideas from ... Java for its simple object system ..." 08:38:19 -!- arcfide [1000@c-69-136-7-94.hsd1.in.comcast.net] has quit [Quit: EPIC5-1.1.2[1638] - amnesiac : Candy is dandy, but chloroform keeps them little bastards quiet while I shag 'em] 08:39:15 masm [~masm@bl15-129-254.dsl.telepac.pt] has joined #scheme 08:39:41 -!- blueadept [~blueadept@unaffiliated/blueadept] has quit [Max SendQ exceeded] 09:18:52 choas [~lars@p5792C937.dip.t-dialin.net] has joined #scheme 09:21:36 -!- sjamaan_ is now known as sjamaan 09:21:43 -!- sjamaan [~sjamaan@frohike.xs4all.nl] has quit [Changing host] 09:21:43 sjamaan [~sjamaan@netbsd/developer/sjamaan] has joined #scheme 09:22:37 genieliu [~genieliu@59.78.62.120] has joined #scheme 09:26:54 -!- kytibe [~kytibe@212.174.109.55] has quit [Remote host closed the connection] 09:34:53 stis [~stis@1-1-1-39a.veo.vs.bostream.se] has joined #scheme 09:48:56 -!- penryu [~tanuki@unaffiliated/penryu] has left #scheme 09:51:26 penryu [~tanuki@unaffiliated/penryu] has joined #scheme 10:04:24 fsntation [~fsntation@212.174.109.55] has joined #scheme 10:07:09 -!- fsntation [~fsntation@212.174.109.55] has quit [Remote host closed the connection] 10:09:35 homie` [~levgue@xdsl-87-79-194-186.netcologne.de] has joined #scheme 10:12:01 -!- homie [~levgue@xdsl-78-35-172-43.netcologne.de] has quit [Ping timeout: 260 seconds] 10:25:42 -!- Sgeo [~Sgeo@ool-ad034d00.dyn.optonline.net] has quit [Read error: Connection reset by peer] 10:26:18 Sgeo [~Sgeo@ool-ad034d00.dyn.optonline.net] has joined #scheme 10:38:24 -!- mithridates [~mithridat@142.167.234.173] has quit [Quit: Lost terminal] 10:38:24 fsntation [~fsntation@212.174.109.55] has joined #scheme 10:44:25 -!- forcer [~forcer@g231146126.adsl.alicedsl.de] has quit [Ping timeout: 258 seconds] 10:47:45 wingo [~wingo@90.164.198.39] has joined #scheme 11:00:47 soveran [~soveran@186.19.214.247] has joined #scheme 11:09:48 -!- fsntation [~fsntation@212.174.109.55] has quit [Read error: Connection reset by peer] 11:26:07 -!- cbrannon [~cbrannon@gentoo/developer/cbrannon] has quit [Ping timeout: 240 seconds] 11:38:57 cbrannon [~cbrannon@gentoo/developer/cbrannon] has joined #scheme 11:40:14 jewel [~jewel@196-209-224-145.dynamic.isadsl.co.za] has joined #scheme 11:40:24 -!- homie` [~levgue@xdsl-87-79-194-186.netcologne.de] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)] 11:43:47 homie [~levgue@xdsl-87-79-194-186.netcologne.de] has joined #scheme 11:47:53 -!- choas [~lars@p5792C937.dip.t-dialin.net] has quit [Ping timeout: 250 seconds] 12:02:57 -!- bohanlon [~bohanlon@pool-108-20-68-105.bstnma.fios.verizon.net] has quit [Quit: So long!] 12:16:26 zmv [~Telefonic@187.34.53.81] has joined #scheme 12:27:56 MrFahrenheit [~RageOfTho@users-151-140.vinet.ba] has joined #scheme 12:30:43 -!- crypto_ is now known as z0d 12:30:52 -!- z0d [~z0d@artifact.hu] has quit [Changing host] 12:30:52 z0d [~z0d@unaffiliated/z0d] has joined #scheme 12:43:55 f8l [~f8l@77-255-9-167.adsl.inetia.pl] has joined #scheme 12:52:10 -!- wingo [~wingo@90.164.198.39] has quit [Read error: Operation timed out] 13:07:24 keenbug [~daniel@p4FE39C45.dip.t-dialin.net] has joined #scheme 13:35:27 mimi [~mimi@d54C17518.access.telenet.be] has joined #scheme 13:35:30 -!- gnomon [~gnomon@CPE0022158a8221-CM000f9f776f96.cpe.net.cable.rogers.com] has quit [Ping timeout: 276 seconds] 13:35:45 gnomon [~gnomon@CPE0022158a8221-CM000f9f776f96.cpe.net.cable.rogers.com] has joined #scheme 13:39:06 -!- mimi [~mimi@d54C17518.access.telenet.be] has quit [Client Quit] 13:42:47 -!- zmv [~Telefonic@187.34.53.81] has quit [Ping timeout: 258 seconds] 13:46:07 zmv [~Telefonic@187.34.53.81] has joined #scheme 13:46:47 blueadept [~blueadept@unaffiliated/blueadept] has joined #scheme 13:54:15 -!- genieliu [~genieliu@59.78.62.120] has quit [Quit: leaving] 13:55:47 -!- masm [~masm@bl15-129-254.dsl.telepac.pt] has quit [Quit: Leaving.] 13:56:12 masm [~masm@bl15-129-254.dsl.telepac.pt] has joined #scheme 14:01:06 mmc [~michal@p5B2F43FA.dip0.t-ipconnect.de] has joined #scheme 14:08:21 -!- littlebobby [~bob@unaffiliated/littlebobby] has quit [Quit: Ex-Chat] 14:09:07 -!- mmc [~michal@p5B2F43FA.dip0.t-ipconnect.de] has quit [Quit: Leaving.] 14:32:16 tauntaun [~user@ool-44c711b3.dyn.optonline.net] has joined #scheme 14:32:28 -!- tauntaun is now known as Guest26105 14:32:56 -!- Guest26105 is now known as tauntaun` 14:33:24 -!- tauntaun` is now known as tauntaun 14:40:21 -!- lolcow [~lolcow@196-215-83-98.dynamic.isadsl.co.za] has quit [Read error: Connection reset by peer] 14:47:59 leppie [~lolcow@196-215-83-98.dynamic.isadsl.co.za] has joined #scheme 14:49:00 fsntation [~fsntation@212.174.109.55] has joined #scheme 15:00:01 doc_who [~doc_who@pool-108-28-6-47.washdc.fios.verizon.net] has joined #scheme 15:01:46 -!- gnomon [~gnomon@CPE0022158a8221-CM000f9f776f96.cpe.net.cable.rogers.com] has quit [Ping timeout: 240 seconds] 15:02:12 tupi [~david@189.60.162.202] has joined #scheme 15:03:47 gnomon [~gnomon@CPE0022158a8221-CM000f9f776f96.cpe.net.cable.rogers.com] has joined #scheme 15:04:37 -!- keenbug [~daniel@p4FE39C45.dip.t-dialin.net] has quit [Ping timeout: 250 seconds] 15:15:25 -!- soveran [~soveran@186.19.214.247] has quit [Remote host closed the connection] 15:29:26 dnolen_ [~davidnole@184.152.69.75] has joined #scheme 15:31:38 -!- homie [~levgue@xdsl-87-79-194-186.netcologne.de] has quit [Read error: Connection reset by peer] 15:35:17 -!- emma [~em@unaffiliated/emma] has quit [Remote host closed the connection] 15:35:34 emma [~em@unaffiliated/emma] has joined #scheme 15:39:37 homie [~levgue@xdsl-87-79-194-186.netcologne.de] has joined #scheme 15:58:23 wingo [~wingo@90.164.198.39] has joined #scheme 16:13:46 -!- emma [~em@unaffiliated/emma] has quit [Ping timeout: 246 seconds] 16:20:50 emma [~em@unaffiliated/emma] has joined #scheme 16:22:40 zmv_ [~Telefonic@187.34.53.81] has joined #scheme 16:25:10 -!- zmv [~Telefonic@187.34.53.81] has quit [Ping timeout: 252 seconds] 16:27:14 ymasory_ [~ymasory@c-76-99-55-224.hsd1.pa.comcast.net] has joined #scheme 16:31:22 zmv [~Telefonic@187.34.53.81] has joined #scheme 16:33:31 soveran [~soveran@190.55.30.248] has joined #scheme 16:34:41 -!- zmv_ [~Telefonic@187.34.53.81] has quit [Ping timeout: 260 seconds] 16:38:51 join #x11 16:52:21 zmv_ [~Telefonic@187.34.53.81] has joined #scheme 16:52:59 -!- ymasory_ [~ymasory@c-76-99-55-224.hsd1.pa.comcast.net] has quit [Quit: Leaving] 16:55:13 -!- soveran [~soveran@190.55.30.248] has quit [Remote host closed the connection] 16:55:26 -!- zmv [~Telefonic@187.34.53.81] has quit [Ping timeout: 240 seconds] 16:56:34 soveran [~soveran@190.55.30.248] has joined #scheme 17:02:14 -!- soveran [~soveran@190.55.30.248] has quit [Remote host closed the connection] 17:12:31 zmv [~Telefonic@187.34.53.81] has joined #scheme 17:13:51 bgs100 [~ian@unaffiliated/bgs100] has joined #scheme 17:15:46 -!- zmv_ [~Telefonic@187.34.53.81] has quit [Ping timeout: 264 seconds] 17:17:18 -!- wingo [~wingo@90.164.198.39] has quit [Ping timeout: 255 seconds] 17:32:18 zmv_ [~Telefonic@187.34.53.81] has joined #scheme 17:36:00 -!- zmv [~Telefonic@187.34.53.81] has quit [Ping timeout: 276 seconds] 17:40:04 Unthahorsten [~Unthahors@del63-3-88-177-167-25.fbx.proxad.net] has joined #scheme 17:41:42 preflex_ [~preflex@unaffiliated/mauke/bot/preflex] has joined #scheme 17:42:30 -!- preflex [~preflex@unaffiliated/mauke/bot/preflex] has quit [Ping timeout: 255 seconds] 17:45:13 -!- zmv_ is now known as zmv 17:53:10 zmv_ [~Telefonic@187.34.53.81] has joined #scheme 17:56:13 -!- zmv [~Telefonic@187.34.53.81] has quit [Ping timeout: 250 seconds] 17:57:53 -!- Nisstyre [~nisstyre@infocalypse-net.info] has quit [Quit: Leaving] 17:59:18 -!- zmv_ is now known as zmv 18:03:49 -!- zmv [~Telefonic@187.34.53.81] has quit [Ping timeout: 252 seconds] 18:05:36 choas [~lars@p5792C937.dip.t-dialin.net] has joined #scheme 18:09:11 -!- emma [~em@unaffiliated/emma] has quit [Ping timeout: 240 seconds] 18:10:40 zmv [~Telefonic@187.34.53.81] has joined #scheme 18:15:45 zmv_ [~Telefonic@187.34.53.81] has joined #scheme 18:16:11 -!- zmv [~Telefonic@187.34.53.81] has quit [Ping timeout: 240 seconds] 18:28:15 -!- zmv_ is now known as zmv 18:28:26 -!- Daemmerung [~goetter@63.142.200.228] has quit [Quit: Smoove out.] 18:34:47 zmv_ [~Telefonic@187.34.53.81] has joined #scheme 18:38:36 -!- zmv [~Telefonic@187.34.53.81] has quit [Ping timeout: 276 seconds] 18:41:00 -!- pygospa [~TheRealPy@kiel-4dbecdaf.pool.mediaWays.net] has quit [Ping timeout: 255 seconds] 18:43:09 pygospa [~TheRealPy@kiel-5f769f2c.pool.mediaWays.net] has joined #scheme 18:43:37 -!- tauntaun [~user@ool-44c711b3.dyn.optonline.net] has quit [Remote host closed the connection] 18:46:36 tauntaun [~user@li327-197.members.linode.com] has joined #scheme 18:50:36 HG` [~HG@p5DC05714.dip.t-dialin.net] has joined #scheme 18:51:10 -!- pygospa [~TheRealPy@kiel-5f769f2c.pool.mediaWays.net] has quit [Ping timeout: 264 seconds] 18:54:31 can i get whatever's bound to to a symbol by name? 18:54:39 i mean toplevel context, not local lexical 18:57:37 What do you mean name? A string? 18:58:16 symbol 18:58:19 pygospa [~TheRealPy@kiel-5f77b1d6.pool.mediaWays.net] has joined #scheme 18:58:23 In r5rs, it's implementation dependant, whether you can get at the toplevel environment. 18:58:31 :-( 18:58:56 i don't plan on implementing r6rs 18:59:05 (eval variable (interaction-environment)) 18:59:09 yow! 18:59:13 ,(define x 42) 18:59:19 rudybot: (define x 42) 18:59:30 thank you! 18:59:42 It is an OPTIONAL procedure. 19:00:08 fortunately, it works on racket r5rs and i can make it work on my very own scheme 19:00:11 :-) 19:01:21 but compiling to JS is going to be a tragedy. :-) i'm gonna have to add prologue code for LOAD-TIME-VALUE stuff like (quote foo) 19:01:34 but when i finish it, it's going to be awesome 19:01:52 *weirdo* just rewrote Norvig's pattern matcher in Scheme 19:02:05 or should i say, 'ported' 19:04:19 -!- zmv_ is now known as zmv 19:04:23 Nisstyre [~nisstyre@infocalypse-net.info] has joined #scheme 19:04:36 You should port bcn cl to your scheme. It's a CL implementation written in scheme. Then you could use CL libraries without any work. 19:04:52 bbn cl 19:06:20 emma [~em@unaffiliated/emma] has joined #scheme 19:06:31 yow! 19:06:37 except for FFI, i suppose 19:06:41 but it's still great 19:07:05 the problem is, it runs in javascript, and the archive is 18 MB... go figure :-) 19:08:30 /n 19:10:17 ymasory_ [~ymasory@c-76-99-55-224.hsd1.pa.comcast.net] has joined #scheme 19:15:53 -!- Unthahorsten [~Unthahors@del63-3-88-177-167-25.fbx.proxad.net] has quit [Quit: goodbye] 19:16:27 -!- elly [~elly@atheme/member/elly] has quit [Remote host closed the connection] 19:22:29 elly [~elly@atheme/member/elly] has joined #scheme 19:26:21 -!- ymasory_ [~ymasory@c-76-99-55-224.hsd1.pa.comcast.net] has quit [Quit: Leaving] 19:29:12 -!- DT`` [~Feeock@net-93-149-65-184.cust.dsl.teletu.it] has quit [Excess Flood] 19:30:38 DT`` [~Feeock@net-93-149-65-184.cust.dsl.teletu.it] has joined #scheme 19:38:47 -!- zmv [~Telefonic@187.34.53.81] has quit [Ping timeout: 252 seconds] 19:40:56 zmv [~Telefonic@187.34.53.81] has joined #scheme 19:45:59 -!- dnolen_ [~davidnole@184.152.69.75] has quit [Quit: dnolen_] 19:48:03 -!- phax [~phax@unaffiliated/phax] has quit [Quit: Leaving] 19:51:46 -!- zmv [~Telefonic@187.34.53.81] has quit [Ping timeout: 264 seconds] 19:53:44 hypercube32 [~hypercube@231.125.189.72.cfl.res.rr.com] has joined #scheme 19:53:50 zmv [~Telefonic@187.34.53.81] has joined #scheme 19:57:30 -!- gnomon [~gnomon@CPE0022158a8221-CM000f9f776f96.cpe.net.cable.rogers.com] has quit [Ping timeout: 255 seconds] 19:58:41 keenbug [~daniel@p4FE39C45.dip.t-dialin.net] has joined #scheme 19:59:22 gnomon [~gnomon@CPE0022158a8221-CM000f9f776f96.cpe.net.cable.rogers.com] has joined #scheme 20:01:00 -!- pygospa [~TheRealPy@kiel-5f77b1d6.pool.mediaWays.net] has quit [Ping timeout: 260 seconds] 20:03:01 pygospa [~TheRealPy@kiel-5f7691bf.pool.mediaWays.net] has joined #scheme 20:14:45 -!- elliottcable [~ec@ec2-174-129-205-205.compute-1.amazonaws.com] has quit [Quit: rage] 20:15:53 -!- snorble [~snorble@s83-179-14-167.cust.tele2.se] has left #scheme 20:18:39 soveran [~soveran@190.55.30.248] has joined #scheme 20:19:59 elliottcable [~elliottca@ec2-174-129-205-205.compute-1.amazonaws.com] has joined #scheme 20:20:27 -!- pygospa [~TheRealPy@kiel-5f7691bf.pool.mediaWays.net] has quit [Disconnected by services] 20:20:37 pygospa [~TheRealPy@kiel-d9bfc5db.pool.mediaWays.net] has joined #scheme 20:21:07 -!- pygospa [~TheRealPy@kiel-d9bfc5db.pool.mediaWays.net] has left #scheme 20:31:51 -!- soveran [~soveran@190.55.30.248] has quit [Remote host closed the connection] 20:40:20 -!- tupi [~david@189.60.162.202] has quit [Quit: Leaving] 20:48:38 -!- HG` [~HG@p5DC05714.dip.t-dialin.net] has quit [Quit: Leaving.] 20:56:00 -!- DT`` [~Feeock@net-93-149-65-184.cust.dsl.teletu.it] has quit [Ping timeout: 255 seconds] 20:59:13 AtnNn [~welcome@modemcable020.240-177-173.mc.videotron.ca] has joined #scheme 21:01:27 mmc [~michal@gateway02.m3-connect.de] has joined #scheme 21:02:44 DT`` [~Feeock@net-93-149-65-184.cust.dsl.teletu.it] has joined #scheme 21:11:39 -!- DT`` [~Feeock@net-93-149-65-184.cust.dsl.teletu.it] has quit [Ping timeout: 250 seconds] 21:18:18 DT`` [~Feeock@net-93-149-65-184.cust.dsl.teletu.it] has joined #scheme 21:18:57 pcavs [~paul@c-65-96-169-56.hsd1.ma.comcast.net] has joined #scheme 21:19:28 Hey guys, what's the equivalent in scheme for (macro-expand '(my-quote-expression)) ? I tried a little googling to no avail 21:22:04 that would depend on which implementation you're using, e.g. in ikarus there's expand and expand/optimize 21:22:36 -!- Modius_ [~Modius@cpe-70-123-140-183.austin.res.rr.com] has quit [Quit: "Object-oriented design" is an oxymoron] 21:23:16 phax [~phax@unaffiliated/phax] has joined #scheme 21:24:26 weinholt: I'm messing around in guile, any knowledge there? 21:25:27 nvm, I seem to have gotten my google fu (groove?) back and found it it's simply (macroexpand)... I will go into that hole over there and die now 21:27:38 -!- f8l [~f8l@77-255-9-167.adsl.inetia.pl] has quit [Quit: WeeChat 0.3.5] 21:30:08 pcavs: yeah! That's the problem with scheme, we can never answer a definite answer. Try Common Lisp if you want clear and standard answers. 21:30:34 Lol. 21:30:36 -!- mmc [~michal@gateway02.m3-connect.de] has quit [Ping timeout: 252 seconds] 21:30:37 pjb: heh 21:31:56 pjb: I need to wrap my head around syntax-rules and define-syntax and all those syntax translators first. Seems like a lot of added complexity, what does it buy you above and beyond hygienic macros? And couldn't that be achieved without all these new pesky things to learn ;) 21:32:18 pcavs: well, I already answered that: Common Lisp. 21:32:27 -!- homie [~levgue@xdsl-87-79-194-186.netcologne.de] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)] 21:33:00 pjb: guess you guys don't take kindly to my kind here? 21:33:17 Well, this is #scheme, I try to help newbies, but it's hard. 21:34:01 pjb: no problem, I'll just go away now 21:34:23 Almost everything in scheme is implementation dependant... 21:34:58 pcavs : `define-syntax' is the standard mechanism for introducing new syntax (aka special forms) 21:35:45 pjb: Well that's a tad unfortunate 21:36:10 pcavs : `syntax-rules' is a simple system for specifying hygienic macros, if you want to do something more advanced, you probably want to use a more expressive system (like `syntax-case' or some others) 21:36:51 trying to copy the amb macro from teach yourself scheme in fixnum days to syntax-rules 21:36:57 ski: thanks for the insight 21:37:11 pcavs : .. also i don't see any problem in you asking about this here 21:37:20 realitygrill [~realitygr@c-24-5-7-139.hsd1.ca.comcast.net] has joined #scheme 21:37:58 yeah, you can probably do `amb' simply with `syntax-rules' 21:40:30 ski: from my viewpoint it seems like syntax-rules are kind of beginning of a backquote, if that's the case how do you unquote or unquote-splice? Are they still the same, usually ',' and ',@' respectively? 21:41:33 it's probably simplest to move most of the code in `amb' at to a separate procedure 21:41:33 http://tinyurl.com/3qdk5qs 21:41:59 with `syntax-rules', quoting and unquoting are implicit 21:42:15 (not so with `syntax-case', though) 21:44:03 looks like syntax-rules can't actually execute code at macro expansion time, so there's no concept of unquoting, it's just pattern matching, correct? 21:44:40 yes, it can't execute arbitrary Scheme code 21:44:47 (other more powerful systems can do that) 21:50:40 ski pasted "untitled" at http://paste.lisp.org/display/123489 21:52:20 ski annotated #123489 "attempt, using `syntax-rules' instead of `define-macro'" at http://paste.lisp.org/display/123489#1 21:53:06 pcavs : try that ? 21:55:46 ski: seems to work, mind talking me through it as I read through it? 21:55:47 mithridates [~mithridat@142.166.8.25] has joined #scheme 21:56:19 you can't (directly) do the `map' in `syntax-rules', since that's calling out to Scheme 21:56:32 mmhmm 21:56:38 in this case, you want to rewrite each `alt' to some expression containing that `alt', though 21:57:19 so i'm using the feature of `syntax-rules' to allow `alt ...' in the pattern `(amb alt ...)' meaning that `alt' will (in turn) be bound to each of the arguments in the application 21:57:33 so `alt' stands for a sequence of values 21:57:41 if you would write, in the template part 21:57:42 ski: okay, makes sense 21:57:49 (foo alt) ... 21:58:07 then that would be replaced by a list of each `alt' replaced by `(foo alt)' 21:58:43 the same happens in the paste, except with a larger expression than `(foo alt)' 21:59:08 also, i removed the quotes and unquotes, of course 21:59:27 ski: yes, but what are those ellipsis doing? 21:59:49 if you define a macro `foo' with a pattern `(foo x ...)' 22:00:10 and you apply it to `(foo 0 1 2 3)', then `x' will match each of `0',`1',`2',`3' (in turn) 22:00:59 if you define that macro to expand into the template `(bar (+ x x) ...)' for that pattern, then that means that `(foo 0 1 2 3)' will expand into 22:01:12 (bar (+ 0 0) (+ 1 1) (+ 2 2) (+ 3 3)) 22:01:50 so, simplifying, the `...' is a way to achieve the equivalent of the `map' in the `define-macro' code 22:01:56 Modius [~Modius@cpe-70-123-140-183.austin.res.rr.com] has joined #scheme 22:02:09 ahhh, interesting 22:02:15 another example of the ellipsis `...' : 22:02:22 (define-syntax let 22:02:33 (syntax-rules () 22:03:29 ((let ((?variable ?expression) 22:03:46 ...) 22:04:03 ((lambda (?variable ...) 22:05:03 i appear to have botched this up. i'll paste it anyway, since it appears to be more lines that i initially thought 22:06:12 -!- AtnNn [~welcome@modemcable020.240-177-173.mc.videotron.ca] has quit [Ping timeout: 255 seconds] 22:07:07 ski pasted "`let', using ellipsis `...' in `syntax-rules'" at http://paste.lisp.org/display/123490 22:07:49 that's more or less what i meant to say 22:08:47 ski: interesting, do the question marks signify anything? 22:09:23 ski: also, I imagine the ellipsis are a super useful tool, but what if you only wanted to filter those x's first, and say only apply to the odd indexed x's? 22:09:24 if you call `(let ((a 0) (b 1)) (+ a b))', then `?variable' will successively be bound to the forms `a',`b', and `?expression' will successively be bound to the forms `0',`1' 22:09:52 so that `?variable ...' will expand to `a b' and `?expression ...' will expand to `0 1', in the template 22:10:34 oh, dudoy! that was the pattern matching part in the beginning, whooshed that, heh 22:11:09 the `?' is just a convention to more easily see which identifiers in the macro will be bound to forms, and which just are ordinary identifiers, that will appear as-is in the result (modulo a renaming, for hygiene) 22:11:50 anyway, you can't apply only to the odd indexed forms with `...' 22:11:58 ski: okay, interesting 22:12:13 ski: what's a way of going about doing that? 22:12:18 `...' is a very simple tool, nice to use when it applies, but doesn't apply in more general cases 22:12:57 one possibility is writing a recursive macro, traversing a list element for element (or two elements at a time, in your case) 22:13:38 ski: one final question about that syntax-rules let transformer, why does the lambda have an extra set of parentheses around it? 22:13:59 I use "extra" from my understanding of it =p 22:14:02 in simple cases, that's fine. in more general cases, you want to call other macros to expand to forms which should be put inside your result form -- that leads to CPS-macros which are hairy 22:14:16 it's probably better to switch to a more powerful macro system at that point 22:14:24 ski: interesting 22:14:50 (let ((?v ?e) ...) ?body ...) 22:14:58 expands here to 22:15:18 ((lambda (?v ...) ?body ...) ?e ...) 22:15:30 so, it expands to an *application* of a `lambda' 22:15:38 e.g. 22:15:40 (let ((a 0) (b 1)) (+ a b)) 22:15:42 will expand to 22:15:54 ((lambda (a b) (+ a b)) 0 1) 22:16:22 that will call the procedure that the `lambda' form evaluates to with the arguments `0',`1' 22:16:51 thus binding the formal parameter `a' to `0' and `b' to `1', before evaluating `(+ a b)' 22:17:23 oh dudoy 22:17:26 thanks ski! 22:17:31 -!- DT`` [~Feeock@net-93-149-65-184.cust.dsl.teletu.it] has quit [Ping timeout: 250 seconds] 22:19:12 chemuduguntar [~ravic@smtp.touchcut.com] has joined #scheme 22:19:30 it's also possible to nest `...' like `(a (b ...)) ...', which will bind `a' to each form in a sequence of forms, and bind `b' to each form in a *sequence* of sequences of forms 22:19:32 DT`` [~Feeock@net-93-149-65-184.cust.dsl.teletu.it] has joined #scheme 22:19:58 in that case, you have to use `a' "inside" (at least) one `...' in the template, and `b' "inside" (at least) two `...'s 22:20:22 cool, so destructuring basically? 22:21:09 zmv_ [~Telefonic@187.34.53.81] has joined #scheme 22:21:12 yeah, it's destructuring matching, coupled with the possibility to let a variable stand for each value in a sequence (or a sequence of sequences, &c.) of values 22:21:41 one could probably add the same feature to ordinary (non-macro) pattern-matching constructions 22:23:09 ski: cool, I think I'm going to try to write some of this up in a blog post to make things a little more cohesive in my brain =D 22:23:19 ski: thanks for all the help 22:23:56 -!- zmv [~Telefonic@187.34.53.81] has quit [Disconnected by services] 22:23:58 -!- zmv_ is now known as zmv 22:23:58 yw 22:33:21 -!- Modius [~Modius@cpe-70-123-140-183.austin.res.rr.com] has quit [Quit: "Object-oriented design" is an oxymoron] 22:35:51 -!- stis [~stis@1-1-1-39a.veo.vs.bostream.se] has left #scheme 22:40:01 zmv_ [~Telefonic@187.34.53.81] has joined #scheme 22:44:18 -!- zmv [~Telefonic@187.34.53.81] has quit [Ping timeout: 276 seconds] 22:44:24 -!- zmv_ is now known as zmv 22:53:51 -!- choas [~lars@p5792C937.dip.t-dialin.net] has quit [Ping timeout: 276 seconds] 22:54:04 Modius [~Modius@cpe-70-123-140-183.austin.res.rr.com] has joined #scheme 23:02:03 zmv_ [~Telefonic@187.34.53.81] has joined #scheme 23:02:31 -!- mithridates [~mithridat@142.166.8.25] has left #scheme 23:04:27 -!- realitygrill [~realitygr@c-24-5-7-139.hsd1.ca.comcast.net] has quit [Quit: realitygrill] 23:05:29 -!- zmv [~Telefonic@187.34.53.81] has quit [Ping timeout: 240 seconds] 23:05:32 -!- zmv_ is now known as zmv 23:05:34 -!- keenbug [~daniel@p4FE39C45.dip.t-dialin.net] has quit [Ping timeout: 264 seconds] 23:17:35 -!- MrFahrenheit [~RageOfTho@users-151-140.vinet.ba] has quit [Read error: Connection reset by peer] 23:18:56 MrFahrenheit [~RageOfTho@users-151-140.vinet.ba] has joined #scheme 23:19:49 -!- MrFahrenheit [~RageOfTho@users-151-140.vinet.ba] has quit [Read error: Connection reset by peer] 23:20:26 MrFahrenheit [~RageOfTho@users-151-140.vinet.ba] has joined #scheme 23:20:53 -!- MrFahrenheit [~RageOfTho@users-151-140.vinet.ba] has quit [Read error: Connection reset by peer] 23:21:13 zmv_ [~Telefonic@187.34.53.81] has joined #scheme 23:22:10 -!- zmv [~Telefonic@187.34.53.81] has quit [Disconnected by services] 23:22:32 MrFahrenheit [~RageOfTho@users-151-140.vinet.ba] has joined #scheme 23:22:46 -!- zmv_ is now known as zmv 23:28:29 dnolen_ [~davidnole@184.152.69.75] has joined #scheme 23:29:48 -!- masm [~masm@bl15-129-254.dsl.telepac.pt] has quit [Ping timeout: 276 seconds] 23:30:17 -!- MrFahrenheit [~RageOfTho@users-151-140.vinet.ba] has quit [Ping timeout: 240 seconds] 23:37:18 MrFahrenheit [~RageOfTho@users-151-140.vinet.ba] has joined #scheme 23:40:18 RageOfThou [~RageOfTho@users-151-140.vinet.ba] has joined #scheme 23:42:39 -!- MrFahrenheit [~RageOfTho@users-151-140.vinet.ba] has quit [Ping timeout: 258 seconds] 23:43:02 FunkyDrummer [~RageOfTho@users-151-140.vinet.ba] has joined #scheme 23:43:42 -!- zmv [~Telefonic@187.34.53.81] has quit [Ping timeout: 252 seconds] 23:45:17 zmv [~Telefonic@187.34.53.81] has joined #scheme 23:45:52 -!- RageOfThou [~RageOfTho@users-151-140.vinet.ba] has quit [Ping timeout: 263 seconds] 23:56:44 MrFahrenheit [~RageOfTho@users-151-140.vinet.ba] has joined #scheme 23:59:04 -!- FunkyDrummer [~RageOfTho@users-151-140.vinet.ba] has quit [Ping timeout: 240 seconds]