File tree Expand file tree Collapse file tree 3 files changed +8
-7
lines changed Expand file tree Collapse file tree 3 files changed +8
-7
lines changed Original file line number Diff line number Diff line change 23
23
],
24
24
"gren-version" : " 0.5.0 <= v < 0.6.0" ,
25
25
"dependencies" : {
26
- "gren-lang/core" : " local:../core " ,
27
- "gren-lang/node" : " local:../node "
26
+ "gren-lang/core" : " 6.0.1 <= v < 7.0.0 " ,
27
+ "gren-lang/node" : " 5.0.0 <= v < 6.0.0 "
28
28
}
29
29
}
Original file line number Diff line number Diff line change @@ -104,7 +104,7 @@ downloadUrl platform cpuArch =
104
104
105
105
{-| Downlod the compiler blob.
106
106
-}
107
- download : HttpClient.Permission -> String -> Task HttpClient.Error (HttpClient.Response Bytes)
107
+ download : HttpClient.Permission -> String -> Task ( HttpClient.Error Bytes) (HttpClient.Response Bytes)
108
108
download permission url =
109
109
HttpClient.get url
110
110
|> HttpClient.expectBytes
@@ -298,7 +298,7 @@ type alias RunOptions msg =
298
298
{ useColor : Bool
299
299
, compilerPath : Path
300
300
, pathToString : (Path -> String)
301
- , connection : ChildProcess.Connection msg
301
+ , onInit : { processId : Process.Id, streams : Maybe ChildProcess.StreamIO } -> msg
302
302
, onComplete : (Int -> msg)
303
303
}
304
304
@@ -319,10 +319,11 @@ run permission options =
319
319
permission
320
320
(options.pathToString options.compilerPath)
321
321
[]
322
- { ( ChildProcess.defaultSpawnOptions options.connection options.onComplete )
322
+ { ( ChildProcess.defaultSpawnOptions options.onInit options.onComplete )
323
323
| shell = NoShell
324
324
, environmentVariables =
325
325
ChildProcess.MergeWithEnvironmentVariables colorEnvVar
326
+ , connection = ChildProcess.External
326
327
}
327
328
328
329
Original file line number Diff line number Diff line change @@ -144,7 +144,7 @@ update fsPerm msg model =
144
144
{ path = path
145
145
, model = { model | locks = Set.remove (Path.toPosixString lockPath) model.locks }
146
146
, command =
147
- FileSystem.remove fsPerm { recursive = True } lockPath
147
+ FileSystem.remove fsPerm { recursive = True, ignoreErrors = False } lockPath
148
148
|> Task.onError (\err -> Task.succeed lockPath)
149
149
|> Task.execute
150
150
}
@@ -163,7 +163,7 @@ update fsPerm msg model =
163
163
LockMetaCheck { path, attempt, result = Ok { time, meta } } ->
164
164
if Time.posixToMillis time - Time.posixToMillis meta.lastAccessed > 5000 then
165
165
-- Lock is stale, let's try again
166
- FileSystem.remove fsPerm { recursive = True } path
166
+ FileSystem.remove fsPerm { recursive = True, ignoreErrors = False } path
167
167
|> Task.onError (\_ -> Task.succeed path)
168
168
|> Task.perform (\_ -> Lock { path = fromLockPath path, attempt = attempt + 1 })
169
169
|> Working
You can’t perform that action at this time.
0 commit comments