Add more context to why mkProtocolInfo fails on runtime in db-analyse…

…r for Alonzo
IntersectMBO · Sep 16, 2021 · 270e087 · 270e087
1 parent bec44a4
commit 270e087
Showing 1 changed file with 5 additions and 3 deletions.
diff --git a/ouroboros-consensus-cardano/tools/db-analyser/Block/Alonzo.hs b/ouroboros-consensus-cardano/tools/db-analyser/Block/Alonzo.hs
@@ -46,9 +46,11 @@ instance HasProtocolInfo (ShelleyBlock StandardAlonzo) where
           , metavar "PATH"
           ])
 
-  -- | Not implemented because we don't anticipate running
-  -- an 'Alonzo only' chain.
-  mkProtocolInfo _ = undefined
+  -- | This function would only be used if we run an
+  -- Alonzo only chain. This should be dead code really.
+  mkProtocolInfo _ =
+    error $ "Not implemented because we don't "
+         <> "anticipate running an 'Alonzo only' chain."
 
 type AlonzoBlockArgs = Args (ShelleyBlock StandardAlonzo)