summaryrefslogtreecommitdiff
path: root/dhall/src/error/text/MustMergeUnion.txt
blob: 68df70cabffeeb2266fd373ed2070dc0290dfa21 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Explanation: You can ❰merge❱ the alternatives of a union using a record with one
handler per alternative, like this:


    ┌─────────────────────────────────────────────────────────────────────┐
    │     let union    = < Left = +2 | Right : Bool >                     │
    │ in  let handlers = { Left = Natural/even, Right = λ(x : Bool) → x } │
    │ in  merge handlers union : Bool                                     │
    └─────────────────────────────────────────────────────────────────────┘


... but the second argument to ❰merge❱ must be a union and not some other type.

For example, the following expression is $_NOT valid:


    ┌──────────────────────────────────────────┐
    │ let handlers = { Foo = λ(x : Bool) → x } │
    │ in  merge handlers True : True           │
    └──────────────────────────────────────────┘
                         ⇧
                         Invalid: ❰True❱ isn't a union


You tried to ❰merge❱ this expression:

↳ $txt0

... which is not a union, but is actually a value of type:

↳ $txt1