Skip to content
This repository has been archived by the owner on Sep 6, 2024. It is now read-only.

Commit

Permalink
removed unused code
Browse files Browse the repository at this point in the history
  • Loading branch information
Tim Wallet committed Mar 8, 2024
1 parent 122a422 commit 39026b6
Showing 1 changed file with 0 additions and 7 deletions.
7 changes: 0 additions & 7 deletions src/Clash/Lattice/ECP5/UART.hs
Original file line number Diff line number Diff line change
Expand Up @@ -8,13 +8,6 @@ import Clash.Prelude
import Protocols
import Clash.Cores.UART

{-helper :: Maybe (PacketStreamM2S 1 ()) -> Maybe (BitVector 8)
helper Nothing = Nothing
helper (Just x) = case _last x of
Nothing -> Just (head $ _data x)
_ -> Nothing
-}

convert :: Fwd (PacketStream dom 1 ()) -> Signal dom (Maybe (BitVector 8))
convert = fmap $ fmap $ (head . _data)

Expand Down

0 comments on commit 39026b6

Please sign in to comment.