Skip to content

Commit

Permalink
saw-core-coq: Delete duplicate sawCoreScaffoldingModule definition
Browse files Browse the repository at this point in the history
The `SpecialTreatment` module had two entirely duplicate definitions
(`sawCoreScaffoldingModule` and `sawDefinitionsModule`) referring to the
`SAWCoreScaffolding` module. Let's delete the former in favor of the latter,
which is more widely used.
  • Loading branch information
RyanGlScott committed Dec 13, 2022
1 parent 0c699f3 commit 2e268b6
Showing 1 changed file with 3 additions and 6 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -211,9 +211,6 @@ sawVectorDefinitionsModule (TranslationConfiguration {..}) =
cryptolPrimitivesModule :: ModuleName
cryptolPrimitivesModule = mkModuleName ["CryptolPrimitivesForSAWCore"]

sawCoreScaffoldingModule :: ModuleName
sawCoreScaffoldingModule = mkModuleName ["SAWCoreScaffolding"]

preludeExtraModule :: ModuleName
preludeExtraModule = mkModuleName ["SAWCorePreludeExtra"]

Expand Down Expand Up @@ -246,7 +243,7 @@ sawCorePreludeSpecialTreatmentMap configuration =
Map.fromList $

-- sawLet
[ ("sawLet", mapsTo sawCoreScaffoldingModule "sawLet_def") ]
[ ("sawLet", mapsTo sawDefinitionsModule "sawLet_def") ]

-- Unsafe SAW features
++
Expand Down Expand Up @@ -363,8 +360,8 @@ sawCorePreludeSpecialTreatmentMap configuration =
[ ("divModNat", mapsTo sawDefinitionsModule "divModNat")
, ("Nat", mapsTo datatypesModule "nat")
, ("widthNat", mapsTo sawDefinitionsModule "widthNat")
, ("Zero", mapsTo sawCoreScaffoldingModule "Zero")
, ("Succ", mapsTo sawCoreScaffoldingModule "Succ")
, ("Zero", mapsTo sawDefinitionsModule "Zero")
, ("Succ", mapsTo sawDefinitionsModule "Succ")
]

-- Vectors
Expand Down

0 comments on commit 2e268b6

Please sign in to comment.