@@ -2,7 +2,6 @@ module Compiler.Backend exposing
2
2
( version
3
3
--
4
4
, Command(..)
5
- , InitFlags
6
5
, ReplFlags
7
6
, MakeFlags
8
7
, MakeOutput(..)
@@ -174,37 +173,22 @@ isCached permission platform envVars homeDir =
174
173
175
174
{-| Commands supported by the compiler blob.
176
175
177
- * `Init`: generate a gren.json and src directory in the current directory.
178
176
* `Repl`: run a REPL.
179
177
* `Make`: compile a project
180
178
* `Docs`: generate a docs.json file
181
- * `PackageInstall`: install dependencies
182
- * `PackageUninstall`: remove a dependency
183
- * `PackageOutdated`: get a list of outdated dependencies
184
179
* `PackageValide`: check if this package is ready to be deployed
185
180
* `PackageBump`: bump package version to next compatible semantic version
186
181
* `PackageDiff`: calculate the API-difference between this package and another version.
187
182
-}
188
183
type Command
189
- = Init InitFlags
190
- | Repl ReplFlags
184
+ = Repl ReplFlags
191
185
| Make MakeFlags
192
186
| Docs DocsFlags
193
- | PackageInstall (Maybe PackageName)
194
- | PackageUninstall PackageName
195
- | PackageOutdated
196
187
| PackageValidate
197
188
| PackageBump
198
189
| PackageDiff DiffArgs
199
190
200
191
201
- {-|-}
202
- type alias InitFlags =
203
- { package : Bool
204
- , platform : Platform
205
- }
206
-
207
-
208
192
{-|-}
209
193
type alias ReplFlags =
210
194
{ interpreter : Maybe String
@@ -304,14 +288,6 @@ encodeCommand options command =
304
288
commandEncoder : Bool -> (Path -> String) -> Command -> Json.Value
305
289
commandEncoder interactive pathToString command =
306
290
when command is
307
- Init flags ->
308
- Json.object
309
- [ { key = "command", value = Json.string "init" }
310
- , { key = "interactive", value = Json.bool interactive }
311
- , { key = "package", value = Json.bool flags.package }
312
- , { key = "platform", value = Platform.toJson flags.platform }
313
- ]
314
-
315
291
Repl flags ->
316
292
Json.object
317
293
[ { key = "command", value = Json.string "repl" }
@@ -347,25 +323,6 @@ commandEncoder interactive pathToString command =
347
323
, { key = "report-json", value = maybeToBool flags.report }
348
324
]
349
325
350
- PackageInstall maybePackage ->
351
- Json.object
352
- [ { key = "command", value = Json.string "packageInstall" }
353
- , { key = "interactive", value = Json.bool interactive }
354
- , { key = "package", value = maybeEncoder PackageName.toJson maybePackage }
355
- ]
356
-
357
- PackageUninstall package ->
358
- Json.object
359
- [ { key = "command", value = Json.string "packageUninstall" }
360
- , { key = "interactive", value = Json.bool interactive }
361
- , { key = "package", value = PackageName.toJson package }
362
- ]
363
-
364
- PackageOutdated ->
365
- Json.object
366
- [ { key = "command", value = Json.string "packageOutdated" }
367
- ]
368
-
369
326
PackageValidate ->
370
327
Json.object
371
328
[ { key = "command", value = Json.string "packageValidate" }
0 commit comments