@@ -311,12 +311,6 @@ instance Binary Name where
311 return (SymRef x1)
311 return (SymRef x1)
312 _ -> error "Corrupted binary data for Name"
312 _ -> error "Corrupted binary data for Name"
314−instance Binary T.Text where
315− put x = put (E.encodeUtf8 x)
317− return $!! (E.decodeUtf8 x)
320instance Binary SpecialName where
314instance Binary SpecialName where
322 = case x of
316 = case x of