Ketil Malde <[EMAIL PROTECTED]> writes:

> Unless I'm overlooking something

Which I of course did.

> #define at (let {at (y:_) 0  = y; at (y:ys) n = at ys (n-1); at _ _ = bug "at" 
> __FILE__ __LINE__} in \a x -> at a x)

No prize for spotting the bug here.

-kzm
-- 
If I haven't seen further, it is by standing in the footprints of giants
_______________________________________________
Haskell-Cafe mailing list
[EMAIL PROTECTED]
http://www.haskell.org/mailman/listinfo/haskell-cafe

Reply via email to