playground/clash/Overflow.hs

23 lines
431 B
Haskell

module OverflowExp where
import Clash.Prelude
topFn :: () -> () -> ((), Word)
--topFn _ _ = ((), 18446744073709551615)
topFn _ _ = ((), 18446744073709551616)
topEntity
:: Clock System
-> Reset System
-> Enable System
-> Signal System ()
-> Signal System Word
topEntity = exposeClockResetEnable $ mealy topFn ()
{-
// Outputs
, output wire [63:0] result
);
assign result = 64'd18446744073709551615;
-}