Expose hLit and oLit from the Prelude

Responds to: #2505 (comment)
clash-lang · Jul 30, 2023 · 0b2660f · 0b2660f
1 parent 35da69b
commit 0b2660f
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 2 deletions.
diff --git a/clash-prelude/src/Clash/Sized/BitVector.hs b/clash-prelude/src/Clash/Sized/BitVector.hs
@@ -24,6 +24,8 @@ module Clash.Sized.BitVector
   , maxIndex#
     -- ** Construction
   , bLit
+  , hLit
+  , oLit
     -- ** Concatenation
   , (++#)
     -- * Modification

diff --git a/clash-prelude/tests/Clash/Tests/BitVector.hs b/clash-prelude/tests/Clash/Tests/BitVector.hs
@@ -27,8 +27,8 @@ import qualified Test.Tasty.QuickCheck as Q
 import Control.Applicative (liftA2)
 #endif
 import Clash.Prelude
-  (Bit, high, low, bitPattern, type (<=), type (-), natToInteger, msb)
-import Clash.Sized.Internal.BitVector (BitVector (..), bLit, hLit, oLit)
+  (Bit, high, low, bitPattern, type (<=), type (-), natToInteger, msb, bLit, hLit, oLit)
+import Clash.Sized.Internal.BitVector (BitVector (..))
 
 import Clash.Tests.SizedNum