fixup improve comment

IntersectMBO · Mar 2, 2020 · 9b2aa86 · 9b2aa86
1 parent 1acb1cb
commit 9b2aa86
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/ouroboros-consensus/ouroboros-consensus-test-infra/src/Test/ThreadNet/Network.hs b/ouroboros-consensus/ouroboros-consensus-test-infra/src/Test/ThreadNet/Network.hs
@@ -128,7 +128,11 @@ data ForgeEbbEnv blk = ForgeEbbEnv
          -- EBB predecessor's hash
       -> blk
   , ebbSlotBefore :: SlotNo -> SlotNo
-    -- ^ the slot of the most recent expected that precedes the given slot
+    -- ^ Given the slot of a proper block B, returns the slot of the latest
+    -- expected EBB that should precede B.
+    --
+    -- Note that this is pure, unlike 'EpochInfo', which would usually be used
+    -- for this.
   }
 
 -- | How to rekey a node with a fresh operational key