Ticket #92 (new defect)

Opened 4 years ago

Strict record fields aren't demanded

Reported by: guest Owned by: nobody
Priority: major Milestone:
Component: hugs Version: 200609
Keywords: Cc:

Description

Given

data S = S { a :: Int, b :: ! Int }

In GHCi:

*Main> a (S { a = 0, b = 1 })
0
*Main> a (S { a = 0, b = undefined })
*** Exception: Prelude.undefined

In Hugs:

Main> a (S { a = 0, b = 1 })
0
Main> a (S { a = 0, b = undefined })
0

Bug reported by Geraint Jones

Note: See TracTickets for help on using tickets.