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
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
|
package scala.tools.nsc.matching;
import scala.tools.nsc.util.Position;
/** PatternNode factory.
* we inherit the globals from PatternTool.
*/
trait PatternNodeCreator: (TransMatcher with PatternNodes) {
import global._;
def pSequencePat(pos: Int , tpe:Type , len:int) = {
//assert (tpe != null);
val sym = newVar(Position.FIRSTPOS, tpe);
//Console.println("pncrea::sequencePat sym.pos = "+sym.pos);
val node = new SequencePat(sym, len);
node.pos = pos;
node.tpe = tpe;
//Console.println("pncrea::sequencePat sym.pos = "+sym.pos);
node;
}
def pSeqContainerPat(pos: int, tpe: Type, seqpat:Tree ) = {
//assert (tpe != null);
val sym = newVar(Position.NOPOS, tpe);
val node = new SeqContainerPat(sym, seqpat);
node.pos = pos;
node.setType(tpe);
node;
}
def pDefaultPat(pos: int, tpe: Type) = {
//assert (tpe != null);
val node = new DefaultPat();
node.pos = pos;
node.setType(tpe);
node;
}
def pConstrPat(pos: int, tpe: Type) = {
//assert (tpe != null);
val node = new ConstrPat(newVar(pos, tpe));
node.pos = pos;
node.setType(tpe);
node;
}
def pConstantPat(pos: int, tpe: Type, value: Any /*AConstant*/ ) = {
//assert (tpe != null);
val node = new ConstantPat( value );
node.pos = pos;
node.setType(tpe);
node;
}
def pVariablePat(pos: int, tree:Tree) = {
//assert (tree.tpe != null);
val node = new VariablePat( tree );
node.pos = pos;
node.setType(tree.tpe);
node;
}
def pAltPat(pos: int, header:Header ) = {
val node = new AltPat(header);
node.pos = pos;
node.setType(header.getTpe());
node;
}
// factories
def pHeader(pos: int, tpe: Type, selector:Tree) = {
//assert (tpe != null);
val node = new Header(selector, null);
node.pos = pos;
node.setType(tpe);
node;
}
def pBody(pos: int) = {
val node = new Body(new Array[Array[ValDef]](0), new Array[Tree](0), new Array[Tree](0));
node.pos = pos;
node;
}
def pBody(pos: int, bound:Array[ValDef] , guard:Tree, body:Tree) = {
val node = new Body(Predef.Array[Array[ValDef]](bound), Predef.Array[Tree](guard), Predef.Array[Tree](body));
node.pos = pos;
node;
}
def newVar(pos: int, name: Name, tpe: Type): Symbol= {
/** hack: pos has special meaning*/
val sym = currentOwner.newVariable(pos, name);
//Console.println("patnodcre::newVar sym = "+sym+ "tpe = "+tpe);
sym.setInfo(tpe);
//System.out.println("PatternNodeCreator::newVar creates symbol "+sym);
//System.out.println("owner: "+sym.owner());
sym;
}
def newVar(pos: int, tpe: Type): Symbol = {
newVar(pos, cunit.fresh.newName("temp"), tpe);
}
}
|
