1 files changed, 1 insertions, 1 deletions
diff --git a/tests/Config.hs b/tests/Config.hs
index b37b727b..09e838cc 100644
--- a/tests/Config.hs
+++ b/tests/Config.hs
@@ -40,7 +40,7 @@ type ClientName = String
 instance Read PortNumber where
-  readsPrec = undefined
+  readsPrec = error "readsPrec"
 data ClientOpts = ClientOpts
  { peerPort   :: PortNumber  -- tcp port

diff --git a/tests/Config.hs b/tests/Config.hs index b37b727b..09e838cc 100644 --- a/tests/Config.hs +++ b/tests/Config.hs
@@ -40,7 +40,7 @@ type ClientName = String
40		40
41		41
42	instance Read PortNumber where	42	instance Read PortNumber where
43	readsPrec = undefined	43	readsPrec = error "readsPrec"
44		44
45	data ClientOpts = ClientOpts	45	data ClientOpts = ClientOpts
46	{ peerPort :: PortNumber -- tcp port	46	{ peerPort :: PortNumber -- tcp port