00:02:56 -!- MrFahrenheit [~RageOfTho@users-33-246.vinet.ba] has quit [Ping timeout: 255 seconds] 00:02:58 -!- pumpkin [~pumpkin@164-131.187-72.tampabay.res.rr.com] has quit [Quit: Computer has gone to sleep.] 00:05:11 -!- jonrafkind [~jon@crystalis.cs.utah.edu] has quit [Ping timeout: 255 seconds] 00:07:53 pumpkin [~pumpkin@164-131.187-72.tampabay.res.rr.com] has joined #scheme 00:11:13 Jafet [~Jafet@unaffiliated/jafet] has joined #scheme 00:38:22 abstractj [~shadow_wa@187.56.174.29] has joined #scheme 00:57:42 -!- Caleb-- [~caleb@bzq-79-182-5-16.red.bezeqint.net] has quit [Ping timeout: 265 seconds] 00:59:38 -!- kilimanjaro [~kilimanja@unaffiliated/kilimanjaro] has quit [Ping timeout: 265 seconds] 01:12:28 -!- Riastradh [debian-tor@fsf/member/riastradh] has quit [Remote host closed the connection] 01:18:02 -!- seangrove [~user@70-36-236-168.dsl.static.sonic.net] has quit [Ping timeout: 264 seconds] 01:27:58 is #\nul a non-portable way to express (integer->char 0)? 01:28:18 incubot: (list->string (list #\1 #\nul)) 01:28:18 1 01:29:36 incubot: (char=? (integer->char 0) #\nul) 01:29:36 #t 01:33:43 klutometis: R6RS mandates #\nul to be U+0000. 01:33:48 klutometis: R5RS does not have #\nul. 01:33:56 So, you decide what #\nul means in your case. :-) 01:34:04 -!- abstractj [~shadow_wa@187.56.174.29] has quit [Remote host closed the connection] 01:34:34 cky: heh; thanks. 01:37:59 :-) 01:39:16 -!- dnm [~dnm@static-71-166-174-24.washdc.east.verizon.net] has quit [Ping timeout: 265 seconds] 01:39:44 -!- samth is now known as samth_awa 01:39:46 -!- samth_awa is now known as samth_away 01:42:06 -!- emma [~em@unaffiliated/emma] has quit [Ping timeout: 272 seconds] 01:42:30 saccade [~saccade@209-6-54-113.c3-0.smr-ubr1.sbo-smr.ma.cable.rcn.com] has joined #scheme 01:46:11 Riastradh [debian-tor@fsf/member/riastradh] has joined #scheme 01:57:58 kephas [~pierre@AStrasbourg-551-1-8-225.w92-141.abo.wanadoo.fr] has joined #scheme 01:58:35 -!- nowhereman [~pierre@AStrasbourg-551-1-26-60.w83-196.abo.wanadoo.fr] has quit [Ping timeout: 255 seconds] 02:08:55 -!- klovett [~klovett@c-67-180-97-38.hsd1.ca.comcast.net] has quit [Quit: klovett] 02:10:16 -!- _danb_ [~user@124-149-32-186.dyn.iinet.net.au] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)] 02:21:52 imran_sr [~imran@75-18-254-4.lightspeed.uncyca.sbcglobal.net] has joined #scheme 02:34:51 -!- REPLeffect [~REPLeffec@69.54.115.254] has quit [Ping timeout: 265 seconds] 02:36:48 -!- KyleMcMozart [~kyle@bas2-kitchener06-1096668326.dsl.bell.ca] has quit [Read error: Connection reset by peer] 02:38:00 -!- githogori [~githogori@116.sub-75-208-232.myvzw.com] has quit [Remote host closed the connection] 02:38:43 klovett [~klovett@c-67-180-97-38.hsd1.ca.comcast.net] has joined #scheme 02:47:11 -!- RageOfThou [~RageOfTho@users-55-237.vinet.ba] has quit [Ping timeout: 255 seconds] 02:47:45 emma [~em@unaffiliated/emma] has joined #scheme 02:59:20 -!- dfkjjkfd [~paulh@236-9-ftth.onsnetstudenten.nl] has quit [Quit: Lost terminal] 03:02:56 -!- emma [~em@unaffiliated/emma] has quit [Ping timeout: 240 seconds] 03:06:33 -!- bgs100 [~ian@unaffiliated/bgs100] has quit [Quit: nighty night] 03:07:16 -!- _pw_ [~user@123.112.77.61] has left #scheme 03:08:18 -!- tupi [~david@186.205.37.15] has quit [Quit: Leaving] 03:14:58 -!- felipe [~felipe@my.nada.kth.se] has quit [Quit: felipe] 03:41:31 -!- imran_sr [~imran@75-18-254-4.lightspeed.uncyca.sbcglobal.net] has quit [Quit: Leaving] 03:56:03 -!- timj [~timj@e176192195.adsl.alicedsl.de] has quit [Ping timeout: 265 seconds] 03:58:28 -!- klovett [~klovett@c-67-180-97-38.hsd1.ca.comcast.net] has quit [Quit: klovett] 04:04:35 -!- drdo [~user@2.208.54.77.rev.vodafone.pt] has quit [Ping timeout: 255 seconds] 04:09:52 timj [~timj@e176194086.adsl.alicedsl.de] has joined #scheme 04:13:17 -!- pjb [~t@81.202.16.46.dyn.user.ono.com] has quit [Ping timeout: 276 seconds] 04:20:09 kilimanjaro [~kilimanja@unaffiliated/kilimanjaro] has joined #scheme 04:38:12 -!- MichaelRaskin [~MichaelRa@195.91.224.225] has quit [Remote host closed the connection] 04:50:45 dnm [~dnm@c-68-34-57-169.hsd1.va.comcast.net] has joined #scheme 04:52:35 -!- Adamant [~Adamant@unaffiliated/adamant] has quit [Ping timeout: 255 seconds] 04:54:10 pjb [~t@81.202.16.46.dyn.user.ono.com] has joined #scheme 04:54:42 Adamant [~Adamant@unaffiliated/adamant] has joined #scheme 04:54:55 drdo [~user@2.208.54.77.rev.vodafone.pt] has joined #scheme 05:05:56 jedc [~jed@c-71-59-157-130.hsd1.or.comcast.net] has joined #scheme 05:06:43 Hi, is there a union procedure for lists in r6rs + srfi's? 05:08:06 -!- pumpkin [~pumpkin@164-131.187-72.tampabay.res.rr.com] has quit [Quit: Computer has gone to sleep.] 05:08:11 SRFI 1 defines a procedure called LSET-UNION. Is that what you want? 05:08:43 *offby1* welcomes back incubot 05:08:47 incubot: long time no see, dude. 05:08:52 it's PLT v4, dude! Get with it! 05:08:57 rudybot: long time no see, dude. 05:08:58 *offby1: basically, if some dude wants to write some boring ass software to solve some problem for other people, and then he wants to get rich for solving their problem 05:09:02 :) 05:09:51 hmm, I don't think so. (lset-union '(1 2 3) '(2 3 4)) => (2 3 4) not (1 2 3 4) :( 05:10:07 That should be an error. 05:10:19 Rather, that use is an error; it should be reported as such. 05:10:39 rudybot: (lset-union '(1 2 3) '(2 3 4)) 05:10:39 *offby1: error: lset-union: expected procedure, given (1 2 3) 05:10:45 hmph 05:11:14 ah yea, i guess i had imported a different lset-union hehe 05:11:36 rudybot: (lset-union eqv? '(1 2 3) '(2 3 4)) 05:11:37 Riastradh: your sandbox is ready 05:11:37 Riastradh: error: reference to undefined identifier: lset-union 05:11:46 rudybot: (require srfi/1) 05:11:47 Riastradh: Done. 05:11:51 rudybot: (lset-union eqv? '(1 2 3) '(2 3 4)) 05:11:51 Riastradh: ; Value: (4 1 2 3) 05:12:14 ah 05:12:29 that little = is easy to overlook 05:12:33 thanks 05:16:49 -!- pjb [~t@81.202.16.46.dyn.user.ono.com] has quit [Remote host closed the connection] 05:29:02 -!- jedc [~jed@c-71-59-157-130.hsd1.or.comcast.net] has quit [Ping timeout: 255 seconds] 05:29:25 pjb [~t@81.202.16.46.dyn.user.ono.com] has joined #scheme 05:30:17 jonrafkind [~jon@jonr5.dsl.xmission.com] has joined #scheme 05:30:38 githogori [~githogori@adsl-66-123-22-146.dsl.snfc21.pacbell.net] has joined #scheme 05:35:08 -!- Adamant [~Adamant@unaffiliated/adamant] has quit [Ping timeout: 245 seconds] 05:36:48 chemuduguntar [~user@smtp.touchcut.com] has joined #scheme 05:39:49 -!- pjb [~t@81.202.16.46.dyn.user.ono.com] has quit [Read error: Connection reset by peer] 05:44:48 Adamant [~Adamant@unaffiliated/adamant] has joined #scheme 05:50:03 pumpkin [~pumpkin@user-142hbak.cable.mindspring.com] has joined #scheme 05:56:05 pjb [~t@81.202.16.46.dyn.user.ono.com] has joined #scheme 06:03:35 Modius_ [~Modius@cpe-70-123-158-125.austin.res.rr.com] has joined #scheme 06:03:56 -!- Modius_ [~Modius@cpe-70-123-158-125.austin.res.rr.com] has quit [Read error: Connection reset by peer] 06:04:24 Modius_ [~Modius@cpe-70-123-158-125.austin.res.rr.com] has joined #scheme 06:06:19 -!- Modius [~Modius@cpe-70-123-158-125.austin.res.rr.com] has quit [Ping timeout: 240 seconds] 06:15:19 -!- adu [~ajr@pool-173-66-11-168.washdc.fios.verizon.net] has quit [Quit: adu] 06:19:00 Fare [~Fare@64.119.159.126] has joined #scheme 06:31:36 -!- pjb [~t@81.202.16.46.dyn.user.ono.com] has quit [Remote host closed the connection] 06:32:48 pjb [~t@81.202.16.46.dyn.user.ono.com] has joined #scheme 07:06:56 seangrove [~user@70-0-239-212.pools.spcsdns.net] has joined #scheme 07:18:34 ski_ [~slj@c-2911e055.1149-1-64736c10.cust.bredbandsbolaget.se] has joined #scheme 07:21:41 -!- ski [~slj@85.224.17.41] has quit [Ping timeout: 255 seconds] 07:21:50 wbooze` [~user@xdsl-195-14-198-103.netcologne.de] has joined #scheme 07:21:50 homie` [~user@xdsl-195-14-198-103.netcologne.de] has joined #scheme 07:23:56 -!- homie [~user@xdsl-195-14-196-25.netcologne.de] has quit [Ping timeout: 255 seconds] 07:24:44 -!- wbooze [~user@xdsl-195-14-196-25.netcologne.de] has quit [Ping timeout: 272 seconds] 07:31:05 -!- ski_ is now known as ski 07:43:30 -!- cataska [~cataska@210.64.6.233] has quit [Ping timeout: 260 seconds] 07:44:06 cataska [~cataska@210.64.6.233] has joined #scheme 07:49:20 -!- seangrove [~user@70-0-239-212.pools.spcsdns.net] has quit [Ping timeout: 260 seconds] 07:50:06 -!- Intensity [sNRHvYTz1x@unaffiliated/intensity] has quit [Quit: Intensity] 07:52:35 -!- jonrafkind [~jon@jonr5.dsl.xmission.com] has quit [Ping timeout: 255 seconds] 07:54:26 Intensity [xGaRhIBWkw@unaffiliated/intensity] has joined #scheme 08:01:33 aidalgol [~user@114-134-7-235.rurallink.co.nz] has joined #scheme 08:02:10 -!- Jafet [~Jafet@unaffiliated/jafet] has quit [Ping timeout: 245 seconds] 08:03:55 seangrove [~user@c-71-198-44-87.hsd1.ca.comcast.net] has joined #scheme 08:04:39 -!- pumpkin [~pumpkin@user-142hbak.cable.mindspring.com] has quit [Quit: Computer has gone to sleep.] 08:06:30 Jafet [~Jafet@unaffiliated/jafet] has joined #scheme 08:13:11 mmc1 [~michal@cs27120227.pp.htv.fi] has joined #scheme 08:13:18 -!- mmc [~michal@cs27120227.pp.htv.fi] has quit [Quit: Leaving.] 08:33:11 -!- pchrist_ [~spirit@gentoo/developer/pchrist] has quit [Quit: leaving] 08:33:49 pchrist [~spirit@gentoo/developer/pchrist] has joined #scheme 08:37:22 gravicappa [~gravicapp@ppp85-140-119-108.pppoe.mtu-net.ru] has joined #scheme 08:39:32 -!- drdo [~user@2.208.54.77.rev.vodafone.pt] has quit [Ping timeout: 255 seconds] 08:41:04 MichaelRaskin [~MichaelRa@195.178.216.22] has joined #scheme 08:42:03 pavelludiq [~quassel@87.246.57.22] has joined #scheme 08:50:18 -!- homie` [~user@xdsl-195-14-198-103.netcologne.de] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)] 08:50:25 -!- wbooze` [~user@xdsl-195-14-198-103.netcologne.de] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)] 08:55:17 homie [~user@xdsl-195-14-198-103.netcologne.de] has joined #scheme 08:55:30 wbooze [~user@xdsl-195-14-198-103.netcologne.de] has joined #scheme 09:09:21 emma [~em@unaffiliated/emma] has joined #scheme 09:11:00 wbooze` [~user@xdsl-195-14-198-103.netcologne.de] has joined #scheme 09:14:02 -!- kilimanjaro [~kilimanja@unaffiliated/kilimanjaro] has left #scheme 09:14:26 -!- wbooze [~user@xdsl-195-14-198-103.netcologne.de] has quit [Ping timeout: 264 seconds] 09:14:59 -!- wbooze` [~user@xdsl-195-14-198-103.netcologne.de] has quit [Client Quit] 09:17:30 wbooze [~user@xdsl-195-14-198-103.netcologne.de] has joined #scheme 09:18:08 -!- aidalgol [~user@114-134-7-235.rurallink.co.nz] has quit [Ping timeout: 276 seconds] 09:31:11 _danb_ [~user@124-149-32-186.dyn.iinet.net.au] has joined #scheme 09:48:42 alaricsp [~alaric@geniedb.hotdesktop.biz] has joined #scheme 09:48:46 ravic [~ravi@118-93-189-209.dsl.dyn.ihug.co.nz] has joined #scheme 09:50:17 -!- ASau` is now known as ASau 10:05:46 MrFahrenheit [~RageOfTho@users-55-123.vinet.ba] has joined #scheme 10:13:35 -!- pavelludiq [~quassel@87.246.57.22] has quit [Remote host closed the connection] 10:16:23 -!- jao [~user@83.32.170.229] has quit [Ping timeout: 245 seconds] 10:28:10 abstractj [~shadow_wa@187.56.174.29] has joined #scheme 10:31:21 -!- martinhex [~mjc@93-97-29-243.zone5.bethere.co.uk] has quit [Remote host closed the connection] 10:33:08 -!- abstractj [~shadow_wa@187.56.174.29] has quit [Remote host closed the connection] 10:43:40 fradgers- [~fradgers-@5e064cc1.bb.sky.com] has joined #scheme 11:00:10 -!- MrFahrenheit [~RageOfTho@users-55-123.vinet.ba] has quit [Ping timeout: 240 seconds] 11:07:52 tupi [~david@186.205.37.15] has joined #scheme 11:20:08 jao [~user@74.Red-80-24-4.staticIP.rima-tde.net] has joined #scheme 11:30:02 -!- mmc1 [~michal@cs27120227.pp.htv.fi] has quit [Quit: Leaving.] 11:34:22 -!- saccade [~saccade@209-6-54-113.c3-0.smr-ubr1.sbo-smr.ma.cable.rcn.com] has quit [Quit: This computer has gone to sleep] 11:36:29 -!- timj [~timj@e176194086.adsl.alicedsl.de] has quit [Quit: Ex-Chat] 11:45:01 timj [~timj@e176194086.adsl.alicedsl.de] has joined #scheme 11:54:10 dnm_ [~dnm@c-68-34-57-169.hsd1.va.comcast.net] has joined #scheme 11:55:17 abstractj [~shadow_wa@187.82.77.236] has joined #scheme 11:57:17 -!- dnm [~dnm@c-68-34-57-169.hsd1.va.comcast.net] has quit [Ping timeout: 250 seconds] 12:15:53 -!- _danb_ [~user@124-149-32-186.dyn.iinet.net.au] has quit [Quit: ERC Version 5.3 (IRC client for Emacs)] 12:16:50 dfkjjkfd [~paulh@238-9-ftth.onsnetstudenten.nl] has joined #scheme 12:36:36 -!- pygospa [~pygospa@217.191.161.87] has quit [Disconnected by services] 12:36:46 TheRealPygo [~pygospa@217.191.212.154] has joined #scheme 12:51:20 -!- mornfall [~mornfall@kde/developer/mornfall] has quit [Ping timeout: 276 seconds] 12:56:16 nataraj [~nataraj@122.165.223.135] has joined #scheme 12:56:59 -!- nataraj [~nataraj@122.165.223.135] has quit [Quit: Leaving] 12:57:26 MrFahrenheit [~RageOfTho@users-55-99.vinet.ba] has joined #scheme 12:58:46 bgs100 [~ian@unaffiliated/bgs100] has joined #scheme 13:01:08 zbeasnyy [~mornfall@ip-89-102-10-137.net.upcbroadband.cz] has joined #scheme 13:07:27 tupi__ [~david@139.82.89.24] has joined #scheme 13:15:02 -!- ve [~a@vortis.xen.tardis.ed.ac.uk] has quit [Ping timeout: 264 seconds] 13:18:39 -!- danking [~danking@zerowing.ccs.neu.edu] has quit [Ping timeout: 265 seconds] 13:18:39 -!- roderic [~roderic@zerowing.ccs.neu.edu] has quit [Ping timeout: 265 seconds] 13:18:44 roderic [~roderic@zerowing.ccs.neu.edu] has joined #scheme 13:18:44 danking [~danking@zerowing.ccs.neu.edu] has joined #scheme 13:19:17 -!- stamourv [~user@kauai.ccs.neu.edu] has quit [Read error: Connection reset by peer] 13:19:29 stamourv [~user@kauai.ccs.neu.edu] has joined #scheme 13:23:25 HG` [~HG@xdsl-92-252-91-28.dip.osnanet.de] has joined #scheme 13:28:31 -!- zbeasnyy [~mornfall@ip-89-102-10-137.net.upcbroadband.cz] has quit [Ping timeout: 265 seconds] 13:29:20 mornfall [~mornfall@anna.fi.muni.cz] has joined #scheme 13:29:23 -!- mornfall [~mornfall@anna.fi.muni.cz] has quit [Changing host] 13:29:23 mornfall [~mornfall@kde/developer/mornfall] has joined #scheme 13:35:40 felipe [~felipe@my.nada.kth.se] has joined #scheme 13:36:50 -!- MrFahrenheit [~RageOfTho@users-55-99.vinet.ba] has quit [Ping timeout: 240 seconds] 13:42:34 ve [~a@vortis.xen.tardis.ed.ac.uk] has joined #scheme 13:49:43 femtoo [~femto@95-89-197-196-dynip.superkabel.de] has joined #scheme 13:55:13 zbeasnyy [~mornfall@wireless-133.fi.muni.cz] has joined #scheme 13:55:47 -!- zbeasnyy [~mornfall@wireless-133.fi.muni.cz] has quit [Client Quit] 13:58:37 vu3rdd [~vu3rdd@122.167.93.211] has joined #scheme 14:05:25 hypercube32 [~hypercube@158.102.207.68.cfl.res.rr.com] has joined #scheme 14:12:12 -!- samth_away [~samth@punge.ccs.neu.edu] has quit [Remote host closed the connection] 14:12:29 samth [~samth@punge.ccs.neu.edu] has joined #scheme 14:16:23 -!- abstractj [~shadow_wa@187.82.77.236] has quit [Ping timeout: 245 seconds] 14:20:41 -!- leppie [~lolcow@196-215-20-67.dynamic.isadsl.co.za] has quit [Read error: Connection reset by peer] 14:22:24 leppie [~lolcow@196-215-20-67.dynamic.isadsl.co.za] has joined #scheme 14:24:26 chiyam [~chiyam@122.167.3.148] has joined #scheme 14:26:29 -!- gravicappa [~gravicapp@ppp85-140-119-108.pppoe.mtu-net.ru] has quit [Ping timeout: 255 seconds] 14:27:47 kuribas [~user@d54C2ADD9.access.telenet.be] has joined #scheme 14:29:51 [19:54] *** now talking in ##c++ 14:29:51 [19:54] *** topic is ##c++-basic if you have a beginner question. Visit http://www.parashift.com/c++-faq-lite/ || Getting Started? http://www.mindview.net/Books/TICPP/ThinkingInCPP2e.html || Pastes to http://codepad.org/ || Be patient, courteous, and precise...this is C++, we all have our segfaults. We don't do homework. | ##c++-help for general help 14:29:51 [19:54] *** set by orbitz!~orbitz@c-68-34-120-105.hsd1.md.comcast.net on Fri Sep 03 20:44:42 2010 14:29:51 [19:54] *** channel ##c++ mode is +Pcntlf 777 #overflow 14:29:51 [19:54] *** channel created at Sat Sep 15 08:45:35 2001 14:29:52 [19:54] ##c++ http://www.jonatkins.org/fncpp/ 14:29:52 [19:55] hi all, is there any simple scheme implementation in c++ 14:29:53 [19:55] ##c++ Cannot send to channel 14:29:53 [19:56] *** mahamoti quit (Ping timeout: 260 seconds) 14:30:21 [19:54] *** now talking in ##c++ 14:30:21 [19:54] *** topic is ##c++-basic if you have a beginner question. Visit http://www.parashift.com/c++-faq-lite/ || Getting Started? http://www.mindview.net/Books/TICPP/ThinkingInCPP2e.html || Pastes to http://codepad.org/ || Be patient, courteous, and precise...this is C++, we all have our segfaults. We don't do homework. | ##c++-help for general help 14:30:21 [19:54] *** set by orbitz!~orbitz@c-68-34-120-105.hsd1.md.comcast.net on Fri Sep 03 20:44:42 2010 14:30:21 [19:54] *** channel ##c++ mode is +Pcntlf 777 #overflow 14:30:21 [19:54] *** channel created at Sat Sep 15 08:45:35 2001 14:30:22 [19:54] ##c++ http://www.jonatkins.org/fncpp/ 14:30:22 [19:55] hi all, is there any simple scheme implementation in c++ 14:30:23 [19:55] ##c++ Cannot send to channel 14:30:23 [19:56] *** mahamoti quit (Ping timeout: 260 seconds) 14:30:39 [19:54] *** now talking in ##c++ 14:30:39 [19:54] *** topic is ##c++-basic if you have a beginner question. Visit http://www.parashift.com/c++-faq-lite/ || Getting Started? http://www.mindview.net/Books/TICPP/ThinkingInCPP2e.html || Pastes to http://codepad.org/ || Be patient, courteous, and precise...this is C++, we all have our segfaults. We don't do homework. | ##c++-help for general help 14:30:39 [19:54] *** set by orbitz!~orbitz@c-68-34-120-105.hsd1.md.comcast.net on Fri Sep 03 20:44:42 2010 14:30:39 [19:54] *** channel ##c++ mode is +Pcntlf 777 #overflow 14:30:39 [19:54] *** channel created at Sat Sep 15 08:45:35 2001 14:30:39 [19:54] ##c++ http://www.jonatkins.org/fncpp/ 14:30:40 [19:55] hi all, is there any simple scheme implementation in c++ 14:30:40 [19:55] ##c++ Cannot send to channel 14:30:41 [19:56] *** mahamoti quit (Ping timeout: 260 seconds) 14:30:41 chiyam: stop pasting please. 14:30:44 -!- chiyam [~chiyam@122.167.3.148] has left #scheme 14:31:44 -!- bgs100 [~ian@unaffiliated/bgs100] has quit [Quit: leaving] 14:32:46 Wow. That was some definite text vomit right there. 14:33:13 Made up for the nine hours of silence. 14:33:19 LOL @ "we all have our segfaults" 14:33:32 Makes me glad to work in Scheme 14:33:34 Yeah, quite. 14:42:47 _chiyam [~chiyam@122.167.3.148] has joined #scheme 14:42:54 <_chiyam> hi 14:43:14 <_chiyam> is there any scheme implementation in c++? 14:46:37 c not good enough? 14:47:59 also note that in some channels you cannot speak if not identified 14:49:32 *cky* wants to write a C++ Scheme implementation "just for the lolz". 14:57:54 MrFahrenheit [~RageOfTho@users-55-111.vinet.ba] has joined #scheme 15:09:50 drdo [~user@194.210.228.22] has joined #scheme 15:19:42 cky: ew 15:20:58 EbiDK [~ebi@3e6b7ac3.rev.stofanet.dk] has joined #scheme 15:21:13 -!- dnm_ [~dnm@c-68-34-57-169.hsd1.va.comcast.net] has quit [] 15:22:42 elly: Hehehehe. 15:23:42 firecrow8 [~fcrow@69.38.169.34] has joined #scheme 15:26:34 Zahl [~kenneth@lnx101.hrz.tu-darmstadt.de] has joined #scheme 15:28:32 i think many schemes are implemented in the intersection of C and C++ 15:28:55 hi there. i'm learning scheme right now but im little bit stuck. i got a list (define lst (list 1 2 3)) and i want to append values to it. but if i use it by (append lst (list 4)) it does append a value but after that i do (append lst (list 5)) the old value gets overridden. whats wrong with my technique? 15:29:22 Zahl: append does not mutate the original list. 15:30:03 Zahl: Also, appending to a list piecemeal is inadvisable. Each such operation is O(n). Consider prepending (using cons) and reversing afterwards. 15:30:23 what can i do instead? i also tried make-lst. in other languages i simply append things to an array and it gets bigger 15:30:55 hm i dont get what reversing afterwards mean. does it has something to do with recursion? 15:30:59 Zahl: Don't try to program imperatively 15:32:08 When you call append, the result is the new list. The original lists are not modified 15:32:15 rudybot: (define lst (list 1 2 3)) 15:32:15 *offby1: Done. 15:32:24 rudybot: (append lst (list 4 5)) 15:32:25 *offby1: ; Value: (1 2 3 4 5) 15:32:26 -!- EbiDK [~ebi@3e6b7ac3.rev.stofanet.dk] has quit [Ping timeout: 264 seconds] 15:32:27 rudybot: lst 15:32:28 *offby1: ; Value: (1 2 3) 15:32:32 rudybot: (set! lst (append lst (list 4 5))) 15:32:33 *offby1: Done. 15:32:34 rudybot: lst 15:32:34 *offby1: ; Value: (1 2 3 4 5) 15:32:37 You can use the return value in another call, and if it's the last thing you do in a procedure, that will be its return value 15:32:38 Zahl: see? 15:32:51 Don't use set!! 15:33:11 what's wrong with set? 15:33:24 ment: "don't use set!" is putting it rather strongly. 15:33:25 mm? so i take the return value of (append call and use it as my new list? 15:33:38 Zahl: yes. 15:33:52 set! is central to "non-functional" code. 15:34:05 functional code is usually (but not always) clearer than non-functional. 15:34:29 Once you learn how to do what you want without "set!" and friends, I recommend that you try to avoid them. 15:34:35 ment: Using set! is okay when you know what you're doing. You should avoid it while still learning Scheme 15:34:44 Zahl_ [~kenneth@lnx101.hrz.tu-darmstadt.de] has joined #scheme 15:34:53 damn. got disconnected. sorry 15:34:56 But if you're already familiar with some other programming language, "set!" et all will probably seem more natural than functional programming. 15:35:20 sjamaan: OK, smarty, what would you recommend zahl do instead? 15:35:29 offby1: He's learning a new programming language. Learning to think in new ways is part of that. Otherwise you're just programming C with parens 15:35:50 offby1: I don't know what he's trying to do so I can't answer that question 15:35:54 uh huh 15:36:10 I don't know what he's trying to do, and yet somehow I managed to answer his question quite simply :) 15:36:11 If he's on the REPL he can just redefine 15:36:31 *sjamaan* sighs and goes back to work 15:36:36 okay. but, can you repeat your answer on my last question? so (append gives me a return value of the new list and i have to use that one as my new list? 15:36:43 yep 15:37:02 Poor sjamaan. 15:37:04 Zahl does this make sense now? (define lst (list 1 2 3)) (define lst (append lst (list 4 5 6)) ; lst is now (1 2 3 4 5 6) 15:37:05 :-P 15:37:15 what's ironic is that I program functionally whenever I possibly can 15:37:41 firecrow8: Try to use set! rather than redefining, because the latter has potential to confuse. 15:37:46 I just think that it's not helpful to a beginner to insist that they learn about functional programming in addition to whatever question they're trying to get answered. 15:37:48 abstractj [~shadow_wa@187.82.184.59] has joined #scheme 15:37:52 hm firecrow8 i would say now because a new lst is created on every call 15:37:59 cky oh yeah that makes sense 15:38:17 s/now/no 15:38:24 Zahl_, yes a new list, thats part of the immutability thing 15:38:38 the list itself is just a series of references to values so its not wasting much 15:38:43 .oO("immutability"?) 15:38:50 gravicappa [~gravicapp@ppp85-140-116-130.pppoe.mtu-net.ru] has joined #scheme 15:38:59 i think i have to try a little bit around now 15:39:09 thanks for now 15:39:13 cky so (define lst (append 1 2 3) (set! lst (append lst 4 5 6)) 15:39:31 Yeah. 15:39:35 so what would that be in a let statement? 15:39:56 or even recursion, I guess generating lists often happens as an argument to a function 15:40:02 so the set! is not necessary 15:40:15 (let ((lst (list 1 2 3))) (set! lst (append lst (list 4 5 6))) lst) 15:40:32 stis [~stis@1-1-1-39a.veo.vs.bostream.se] has joined #scheme 15:40:40 Yes, recursion/iteration is the usual way to update. 15:40:55 If you master that, set! is indeed used much less. 15:41:14 firecrow8: (append 1 2 3) is not a valid expressions. 15:41:16 cky isnt it cleaner just to return the append? (let ((lst (list 1 2 3))) (append lst (list 4 5 6)) 15:41:29 oh yeah of course (append lst (1 2 3)) 15:41:35 firecrow8: Of course. I was only demonstrating how you would use set! inside a let, as you asked. 15:41:48 arg. typos (append lst '(1 2 3)) 15:42:12 so does this make sense? http://nopaste.info/50a02a0892.html i dont know howto put somekind of print in my list so i cannot debug it evectivly 15:42:20 cky, ah yes thanks, I was referring to reasons for using set! 15:42:41 this should get me a new list of ('first_element 1 2 3 4 5) 15:42:46 how to represent complicated state of say emulator (few stacks, memory, etc.), something which i would do in C using structures 15:43:22 ment: The Scheme equivalent of structures is "records". 15:43:38 ment: And yes, it's usual and customary to use mutable records. 15:44:33 cky: great, thanks 15:44:35 Zahl_: that might work. 15:44:56 cky: what?! mutation? evil!! 15:45:07 offby1: Oh noes!! 15:45:39 seriously -- I generally avoid mutating records too 15:46:10 EbiDK [~ebi@3e6b7ac3.rev.stofanet.dk] has joined #scheme 15:46:30 Nice. :-) 15:47:29 -!- Zahl [~kenneth@lnx101.hrz.tu-darmstadt.de] has quit [Ping timeout: 276 seconds] 15:53:45 bgs100 [~ian@unaffiliated/bgs100] has joined #scheme 15:57:02 -!- Jafet [~Jafet@unaffiliated/jafet] has quit [Ping timeout: 264 seconds] 15:59:41 -!- seangrove [~user@c-71-198-44-87.hsd1.ca.comcast.net] has quit [Ping timeout: 276 seconds] 16:03:38 -!- dfeuer [~dfeuer@wikimedia/Dfeuer] has quit [Quit: Goin' away] 16:04:23 dfeuer [~dfeuer@pool-173-79-225-26.washdc.fios.verizon.net] has joined #scheme 16:04:23 -!- dfeuer [~dfeuer@pool-173-79-225-26.washdc.fios.verizon.net] has quit [Changing host] 16:04:23 dfeuer [~dfeuer@wikimedia/Dfeuer] has joined #scheme 16:04:25 dfeuer_ [~dfeuer@pool-173-79-225-26.washdc.fios.verizon.net] has joined #scheme 16:04:49 dnm [~dnm@static-71-166-174-24.washdc.east.verizon.net] has joined #scheme 16:05:53 pumpkin [~pumpkin@user-142hbak.cable.mindspring.com] has joined #scheme 16:09:43 -!- dfeuer_ [~dfeuer@pool-173-79-225-26.washdc.fios.verizon.net] has quit [Ping timeout: 245 seconds] 16:09:55 -!- dfeuer [~dfeuer@wikimedia/Dfeuer] has quit [Ping timeout: 240 seconds] 16:09:56 -!- _chiyam [~chiyam@122.167.3.148] has quit [Read error: Connection reset by peer] 16:10:52 -!- ravic [~ravi@118-93-189-209.dsl.dyn.ihug.co.nz] has quit [Remote host closed the connection] 16:25:46 stamourv` [~user@kauai.ccs.neu.edu] has joined #scheme 16:26:26 -!- gabot [~eli@winooski.ccs.neu.edu] has quit [Ping timeout: 264 seconds] 16:27:00 -!- stamourv [~user@kauai.ccs.neu.edu] has quit [Remote host closed the connection] 16:27:16 -!- stamourv` [~user@kauai.ccs.neu.edu] has quit [Client Quit] 16:27:39 stamourv [~user@kauai.ccs.neu.edu] has joined #scheme 16:27:56 -!- emma [~em@unaffiliated/emma] has quit [Remote host closed the connection] 16:34:09 Caleb-- [~caleb@bzq-79-182-5-16.red.bezeqint.net] has joined #scheme 16:45:23 -!- femtoo [~femto@95-89-197-196-dynip.superkabel.de] has quit [Quit: Leaving] 16:53:40 emma [~em@unaffiliated/emma] has joined #scheme 17:03:54 -!- MichaelRaskin [~MichaelRa@195.178.216.22] has quit [Remote host closed the connection] 17:10:32 sjamaan: Done, finally. 17:10:44 Riastradh: Should make more sense now. 17:14:15 eli, so it does. Thanks. 17:15:52 -!- Riastradh [debian-tor@fsf/member/riastradh] has quit [Quit: leaving] 17:19:08 -!- jao [~user@74.Red-80-24-4.staticIP.rima-tde.net] has quit [Ping timeout: 255 seconds] 17:19:43 -!- abstractj [~shadow_wa@187.82.184.59] has quit [Ping timeout: 245 seconds] 17:24:04 abstractj [~shadow_wa@187.82.98.165] has joined #scheme 17:24:19 -!- emma [~em@unaffiliated/emma] has quit [Ping timeout: 240 seconds] 17:24:19 eli: Very nice. Thanks 17:26:03 molbdnilo [~Ove@c80-216-195-64.bredband.comhem.se] has joined #scheme 17:33:51 REPLeffect [~REPLeffec@69.54.115.254] has joined #scheme 17:35:57 pavelludiq [~quassel@91.139.196.22] has joined #scheme 17:36:34 emma [~em@unaffiliated/emma] has joined #scheme 17:40:37 how can i check if two symbols are identical? (= 'a 'a) does not work while it works for numbers 17:43:20 kenjin2201 [~kenjin@61.99.46.4] has joined #scheme 17:43:53 I want to load a bitmap image on a frame. Can anyone help me? 17:44:06 in DrScheme 17:44:34 ah, got it it was eq? instead of equal/s 17:52:52 jonrafkind [~jon@crystalis.cs.utah.edu] has joined #scheme 17:53:36 femtoo [~femto@95-89-197-196-dynip.superkabel.de] has joined #scheme 18:03:48 -!- alaricsp [~alaric@geniedb.hotdesktop.biz] has quit [Quit: Leaving] 18:04:38 femtooo [~femto@95-89-197-196-dynip.superkabel.de] has joined #scheme 18:07:53 -!- femtoo [~femto@95-89-197-196-dynip.superkabel.de] has quit [Ping timeout: 265 seconds] 18:23:45 -!- drdo [~user@194.210.228.22] has quit [Remote host closed the connection] 18:32:45 kar8nga [~kar8nga@78.104.80.202] has joined #scheme 18:35:01 -!- tupi__ [~david@139.82.89.24] has quit [Remote host closed the connection] 18:37:23 drdo [~user@194.210.228.22] has joined #scheme 18:52:51 -!- kar8nga [~kar8nga@78.104.80.202] has quit [Remote host closed the connection] 18:53:42 -!- molbdnilo [~Ove@c80-216-195-64.bredband.comhem.se] has quit [Quit: molbdnilo] 18:54:27 phirefly [~phirefly@174-16-217-128.hlrn.qwest.net] has joined #scheme 18:54:55 -!- snorble [~snorble@s83-179-14-105.cust.tele2.se] has quit [Ping timeout: 260 seconds] 18:55:02 molbdnilo [~Ove@c80-216-195-64.bredband.comhem.se] has joined #scheme 18:56:58 seangrove [~user@70-36-236-168.dsl.static.sonic.net] has joined #scheme 18:57:59 kilimanjaro [~kilimanja@unaffiliated/kilimanjaro] has joined #scheme 18:58:00 sjamaan: BTW, it looks very nice on w3m, still decent on lynx, and links is by far the worst -- even for that class of browsers. 18:58:52 how do you store procedures in a list for later execution... e.g. (list (define f "hello") (display f)) 18:59:52 -!- femtooo [~femto@95-89-197-196-dynip.superkabel.de] has quit [Quit: Leaving] 18:59:53 phirefly: (list (lambda (f) (display f)) ... ) 19:00:12 saccade [~saccade@209-6-54-113.c3-0.smr-ubr1.sbo-smr.ma.cable.rcn.com] has joined #scheme 19:00:23 Then you can ((car your-list-here) "hello") 19:00:31 For example. 19:01:18 hi again. with this code (define-struct team (name group score)) and (define some-teams (list (make-team "Italy" 1 4))) I can access the first element in my list with (first some-teams) that gives me a struct. but how can i access the different fields in that struct? 19:03:09 Zahl_: I'd guess (team-name (first some-teams)) 19:04:41 I'm trying to create a syntax just like define but instead of executing the expressions, it saves them in a list 19:05:32 for executing later... do I need define-syntax for that? 19:05:59 phirefly, so you'd like to defer the definition itself for later? 19:06:20 mario-goulart: thanks. it works fine 19:06:48 yeah 19:07:01 so the list of expressions can be manipulated before execution 19:07:01 can i as if there is any particular reason why? 19:07:01 ah i see 19:07:13 i guess you could quote the expression? 19:07:51 thats what I thought but can't define syntax help so you don't have to 19:09:47 I want something like this (execute-list (list (define h "hello) (display h))) 19:13:45 (execute-list (list '(define h "hello) '(display h))) might work 19:14:10 klovett [~klovett@c-67-180-97-38.hsd1.ca.comcast.net] has joined #scheme 19:16:18 how do you convert a symbol to a procedure? 19:17:52 i might totally be giving the wrong advise here but anyway 19:18:25 a symbol is implicitly resolved to whatever it is bound to 19:19:05 phirefly, you almost certainly don't want to do that 19:20:07 is there a way to get the values supplied with my function (define)? for example i have (define (myfunc "arg1" "arg2")) is there somekind of argv or $_[n] in perl? 19:20:15 I suppose you want something like `eval', phirefly (I'm not sure I understand what you mean). 19:20:46 i dont want wo use vars in my function call. the params are meant to be static 19:20:59 Zahl_, the correct form is (define (myfunc a1 a2 a3 ...) ...) without the quotes 19:21:47 what do you mean by static? 19:21:51 yea i know that form but i was searching for a way to get those values if i statically call the function with the quotes 19:22:44 okay in c i can use int main("bla","bla1") so i can use argv[0] to access the first one 19:23:56 well it's main(int argc, char **argv) 19:24:22 which is the function prototype 19:24:35 ah yea you re right 19:24:58 -!- phirefly [~phirefly@174-16-217-128.hlrn.qwest.net] has quit [Ping timeout: 260 seconds] 19:25:00 i think i thought in the wrong way then 19:35:58 choas [~lars@p578F6F2C.dip.t-dialin.net] has joined #scheme 19:40:30 -!- drdo [~user@194.210.228.22] has quit [Ping timeout: 245 seconds] 19:41:24 homie` [~user@xdsl-87-79-233-152.netcologne.de] has joined #scheme 19:42:39 -!- homie` [~user@xdsl-87-79-233-152.netcologne.de] has quit [Read error: Connection reset by peer] 19:43:28 jao [~user@83.32.170.229] has joined #scheme 19:43:52 -!- wbooze [~user@xdsl-195-14-198-103.netcologne.de] has quit [Ping timeout: 265 seconds] 19:43:55 -!- homie [~user@xdsl-195-14-198-103.netcologne.de] has quit [Ping timeout: 260 seconds] 19:46:40 -!- pumpkin [~pumpkin@user-142hbak.cable.mindspring.com] has quit [Quit: Computer has gone to sleep.] 19:47:47 phirefly [~phirefly@174-16-217-128.hlrn.qwest.net] has joined #scheme 19:51:06 -!- HG` [~HG@xdsl-92-252-91-28.dip.osnanet.de] has quit [Quit: Leaving.] 19:55:36 -!- klovett [~klovett@c-67-180-97-38.hsd1.ca.comcast.net] has quit [Quit: klovett] 20:04:10 klovett [~klovett@c-67-180-97-38.hsd1.ca.comcast.net] has joined #scheme 20:09:21 femtoo [~femto@95-89-197-196-dynip.superkabel.de] has joined #scheme 20:24:02 -!- Maddas [~maddas@74.125.121.33] has quit [Quit: leaving] 20:27:50 -!- phirefly [~phirefly@174-16-217-128.hlrn.qwest.net] has quit [Read error: Connection reset by peer] 20:32:25 pumpkin [~pumpkin@user-142hbak.cable.mindspring.com] has joined #scheme 20:39:43 is there a way to get how many items are in my list? ie. (list 'a 'b 'c) should give me 3 20:40:50 (length (list 'a 'b 'c)) => 3 20:42:33 ty 20:44:03 rudybot: (define (arg2 args (list-ref args 2))) 20:44:04 cky: your sandbox is ready 20:44:05 cky: error: eval:1:19: define: not an identifier, identifier with default, or keyword for procedure argument at: (list-ref args 2) in: (define (arg2 args (list-ref args 2))) 20:44:23 (define (arg2 . args) (list-ref args 2)) 20:44:33 rudybot: (define (arg2 . args) (list-ref args 2)) 20:44:35 cky: Done. 20:44:47 rudybot: (args2 'foo 'bar 'baz 'qux) 20:44:47 cky: error: reference to undefined identifier: args2 20:44:54 rudybot: (arg2 'foo 'bar 'baz 'qux) 20:44:54 cky: ; Value: baz 20:45:02 Zahl_: ^^--- Is that what you're looking for? 20:47:27 i think so but ive to play a little with it. never used list-ref before 20:47:48 Zahl_: list-ref just gets the nth item from the given list. 20:47:58 rudybot: (list-ref '(foo bar baz) 0) 20:47:58 cky: ; Value: foo 20:48:05 rudybot: (list-ref '(foo bar baz) 1) 20:48:05 cky: ; Value: bar 20:48:15 ahh 20:48:27 Zahl_: So, using the (define (func . args) ...) syntax, all the arguments are packed into a list named "args". 20:48:53 -!- abstractj [~shadow_wa@187.82.98.165] has quit [Ping timeout: 245 seconds] 20:49:05 and the dot in "func . args" has a special meaning? 20:49:15 Zahl_: Yes, it makes the argument packing happen. 20:49:22 Zahl_: Without it, it would expect a single argument. 20:49:52 ah it is like + in java String str = "abc" + "def" 20:50:12 Zahl_: Do you use Python or Ruby? The difference between the dot and no dot is the difference between "def func(*args)" versus "def func(args)". 20:50:45 no i dont 20:51:07 Okay, what other languages do you know? Maybe I can come up with a similar example there. 20:51:19 perl java or c 20:51:30 -!- femtoo [~femto@95-89-197-196-dynip.superkabel.de] has quit [Quit: Leaving] 20:51:34 Okay, Java. 20:51:54 "With dot" is like: Object func(Object... args); 20:52:00 "Without dot" is like: Object func(Object args); 20:52:29 So, (define (func . args) ...), the "func" function takes 0 or more arguments, and they're put in a list named "args". 20:52:47 Whereas, (define (func args) ...), the "func" function takes 1 argument only, and it's put in a variable named "args". 20:52:53 phirefly [~phirefly@174-16-217-128.hlrn.qwest.net] has joined #scheme 20:53:36 the func . args. the args gets to a list. in other words i can use "args" like i would use a list 20:53:42 Exactly. 20:54:10 i think i got it 20:54:15 Yay! :-) 20:54:26 *franki^* learnt something new too 20:54:31 Thanks cky :) 20:54:33 franki^: :-) 20:54:36 thank yo :P 20:54:41 My pleasure. :-) 20:56:27 hotblack23 [~jh@p57BD774F.dip.t-dialin.net] has joined #scheme 20:59:07 RageOfThou [~RageOfTho@users-33-97.vinet.ba] has joined #scheme 21:01:17 -!- gravicappa [~gravicapp@ppp85-140-116-130.pppoe.mtu-net.ru] has quit [Remote host closed the connection] 21:01:34 -!- MrFahrenheit [~RageOfTho@users-55-111.vinet.ba] has quit [Ping timeout: 240 seconds] 21:01:59 -!- kenjin2201 [~kenjin@61.99.46.4] has quit [Ping timeout: 250 seconds] 21:03:41 abstractj [~shadow_wa@187.82.238.15] has joined #scheme 21:09:32 snorble [~snorble@s83-179-14-105.cust.tele2.se] has joined #scheme 21:11:59 homie [~user@xdsl-87-79-233-152.netcologne.de] has joined #scheme 21:14:13 wbooze [~user@xdsl-87-79-233-152.netcologne.de] has joined #scheme 21:20:28 shiduke [~shiduke@209.89.186.136] has joined #scheme 21:24:18 -!- EbiDK [~ebi@3e6b7ac3.rev.stofanet.dk] has quit [Quit: Ex-Chat] 21:27:12 turbofail [~user@adsl-99-50-22-193.dsl.pltn13.sbcglobal.net] has joined #scheme 21:28:53 -!- phirefly [~phirefly@174-16-217-128.hlrn.qwest.net] has quit [Ping timeout: 245 seconds] 21:30:39 gravicappa [~gravicapp@ppp85-141-167-181.pppoe.mtu-net.ru] has joined #scheme 21:53:28 -!- abstractj [~shadow_wa@187.82.238.15] has quit [Read error: Connection reset by peer] 21:56:33 -!- klovett [~klovett@c-67-180-97-38.hsd1.ca.comcast.net] has quit [Quit: klovett] 22:02:38 imran_sr [~imran@75-18-254-4.lightspeed.uncyca.sbcglobal.net] has joined #scheme 22:06:59 -!- choas [~lars@p578F6F2C.dip.t-dialin.net] has quit [Quit: leaving] 22:18:15 schmir [~schmir@p54A9110E.dip0.t-ipconnect.de] has joined #scheme 22:23:05 is there a way to force left to right evaluation? 22:23:16 let* 22:23:39 i am doing something like (cons (fn1) (fn2)) ... but (fn2) seems to get evaluated first 22:24:02 ah 22:24:25 so something like (let* ((a (fn1)) (b (fn2))) (cons a b)) ? 22:25:19 yea, its called a-normal form 22:26:20 ok 22:27:34 -!- samth is now known as samth_away 22:30:46 rudybot: administrative normal form 22:30:47 turbofail: (And none, as far as I know, really requires administrative access) 22:31:02 tokam [~tokam@p57B8F511.dip.t-dialin.net] has joined #scheme 22:31:16 -!- schmir [~schmir@p54A9110E.dip0.t-ipconnect.de] has quit [Remote host closed the connection] 22:31:18 how to compare numbers for equality? (number=? did not work well 22:31:34 tokam: = 22:31:49 thx 22:32:13 (= 1 "1") true or false :) gotta test this 22:32:19 Invalid. 22:32:23 You can't pass strings to =. 22:32:34 rudybot: (= 1 "1") 22:32:34 cky: error: =: expects type as 2nd argument, given: "1"; other arguments were: 1 22:32:40 i see 22:32:52 But you can do this: 22:32:58 rudybot: (= 1 (string->number "1")) 22:32:58 cky: ; Value: #t 22:34:14 -!- Caleb-- [~caleb@bzq-79-182-5-16.red.bezeqint.net] has quit [Read error: Connection reset by peer] 22:34:33 I am funny, made my homeworks without thinking just coding =) it's too easy but seems all to work. 22:34:46 and other students do not know how to write this stuff lol :D 22:34:59 -!- stis [~stis@1-1-1-39a.veo.vs.bostream.se] has quit [Remote host closed the connection] 22:35:28 Caleb-- [thedude@109.65.3.83] has joined #scheme 22:35:32 its not actually "administrative" normal form. the a doesnt stand for anything 22:35:32 O_o 22:35:54 cky: very very easy recusrions. 22:36:07 Yep, it's awesome like that. 22:36:49 cos there are ones who never programmed before, but it's silly to comapre one who has experience with others who just start. 22:37:20 I think it's normal that a programmer programms without stopping to type, even using hot keys all the type & copy + paste 22:37:26 Some would say that that's where a course using Prolog is awesome. Even most people who have programmed before will get their head twisted by Prolog. :-P 22:37:54 :) 22:38:08 don't know prolog is it like scheme? 22:38:16 It's nothing like Scheme. 22:38:24 our uni sucks, they do not follow the style guide. 22:38:26 for scheme 22:38:34 It's nothing like most programming languages you've seen before either. 22:38:42 the lecturer puts scheme brackets in c style lol. 22:38:44 Awwww.... 22:38:47 -!- shiduke [~shiduke@209.89.186.136] has quit [Read error: Connection reset by peer] 22:38:48 Yeah, that's fail. 22:39:10 can you check my scheme for style? 22:39:15 than I will learn this too. 22:39:46 http://pastebin.com/y0M8jJyt going to write the tests & comments now. 22:39:59 -!- Caleb-- [thedude@109.65.3.83] has quit [Ping timeout: 255 seconds] 22:40:07 sry line 9 is from them I think it's wrong 22:44:54 Caleb-- [~caleb@bzq-109-65-3-83.red.bezeqint.net] has joined #scheme 22:45:47 jonrafkind: really? i've always heard it called administrative normal form 22:46:02 yea its in some paper somewhere that the a is meaningless 22:47:48 i am trying to make a function take a list of tokens and outputs a tree 22:47:57 mainly i'm writing a list parser 22:48:20 that uses the symbols < > to denote a sublist 22:48:24 chemuduguntar: What kindof a tree?\ 22:48:44 askhader, just a nested list of lists i guess 22:48:50 no particular form 22:48:59 -!- seangrove [~user@70-36-236-168.dsl.static.sonic.net] has quit [Ping timeout: 255 seconds] 22:49:23 proceed 22:49:59 sexpr -> xml ? 22:50:13 jonrafkind, more like tokens to tree 22:50:32 oh, so `read' 22:50:37 writing a kind of parser that converts a stream of tokens into a list 22:50:44 yea :) 22:51:48 but i am really trying to write one so i can understand how to do it 22:52:50 to be invoked as (construct-tree '('< + 1 '< * 2 3 '> '>) 22:53:28 to make it easier for myself, i created a primitive called next-token that simply returns the next token from a buffer 22:53:51 and removes it from the buffer 22:54:18 i came up with this definition of construct-tree 22:55:19 small note, you don't need the internal quotes on your < and > characters in that list 22:56:35 lambda () (let ((token (next-token))) (cond ((null? token) '()) ((open? token) (cons (construct-tree) (construct-tree))) ((close? token) '()) (else (cons token (construct-tree)))))))) 22:56:53 well maybe you do if you want to distinguish between a comparison operator and an a list opening 22:56:55 sorry if there are some parens missing, i typed it out just now 22:57:37 turbofail, i am just using < > purely to avoid any confusion with myself 22:57:47 open? and close? abstract this 22:58:11 if I run the function with the above argument 22:58:29 i get something like (+ 1 () * 2 3) 22:59:15 its' as if the second argument to the cons invocation for the case of open? is gobbling up all the input 23:00:59 i tried instead of cons'ing them directly: (let* ((a (construct-tree)) (b (construct-tree))) (cons a b)) but it did the same thing 23:06:59 abstractj [~shadow_wa@187.56.174.29] has joined #scheme 23:16:24 hiyuh [~hiyuh@KD124214245222.ppp-bb.dion.ne.jp] has joined #scheme 23:17:28 -!- firecrow8 [~fcrow@69.38.169.34] has left #scheme 23:18:02 DrDuck [~duck@146.229.116.89] has joined #scheme 23:18:03 -!- hiyuh [~hiyuh@KD124214245222.ppp-bb.dion.ne.jp] has quit [Client Quit] 23:19:54 -!- tonyg [~tonyg@navarone.ccs.neu.edu] has quit [Remote host closed the connection] 23:20:14 tonyg [~tonyg@navarone.ccs.neu.edu] has joined #scheme 23:21:45 hiyuh [~hiyuh@KD124214245222.ppp-bb.dion.ne.jp] has joined #scheme 23:23:28 -!- hiyuh [~hiyuh@KD124214245222.ppp-bb.dion.ne.jp] has quit [Remote host closed the connection] 23:26:54 -!- fradgers- [~fradgers-@5e064cc1.bb.sky.com] has left #scheme 23:31:15 mmc [~michal@cs27120227.pp.htv.fi] has joined #scheme 23:31:22 Modius__ [~Modius@cpe-70-123-158-125.austin.res.rr.com] has joined #scheme 23:31:35 -!- dnm [~dnm@static-71-166-174-24.washdc.east.verizon.net] has quit [Ping timeout: 276 seconds] 23:32:10 Euthydemus` [~euthydemu@vaxjo3.23.cust.blixtvik.net] has joined #scheme 23:34:41 clklein_ [~clklein@spaghetti.cs.northwestern.edu] has joined #scheme 23:36:48 rmrfchik_ [~paul@195.191.11.247] has joined #scheme 23:39:42 tizoc` [~user@li25-112.members.linode.com] has joined #scheme 23:40:22 -!- tizoc` is now known as tizoc_ 23:40:39 -!- tizoc_ is now known as tizoc` 23:40:44 -!- tizoc` is now known as tizoc_ 23:41:04 -!- molbdnilo [~Ove@c80-216-195-64.bredband.comhem.se] has quit [*.net *.split] 23:41:04 -!- Modius_ [~Modius@cpe-70-123-158-125.austin.res.rr.com] has quit [*.net *.split] 23:41:04 -!- Euthydemus [~euthydemu@vaxjo3.23.cust.blixtvik.net] has quit [*.net *.split] 23:41:04 -!- minion [~minion@common-lisp.net] has quit [*.net *.split] 23:41:04 -!- rmrfchik [~paul@195.191.11.247] has quit [*.net *.split] 23:41:04 -!- niko [~niko@freenode/staff/ubuntu.member.niko] has quit [*.net *.split] 23:41:04 -!- tizoc [~user@unaffiliated/tizoc] has quit [*.net *.split] 23:41:12 -!- tizoc_ is now known as tizoc 23:41:19 -!- tizoc [~user@li25-112.members.linode.com] has quit [Changing host] 23:41:19 tizoc [~user@unaffiliated/tizoc] has joined #scheme 23:41:59 niko [~niko@freenode/staff/ubuntu.member.niko] has joined #scheme 23:43:48 pumpkin_ [~pumpkin@user-142hbak.cable.mindspring.com] has joined #scheme 23:43:53 -!- pumpkin [~pumpkin@user-142hbak.cable.mindspring.com] has quit [Ping timeout: 255 seconds] 23:51:06 dnm [~dnm@c-68-34-57-169.hsd1.va.comcast.net] has joined #scheme 23:52:51 -!- niko [~niko@freenode/staff/ubuntu.member.niko] has quit [Read error: Connection reset by peer] 23:52:53 -!- hotblack23 [~jh@p57BD774F.dip.t-dialin.net] has quit [Quit: Leaving.] 23:52:55 -!- clklein_ is now known as clklein 23:53:17 niko [~niko@freenode/staff/ubuntu.member.niko] has joined #scheme