Yes, sorry about that. We'll add them shortly. (It's nice to know that
someone is using this stuff!)
Simon
| -----Original Message-----
| From: glasgow-haskell-users-bounces@haskell.org
[mailto:glasgow-haskell-users-
| bounces@haskell.org] On Behalf Of Abraham Egnor
| Sent: 26 February 2004 22:18
| To: MR K P SCHUPKE
| Cc: glasgow-haskell-users@haskell.org
| Subject: Re: Generics... no Tuples > 2 either...
|
| I've been frustrated by the same lack of instances; as a stopgap,
here's
| one for a three-tuple. The pattern is pretty clear and can easily be
| extended to whatever size you'd like.
|
| tupCon = mkConstr 1 "(,,)" Prefix
|
| instance (Data a, Data b, Data c) => Data (a, b ,c) where
| gfoldl k z (a, b, c) = ((z (,,) `k` a) `k` b) `k` c
| toConstr _ = tupCon
| fromConstr _ = (undefined, undefined, undefined)
| dataTypeOf _ = mkDataType [tupCon]
|
| MR K P SCHUPKE