Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Remove legacy naive match-to-case compiler #3003

Merged
merged 1 commit into from
Sep 8, 2024
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 0 additions & 2 deletions src/Juvix/Compiler/Core/Data/TransformationId.hs
Original file line number Diff line number Diff line change
Expand Up @@ -17,7 +17,6 @@ data TransformationId
| UnrollRecursion
| ComputeTypeInfo
| MatchToCase
| NaiveMatchToCase
| EtaExpandApps
| DisambiguateNames
| CombineInfoTables
Expand Down Expand Up @@ -84,7 +83,6 @@ instance TransformationId' TransformationId where
LetRecLifting -> strLetRecLifting
TopEtaExpand -> strTopEtaExpand
MatchToCase -> strMatchToCase
NaiveMatchToCase -> strNaiveMatchToCase
EtaExpandApps -> strEtaExpandApps
IdentityTrans -> strIdentity
RemoveTypeArgs -> strRemoveTypeArgs
Expand Down
3 changes: 0 additions & 3 deletions src/Juvix/Compiler/Core/Data/TransformationId/Strings.hs
Original file line number Diff line number Diff line change
Expand Up @@ -32,9 +32,6 @@ strTopEtaExpand = "top-eta-expand"
strMatchToCase :: Text
strMatchToCase = "match-to-case"

strNaiveMatchToCase :: Text
strNaiveMatchToCase = "naive-match-to-case"

strEtaExpandApps :: Text
strEtaExpandApps = "eta-expand-apps"

Expand Down
2 changes: 0 additions & 2 deletions src/Juvix/Compiler/Core/Transformation.hs
Original file line number Diff line number Diff line change
Expand Up @@ -30,7 +30,6 @@ import Juvix.Compiler.Core.Transformation.LambdaLetRecLifting
import Juvix.Compiler.Core.Transformation.LetHoisting
import Juvix.Compiler.Core.Transformation.MatchToCase
import Juvix.Compiler.Core.Transformation.MoveApps
import Juvix.Compiler.Core.Transformation.NaiveMatchToCase qualified as Naive
import Juvix.Compiler.Core.Transformation.NatToPrimInt
import Juvix.Compiler.Core.Transformation.Normalize
import Juvix.Compiler.Core.Transformation.Optimize.CaseCallLifting
Expand Down Expand Up @@ -75,7 +74,6 @@ applyTransformations ts tbl = foldM (flip appTrans) tbl ts
ComputeTypeInfo -> return . computeTypeInfo
UnrollRecursion -> unrollRecursion
MatchToCase -> mapError (JuvixError @CoreError) . matchToCase
NaiveMatchToCase -> return . Naive.matchToCase
EtaExpandApps -> return . etaExpansionApps
DisambiguateNames -> return . disambiguateNames
CombineInfoTables -> return . combineInfoTables
Expand Down
326 changes: 0 additions & 326 deletions src/Juvix/Compiler/Core/Transformation/NaiveMatchToCase.hs

This file was deleted.

Loading
Loading