[Haskell-cafe] A Modest Records Proposal

Kyle Murphy orclev at gmail.com
Tue Apr 3 01:34:16 CEST 2012

On Mon, Apr 2, 2012 at 16:30, Evan Laforge <qdunkan at gmail.com> wrote:
> On Mon, Apr 2, 2012 at 5:41 AM, Michael Snoyman <michael at snoyman.com>
>> On Mon, Apr 2, 2012 at 3:38 PM, Alp Mestanogullari <alpmestan at gmail.com>
>>> Lesson learned: for next year, write a Haskell program that tells if a
>>> -cafe thread or reddit discussion is a April Fool's joke or not.
>> import Data.Time
>> main = do
>>    now <- getCurrentTime
>>    let (_, month, day) = toGregorian $ utctDay now
>>    putStrLn $
>>        if month == 4 && day == 1
>>            then "It's a joke"
>>            else "It's real"
> My strategy next year will be to not read any email on the 1st.  I'll
> just wait until the 2nd to read it all.  Foolproof!

Hmm, nope, still failed. I was following along until it got to HERP at
which point I scrolled back up to see that it was sent on the 1st and then
continued to read and LOL.

-R. Kyle Murphy
Curiosity was framed, Ignorance killed the cat.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://www.haskell.org/pipermail/haskell-cafe/attachments/20120402/f0ebbc77/attachment.htm>

More information about the Haskell-Cafe mailing list