This repository was archived by the owner on Aug 18, 2020. It is now read-only.
File tree Expand file tree Collapse file tree 1 file changed +11
-3
lines changed
src/lib/Ouroboros/Byron/Proxy/Genesis Expand file tree Collapse file tree 1 file changed +11
-3
lines changed Original file line number Diff line number Diff line change 1+ {-|
2+ Module : Ouroboros.Byron.Proxy.Genesis.Convert
3+ Description : Conversion of legacy cardano-sl genesis configuration.
4+
5+ cardano-byron-proxy must use legacy cardano-sl genesis configuration in order
6+ to run the Byron side, and must also use a similar configuration to set up
7+ the Shelley side. The definitions in this module convert values of legacy Byron
8+ configuration types (cardano-sl) into their corresponding new Shelley
9+ types (cardano-ledger).
10+ -}
11+
112{-# LANGUAGE ScopedTypeVariables #-}
213{-# LANGUAGE GADTSyntax #-}
314{-# LANGUAGE OverloadedStrings #-}
819{-# LANGUAGE ApplicativeDo #-}
920{-# LANGUAGE PatternSynonyms #-}
1021
11- {-# LANGUAGE TypeFamilies #-}
12-
1322module Ouroboros.Byron.Proxy.Genesis.Convert where
1423
1524import Data.Coerce (coerce )
@@ -196,7 +205,6 @@ convertProtocolParameters bvd = Cardano.ProtocolParameters
196205 , Cardano. ppUnlockStakeEpoch = convertEpochIndex (CSL. bvdUnlockStakeEpoch bvd)
197206 }
198207
199-
200208convertGenesisSpec :: CSL. GenesisSpec -> Cardano. GenesisSpec
201209convertGenesisSpec gspec = Cardano. UnsafeGenesisSpec
202210 { Cardano. gsAvvmDistr = convertAvvmDistr (CSL. gsAvvmDistr gspec)
You can’t perform that action at this time.
0 commit comments