X-Git-Url: https://git.stderr.nl/gitweb?a=blobdiff_plain;f=HighOrdAlu.hs;fp=HighOrdAlu.hs;h=39bf4d91ef7dbbe131354945f925ef9b7ba9262e;hb=de13e862545494042f299f4a894dcc3a2f771163;hp=6b11350ca951e059be3593298ae82d2b83853585;hpb=a5e07d9df1a573e83badefde9429e2630b79f916;p=matthijs%2Fmaster-project%2Fc%CE%BBash.git diff --git a/HighOrdAlu.hs b/HighOrdAlu.hs index 6b11350..39bf4d9 100644 --- a/HighOrdAlu.hs +++ b/HighOrdAlu.hs @@ -1,20 +1,9 @@ -{-# LANGUAGE TemplateHaskell, ScopedTypeVariables #-} +{-# LANGUAGE TemplateHaskell, ScopedTypeVariables, NoImplicitPrelude #-} module HighOrdAlu where import qualified Prelude as P -import Prelude hiding ( - null, length, head, tail, last, init, take, drop, (++), map, foldl, foldr, - zipWith, zip, unzip, concat, reverse, iterate ) -import Bits --- import Types -import Types.Data.Num.Ops -import Types.Data.Num.Decimal.Digits -import Types.Data.Num.Decimal.Ops -import Types.Data.Num.Decimal.Literals -import Data.Param.TFVec -import Data.RangedWord -import Data.SizedInt +import CLasH.HardwareTypes import CLasH.Translator.Annotations constant :: NaturalT n => e -> Op n e