File tree Expand file tree Collapse file tree 2 files changed +9
-4
lines changed Expand file tree Collapse file tree 2 files changed +9
-4
lines changed Original file line number Diff line number Diff line change @@ -11,7 +11,8 @@ run : Task {} _
11
11
run =
12
12
Stdout . line ! " Enter some numbers on different lines, then press Ctrl-D to sum them up."
13
13
14
- sum = Task . loop ! 0 addNumberFromStdin
14
+ startNum = 0
15
+ sum = Task . loop ! startNum addNumberFromStdin
15
16
16
17
Stdout . line ! " Sum: $( Num . toStr sum) "
17
18
Original file line number Diff line number Diff line change @@ -15,11 +15,15 @@ run =
15
15
startTime = Utc . now !
16
16
17
17
# Read the HELLO environment variable
18
- helloEnvVar =
18
+ helloEnvVarStateStr =
19
19
readEnvVar " HELLO"
20
- |> Task . map ! \msg -> if Str . isEmpty msg then " was empty" else " was set to $( msg) "
20
+ |> Task . map ! \envVarStr ->
21
+ if Str . isEmpty envVarStr then
22
+ " HELLO env var was empty."
23
+ else
24
+ " HELLO env var was set to $( envVarStr) ."
21
25
22
- Stdout . line ! " HELLO env var $( helloEnvVar ) "
26
+ Stdout . line ! helloEnvVarStateStr
23
27
24
28
# Read command line arguments
25
29
{ url, outputPath } = readArgs!
You can’t perform that action at this time.
0 commit comments