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
|
+ PatternProxy {
// like asCompileString, but with full source etc.
asCode {
var mykey = this.key.asCompileString;
var str; str = "" ++ this.class.name ++ "(";
if(source.isNil or: { source == this.class.default }) {
str = str ++ mykey;
} {
str = str ++ this.repositoryArgs.asCompileString.drop(1).drop(-1);
};
str = str ++ ")";
if(this.envir.notNil and: { this.envir.notEmpty }) {
str = str ++ ".set(" ++
this.envir.asKeyValuePairs.asCompileString.drop(1).drop(-1) ++ ")"
};
str = str ++ ";"
^str
}
}
+ Tdef {
printOn { |stream|
^this.storeOn(stream);
}
}
+ Pdef {
printOn { |stream|
^this.storeOn(stream);
}
}
+ Pdefn {
printOn { |stream|
^this.storeOn(stream);
}
}
|
