From 39026b6682eaec2e750ff17da57584c01c53e594 Mon Sep 17 00:00:00 2001 From: Tim Wallet Date: Fri, 8 Mar 2024 10:29:14 +0100 Subject: [PATCH] removed unused code --- src/Clash/Lattice/ECP5/UART.hs | 7 ------- 1 file changed, 7 deletions(-) diff --git a/src/Clash/Lattice/ECP5/UART.hs b/src/Clash/Lattice/ECP5/UART.hs index 456ff545..8b586ae2 100644 --- a/src/Clash/Lattice/ECP5/UART.hs +++ b/src/Clash/Lattice/ECP5/UART.hs @@ -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)