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)