On Jul 13, 2007, at 16:59 , Thomas Conway wrote:
case re of
False -> writeTVar m Nothing
True -> writeTVar p Empty
> uncurry writeTVar $
> if re then (p,Empty) else (m,Nothing)
case v of
Nothing -> return True
Just _ -> return False
> return (isJust v)
--
brandon s. allbery [solaris,freebsd,perl,pugs,haskell] [EMAIL PROTECTED]
system administrator [openafs,heimdal,too many hats] [EMAIL PROTECTED]
electrical and computer engineering, carnegie mellon university KF8NH
_______________________________________________
Haskell-Cafe mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/haskell-cafe