Merge branch 'dnadales/549-upireg-traces-generator' of github.com:inp…

…ut-output-hk/cardano-ledger-specs into dnadales/549-upireg-traces-generator
IntersectMBO · Jun 19, 2019 · 6a4a11e · 6a4a11e
2 parents daae817 + c0d010e
commit 6a4a11e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/byron/ledger/executable-spec/src/Ledger/Update.hs b/byron/ledger/executable-spec/src/Ledger/Update.hs
@@ -888,7 +888,7 @@ instance HasTrace UPIREG where
       idGen :: Gen UpId
       idGen = do
         -- Chose an increment for the maximum version seen in the update
-        -- proposal id's.
+        -- proposal IDs.
         inc <- Gen.integral (Range.constant 1 10)
         case Set.toDescList $ dom rpus of
           [] -> UpId <$> Gen.element [0 .. inc]