-
-
Notifications
You must be signed in to change notification settings - Fork 25
/
package.scala
88 lines (66 loc) · 2.69 KB
/
package.scala
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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
/*
* Copyright 2024 fs2-data Project
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
package fs2.data
package object mft {
def dsl[Guard, InTag, OutTag](build: MFTBuilder[Guard, InTag, OutTag] => Unit): MFT[Guard, InTag, OutTag] = {
val builder = new MFTBuilder[Guard, InTag, OutTag]
build(builder)
builder.build
}
def state[Guard, InTag, OutTag](args: Int, initial: Boolean = false)(implicit
builder: MFTBuilder[Guard, InTag, OutTag]): builder.StateBuilder = {
val q = builder.states.size
if (initial)
builder.initial = q
val st = new builder.StateBuilder(q, args)
builder.states += st
st
}
def any[Guard, InTag, OutTag](implicit builder: MFTBuilder[Guard, InTag, OutTag]): builder.Guardable =
builder.PatternBuilder.Any(None)
def aNode[Guard, InTag, OutTag](in: InTag)(implicit builder: MFTBuilder[Guard, InTag, OutTag]): builder.Guardable =
builder.PatternBuilder.Node(in, None)
def anyNode[Guard, InTag, OutTag](implicit builder: MFTBuilder[Guard, InTag, OutTag]): builder.Guardable =
builder.PatternBuilder.AnyNode(None)
def aLeaf[Guard, InTag, OutTag](in: InTag)(implicit builder: MFTBuilder[Guard, InTag, OutTag]): builder.Guardable =
builder.PatternBuilder.Leaf(in, None)
def anyLeaf[Guard, InTag, OutTag](implicit builder: MFTBuilder[Guard, InTag, OutTag]): builder.Guardable =
builder.PatternBuilder.AnyLeaf(None)
def epsilon[Guard, InTag, OutTag](implicit builder: MFTBuilder[Guard, InTag, OutTag]): builder.PatternBuilder =
builder.PatternBuilder.Epsilon
def eps: Rhs[Nothing] =
Rhs.Epsilon
def y(i: Int): Rhs[Nothing] =
Rhs.Param(i)
def x0: Forest =
Forest.Self
def x1: Forest =
Forest.First
def x2: Forest =
Forest.Second
def node[OutTag](out: OutTag)(children: Rhs[OutTag] = Rhs.Epsilon): Rhs[OutTag] =
Rhs.Node(out, children)
def copy[OutTag](children: Rhs[OutTag]): Rhs[OutTag] =
Rhs.CopyNode(children)
def leaf[OutTag](out: OutTag): Rhs[OutTag] =
Rhs.Leaf(out)
def default[OutTag](out: OutTag): Rhs[OutTag] =
Rhs.Default(out)
def copy: Rhs[Nothing] =
Rhs.CopyLeaf
def applyToLeaf[OutTag](f: OutTag => Either[String, OutTag]) =
Rhs.ApplyToLeaf(f)
}