00:10 (join) DT`` 00:34 (quit) Demosthenes: Ping timeout: 240 seconds 00:35 (join) Demosthenes 00:38 (quit) dnolen: Quit: dnolen 00:46 (quit) geoffhill: Quit: geoffhill 01:21 (quit) jonrafkind: Read error: Operation timed out 01:27 (join) geoffhill 01:37 (quit) mwolfe: Ping timeout: 248 seconds 01:52 (join) mwolfe 01:53 (quit) mwolfe: Remote host closed the connection 02:38 (join) Lajla 02:39 (join) hkBst 02:44 (part) Lajla: "I am gay for you" 03:13 (join) dzhus 03:32 (quit) dzhus: Quit: Yow! Legally-imposed CULTURE-reduction is CABBAGE-BRAINED! 04:03 (join) mceier 04:15 (quit) misterm: Ping timeout: 246 seconds 04:23 (quit) DT``: Ping timeout: 246 seconds 04:57 (quit) ckrailo: Quit: Computer has gone to sleep. 05:07 (join) masm 05:14 (quit) mceier: Quit: leaving 06:04 (join) MayDaniel 06:17 (quit) geoffhill: Quit: geoffhill 06:30 (join) mceier 06:31 (quit) mceier: Client Quit 06:57 (quit) MayDaniel: Read error: Connection reset by peer 07:04 (join) tauntaun 07:39 (join) dnolen 07:58 (quit) tauntaun: Ping timeout: 246 seconds 08:35 (join) tauntaun 08:45 (quit) collin: Read error: Operation timed out 08:45 (join) collin 08:53 (join) mye 09:00 (join) DT`` 09:13 (join) MayDaniel 09:29 (quit) tauntaun: Quit: Ex-Chat 09:32 (join) PLT_Notify 09:32 PLT_Notify: racket: master Jay McCarthy * 91d98aa (3 files in 3 dirs): Fixing drdr discovered problem - http://bit.ly/gIhir9 09:32 (part) PLT_Notify 09:35 (quit) MayDaniel: Read error: Connection reset by peer 09:40 (join) lucian 09:43 (join) mceier 10:03 (join) dzhus 10:21 (join) tauntaun 10:25 (join) MayDaniel 10:27 (quit) lucian: Remote host closed the connection 10:46 (join) leo2007 11:06 (quit) MayDaniel: Read error: Connection reset by peer 11:30 (join) ckrailo 11:39 (join) anRch 11:44 (quit) hkBst: Read error: Connection reset by peer 11:56 (quit) dnolen: Remote host closed the connection 11:59 (quit) tauntaun: Ping timeout: 240 seconds 12:10 (join) jonrafkind 12:34 (quit) dzhus: Remote host closed the connection 12:35 (quit) tildedave: Read error: Connection reset by peer 12:35 (join) tauntaun 12:45 (join) tildedave 13:00 (join) PLT_Notify 13:00 PLT_Notify: racket: master Matthew Flatt * 8a2d587 (3 files in 1 dirs): minor hash tuning 13:00 PLT_Notify: racket: master Matthew Flatt * f36e3ad (1 files in 1 dirs): small clean-ups 13:00 PLT_Notify: racket: master Matthew Flatt * efed709 (1 files in 1 dirs): improve error reporting when using exec 13:00 PLT_Notify: racket: master Matthew Flatt * f6d185a (2 files in 2 dirs): configure: use `pkg-config' for libffi 13:00 PLT_Notify: racket: master commits 91d98aa...f6d185a - http://bit.ly/eNX6Bv 13:00 (part) PLT_Notify 13:01 (quit) anRch: Quit: anRch 13:04 (quit) tauntaun: Ping timeout: 246 seconds 13:10 (quit) leo2007: Ping timeout: 240 seconds 13:10 (join) anRch 13:30 (nick) samth_away -> samth 13:33 (quit) saint_cypher: Quit: Leaving. 14:05 (quit) anRch: Quit: anRch 14:06 (join) tauntaun 14:07 (quit) tauntaun: Remote host closed the connection 14:07 (join) tauntaun 14:14 (join) carleastlund 14:24 (join) scourtier 14:25 (part) scourtier 14:26 (join) giantsteps 14:28 giantsteps: I have a question about Exercise 27.2.2. in How to Design Programs, would anyone be willing to help? 14:29 giantsteps: I'll post the question in case anyone wants to bite... 14:30 giantsteps: Actuall, maybe a link would be better: http://www.htdp.org/2003-09-26/Book/curriculum-Z-H-34.html#node_sec_27.2 14:30 giantsteps: It gives me to functions and asks me to abstract them. I have a solution, but I don't know if it's any good. 14:31 giantsteps: rather, it gives me TWO functions... 14:35 jonrafkind: so whats your solution 14:35 samth: giantsteps, did you follow the recipe for abstraction? 14:35 giantsteps: Yes, I think. Should I just post all of my code or explain it--or both? 14:36 samth: then it's probably right,. but you should post it 14:36 giantsteps: Ok, it seems overly complex to me, but here goes.. 14:37 giantsteps: ;; file->list-of-lines : file -> (listof (listof symbol)) 14:37 giantsteps: ;; to convert a file into a list of lines 14:37 giantsteps: (define (file->list-of-lines afile) 14:37 giantsteps: (local ((define NEWLINE 'NL) 14:37 giantsteps: (define first-line 14:37 giantsteps: (local ((define (return-empty first rest) 14:37 giantsteps: empty)) 14:37 giantsteps: (trigger return-empty cons))) 14:37 giantsteps: (define remove-first-line 14:37 giantsteps: (local ((define (return-rest first rest) 14:37 giantsteps: rest)) 14:37 giantsteps: (trigger return-rest return-rest)))) 14:37 giantsteps: (cond 14:37 giantsteps: [(empty? afile) empty] 14:37 giantsteps: [else 14:37 giantsteps: (cons (first-line afile NEWLINE) 14:37 giantsteps: (file->list-of-lines (remove-first-line afile NEWLINE)))]))) 14:37 giantsteps: 14:37 giantsteps: ;; trigger : (X (listof X) -> Y) (X (listof X) -> Y) -> ((listof X) X -> Y) 14:38 giantsteps: ;; takes two functions and produces a function that checks each element of a 14:38 giantsteps: ;; given list against a specified item. If the element is a match, the first 14:38 giantsteps: ;; and rest of the list are given as arguments to the first function supplied 14:38 giantsteps: ;; to trigger. Else, the second function processes the first of the list and 14:38 giantsteps: ;; the recursively processed rest of the list. 14:38 giantsteps: (define (trigger hit-f miss-f) 14:38 giantsteps: (local ((define (trigger l x) 14:38 giantsteps: (cond 14:38 samth: so, you shouldn't post right into irc 14:38 giantsteps: ((empty? l) empty) 14:38 giantsteps: ((equal? (first l) x) (hit-f (first l) (rest l))) 14:38 giantsteps: (else (miss-f (first l) (trigger (rest l) x)))))) 14:38 samth: giantsteps, please use lisppaste or pastebin 14:38 giantsteps: trigger)) 14:38 giantsteps: 14:38 giantsteps: Oops, sorry. That's why I asked. I'm a newb. One sec. 14:39 samth: also, if your new definitions of the two functions aren't short, it's probably not right 14:39 (join) geoffhill 14:41 giantsteps: Okay, http://paste.lisp.org/display/121470 14:42 giantsteps: The new definitions are relatively short (they're locally defined), right? It's just the abstract function... 14:42 samth: when you're done with abstracting, you should have 3 functions 14:43 samth: the abstracted function, and the new defintions of first-line and remove-first-line 14:43 giantsteps: Right, so the abstracted function is trigger, the new definitions are local to file->list-of-lines. 14:44 samth: also, why do you have a local defintion that's identical to the whole function? 14:44 giantsteps: You mean with regard to trigger? 14:44 samth: yes 14:45 giantsteps: Because that's necessary in order to output a function. trigger takes a function and yields a function. 14:45 samth: oh, yes, sorry, i was misreading 14:46 giantsteps: One second, I'l post another version that makes my question clearer... 14:48 giantsteps: http://paste.lisp.org/display/121471 14:48 giantsteps: And thanks so much for helping me, I really appreciate it. 14:50 (join) dnolen 14:51 (join) saint_cypher 14:51 samth: giantsteps, i don't think the new versions of remove-first-line/first-line have the right contract 14:52 samth: in particular, how many arguments do they have? 14:52 samth: you should write some test cases 14:52 samth: and make sure they work 14:52 samth: with both versions 14:53 giantsteps: The tests worked. They are slightly different: They take the NEWLINE character as an argument (more general). 14:53 giantsteps: So yes, they take two args instead of one. 14:54 giantsteps: In other words, the new versions take a list in addition to a character used to separate lines. 14:54 samth: the new versions are supposed to be exactly like the old versions 14:54 samth: that's how the abstraction recipe works 14:55 giantsteps: Right, then I would just substitute all the xs in the code with NEWLINE. 14:56 (quit) samth: Quit: Ex-Chat 14:56 giantsteps: Hmm... 15:00 giantsteps: Anyone else want to take a go at helping me? Was I being a dweeb? 15:01 (join) samth 15:02 (quit) mye: Remote host closed the connection 15:19 (quit) giantsteps: Remote host closed the connection 15:19 (quit) dnolen: Ping timeout: 252 seconds 15:23 collin: hi all..just a little question..if i have some module..we'll say testmod.rkt..if i import it from multiple modules (say a.rkt require testmod.rkt and b.rkt; b.rkt require testmod.rkt).. 15:24 (nick) collin -> rekahsoft 15:25 (join) mye 15:25 rekahsoft: so my question is if i have a variable or some data in testmod.rkt and its changed will that change be available to a.rkt and b.rkt? or do a.rkt and b.rkt have different versions of the modules (aka is the module instantiated like an object would be in say C# or java) 15:25 (quit) samth: Quit: Ex-Chat 15:26 rekahsoft: my assumtion is no..because you cannot require a file (module) more then once..i assume all the variables, functions, etc are available to whichever module imports them? 15:26 (join) Fare 15:27 (join) samth 15:30 (quit) samth: Client Quit 15:30 (join) samth 15:31 (quit) tauntaun: Ping timeout: 246 seconds 15:32 carleastlund: rekahsoft, modules are instantiated once [per namespace and phase]. Different modules will see the same version of testmod.rkt [unless you do complicated things with namespaces and phases, which you probably aren't if you're asking this question]. 15:33 (join) tauntaun 15:34 (quit) samth: Client Quit 15:37 (quit) tauntaun: Ping timeout: 246 seconds 15:37 (join) tauntaun 15:43 (quit) tauntaun: Ping timeout: 246 seconds 15:49 (join) samth 16:14 (quit) samth: Remote host closed the connection 16:19 (join) MayDaniel 16:23 (join) samth 16:30 (quit) ckrailo: Quit: Computer has gone to sleep. 16:52 (quit) mye: Quit: ChatZilla 0.9.86.1 [Firefox 4.0/20110318052756] 17:01 (join) dnolen 17:11 (join) ckrailo 17:47 (quit) bremner: Read error: Operation timed out 17:50 (join) bremner 17:58 (join) rudybot_ 17:58 (quit) rudybot: Ping timeout: 246 seconds 18:01 (quit) bremner: Ping timeout: 250 seconds 18:18 (quit) ckrailo: Quit: Computer has gone to sleep. 18:18 (quit) dnolen: Quit: dnolen 18:31 (join) ckrailo 18:43 (quit) MayDaniel: Read error: Connection reset by peer 18:49 (join) bremner 18:51 (nick) samth -> samth_away 18:59 (join) dnolen 19:04 (quit) rekahsoft: Ping timeout: 240 seconds 19:04 (join) rekahsoft 19:28 (quit) dnolen: Ping timeout: 246 seconds 19:31 (quit) carleastlund: Quit: carleastlund 19:45 (quit) ckrailo: Quit: Computer has gone to sleep. 20:06 (join) dnolen 20:09 (quit) blomqvist: Read error: Connection reset by peer 20:09 (join) mblomqvist 20:10 (quit) mblomqvist: Changing host 20:10 (join) mblomqvist 20:25 (quit) masm: Read error: Operation timed out 20:42 (join) ckrailo 20:51 (join) mwolfe 20:55 (nick) mblomqvist -> blomqvist 20:55 (quit) saint_cypher: Quit: Leaving. 21:31 (quit) jonrafkind: Read error: Operation timed out 21:48 (nick) rudybot_ -> rudybot 22:16 (join) cipher 22:29 (quit) geoffhill: Ping timeout: 240 seconds 22:32 (quit) cipher: Changing host 22:32 (join) cipher 22:36 (join) geoffhill 22:36 (quit) ckrailo: Quit: Computer has gone to sleep. 22:38 (join) Seus 22:47 Seus: question: if i have a hash table with say: 'A, and I want to use a match clause to see if a list starts with 'A (mind you 'A can be completely variable), how do I have match check the entire hash table to see if that particular item is in the hash table and have it run that particular match clause?? I've tried (match expr ((hash-has-key? (first expr) p ...) '(found))) but it doesn't work...error 22:47 Seus: in pattern 22:59 (quit) dnolen: Quit: dnolen 23:16 Fare: Seus: what match clause? 23:16 Fare: You could store a closure in your hash 23:16 Fare: and call the closure if the entry is matched 23:17 Fare: is that what you mean? 23:17 Fare: (let ((fun (hash-get head hash))) (if fun (fun params...) ...)) 23:18 Seus: i'm not sure...i'm fairly novice with racket 23:18 Fare: if you don't know what you want, neither do we. 23:18 Seus: i'll have to read what a closure in a hash is to be sure 23:18 Fare: or, do you mean -- constructing a match statement in a macro? 23:20 Seus: well, i want to say constructing a match statement in a macro 23:31 (join) Gaurav__ 23:31 (nick) Gaurav__ -> Guest32133 23:33 Guest32133: hello all have a couple of questoin: a. Is there a way to port mzscheme cards collection to web using moby or related technolgy b. What needs to be done to use the cards library to create a stand-alone games detached from plt-games 23:38 (quit) Guest32133: Ping timeout: 252 seconds 23:47 (join) dnolen