File tree Expand file tree Collapse file tree 13 files changed +3
-3348
lines changed Expand file tree Collapse file tree 13 files changed +3
-3348
lines changed Original file line number Diff line number Diff line change @@ -28,11 +28,6 @@ import qualified Type.Solve as Type
28
28
29
29
-- import System.IO.Unsafe (unsafePerformIO)
30
30
31
-
32
- -- @DEPRECATED for alpha12 release migration only
33
- import qualified Lamdera.Wire2.Core
34
- import qualified Lamdera.Wire2.Interfaces
35
-
36
31
import qualified Lamdera.Wire3.Core
37
32
import qualified Lamdera.Wire3.Interfaces
38
33
import qualified Lamdera.Wire3.Helpers as Lamdera.Wire
@@ -67,16 +62,14 @@ compile pkg ifaces modul = do
67
62
let modul_ =
68
63
modul
69
64
& Lamdera.Wire3.Interfaces. modifyModul pkg ifaces
70
- -- & Lamdera.Wire2.Interfaces.modifyModul pkg ifaces
71
65
-- moduleName = T.pack $ Data.Utf8.toChars $ Src.getName modul
72
66
73
67
-- () <- debugPassText "starting canonical" "" (pure ())
74
68
canonical0 <- canonicalize pkg ifaces modul_
75
69
-- () <- debugPassText "starting canonical2" moduleName (pure ())
76
70
77
- -- Add Canonical Wire gens, i.e. the `w2_ [en|de]code_TYPENAME` functions
71
+ -- Add Canonical Wire gens, i.e. the `w3_ [en|de]code_TYPENAME` functions
78
72
canonical2 <- Lamdera.Wire3.Core. addWireGenerations canonical0 pkg ifaces modul_
79
- -- canonical2 <- Lamdera.Wire2.Core.addWireGenerations canonical1 pkg ifaces modul_
80
73
81
74
-- () <- unsafePerformIO $ do
82
75
-- case (pkg, Src.getName modul) of
Original file line number Diff line number Diff line change @@ -264,12 +264,6 @@ Executable lamdera
264
264
Lamdera.Types
265
265
Lamdera.Update
266
266
Lamdera.Version
267
- Lamdera.Wire2.Core
268
- Lamdera.Wire2.Decoder
269
- Lamdera.Wire2.Encoder
270
- Lamdera.Wire2.Graph
271
- Lamdera.Wire2.Helpers
272
- Lamdera.Wire2.Interfaces
273
267
Lamdera.Wire3.Core
274
268
Lamdera.Wire3.Decoder
275
269
Lamdera.Wire3.Encoder
@@ -298,8 +292,7 @@ Executable lamdera
298
292
299
293
-- Lamdera Legacy --
300
294
Lamdera.Legacy
301
- -- Wire.Source
302
- -- Wire.Source2
295
+ -- Wire.Source3
303
296
304
297
-- Fusion
305
298
-- Fusion.Types
Original file line number Diff line number Diff line change @@ -128,7 +128,6 @@ decodeAndUpgradeFor migrationSequence nextVersion valueType = do
128
128
[text |
129
129
$nextVersion_ ->
130
130
decodeType $valueTypeInt version bytes T$nextVersion_.w3_decode_$valueType
131
- |> fallback (\_ -> decodeType $valueTypeInt version bytes T$nextVersion_.w2_decode_$valueType)
132
131
|> upgradeIsCurrent
133
132
|> otherwiseError
134
133
|]
@@ -262,7 +261,6 @@ migrationForType migrationSequence migrationsForVersion startVersion finalVersio
262
261
then
263
262
[text |
264
263
decodeType $valueTypeInt $finalVersion_ bytes T$finalVersion_.w3_decode_$tipe
265
- |> fallback (\_ -> decodeType $valueTypeInt $finalVersion_ bytes T$finalVersion_.w2_decode_$tipe)
266
264
|> upgradeSucceeds
267
265
|> otherwiseError
268
266
|]
@@ -278,7 +276,6 @@ migrationForType migrationSequence migrationsForVersion startVersion finalVersio
278
276
then
279
277
[text |
280
278
decodeType $valueTypeInt $startVersion_ bytes T$startVersion_.w3_decode_$tipe
281
- |> fallback (\_ -> decodeType $valueTypeInt $startVersion_ bytes T$startVersion_.w2_decode_$tipe)
282
279
$intermediateMigrationsFormatted
283
280
|> upgradeSucceeds
284
281
|> otherwiseError
You can’t perform that action at this time.
0 commit comments