Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] Re: RFC: Cross-language benchmark proposal

From: jan:skibinski:sympatico:ca at: 7-Nov-2002 20:34

Hi Joel,
> Heavens to Murgatroyd, no! ;-) I'm just contributing my opinion > and everyone else is free to do so as well!
That was a booby trap of mine :-) I have no other comments about your last response. I have to agree with most of it. BTW, you did s good job with your proposal. I am attaching the little gadget I mentioned before. All the best Jan
> > > > I was just fiddling with something else and it suddenly appeared > > to me that I could reuse it in Ackerman. I'll post that little > > gadget separately. > > > > I'm eager to see it. >
----------------------------------------------------- It's really nothing, a little gadget, but quite covenient, because it abstracts away and composes many functions into one. Something similar to operator (.) in Haskel, as in: f = g . h . k It also allows for making quick and dirty temporary functions: pipe: func [ {Make a pipeline from a block of functions} fs [block!] /local result [function!] ][ make function! [x] append copy fs 'x ] filter pipe [6 < ] .. [1 20] map pipe [10 * sine] ..[1 10] g: pipe [10 * sine] source g ==g: func [x][10 * sine x] Do you recognize this? g: pipe [boom2 boom2 boom2 boom2] g 1 == 61 Well that's ack 3 3 from the example I previously posted. How about putting a probe after each stage of the pipeline?