[plt-scheme] infix: a package for writing infix expressions in plt scheme

From: Jon Rafkind (workmin at ccs.neu.edu)
Date: Mon Dec 4 23:02:02 EST 2006

Its mildly amusing. If anything it shows a nice simple example of how to 
use the parser tools, which is good.

Danny Yoo wrote:
> Hi everyone,
>
>
> As a joke, I've coded up a small project:
>
>     http://hashcollision.org/svn/repos/projects/infix
>
> (As soon as I can fix some lingering bugs, I'll submit it to PLaneT.)
>
>
> Here's what it does:
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>> (require "infix.ss")
>>
>> (infix 3 + 4 * 5 + 6)
> 29
>> (define (square x) (* x x))
>> (infix sqrt(square(3) + square(4)))
> 5
>>
>> (infix 1/2 + 3/4)
> 5/4
>>
>> (infix string-append("hello", "world"))
> "helloworld"
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
>
> The other thing I'll add before the release is chaning comparisons 
> a-la Python for the comparison operators '<', '>', etc.
>
>
> I hope someone is amused... *grin*
> _________________________________________________
>  For list-related administrative tasks:
>  http://list.cs.brown.edu/mailman/listinfo/plt-scheme
>
>


Posted on the users mailing list.