23 lines
431 B
Haskell
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;
|
|
-}
|