From 22f93053a78ac9b931cc51f8dec07539ad384ec3 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Wed, 18 Jan 2006 10:58:15 +0000
Subject: [PATCH] [project @ 2006-01-18 10:58:15 by simonmar] Remove dead
 error

(darcs patch from Ian Lynagh)
---
 ghc/compiler/utils/Binary.hs |    1 -
 1 file changed, 1 deletion(-)

diff --git a/ghc/compiler/utils/Binary.hs b/ghc/compiler/utils/Binary.hs
index cdb9206..7a1ca51 100644
--- a/ghc/compiler/utils/Binary.hs
+++ b/ghc/compiler/utils/Binary.hs
@@ -750,7 +750,6 @@ instance Binary FastString where
 	   writeIORef j_r (j+1)
 	   writeIORef out_r (addToUFM out uniq (j,f))
     }
-  put_ bh s = error ("Binary.put_(FastString): " ++ show (unpackFS s))
 
   get bh = do 
 	j <- get bh
-- 
1.7.10.4