author | Jan Vrany <jan.vrany@fit.cvut.cz> |
Wed, 09 Jul 2014 12:06:40 +0100 | |
changeset 249 | 8bc64027b189 |
parent 192 | f27ce6dac101 |
child 252 | feba6ee5c814 |
permissions | -rw-r--r-- |
249
8bc64027b189
Package renamed to stx:goodies/smallsense
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
192
diff
changeset
|
1 |
"{ Package: 'stx:goodies/smallsense' }" |
179 | 2 |
|
3 |
"{ NameSpace: SmallSense }" |
|
4 |
||
5 |
SharedPool subclass:#SmalltalkInferencerParameters |
|
6 |
instanceVariableNames:'' |
|
7 |
classVariableNames:'UnionTypeMaxSize UnionTypeReduceThreshold' |
|
8 |
poolDictionaries:'' |
|
9 |
category:'SmallSense-Smalltalk-Types-Inference' |
|
10 |
! |
|
11 |
||
192
f27ce6dac101
Initial support for completing selector parts.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
179
diff
changeset
|
12 |
|
179 | 13 |
!SmalltalkInferencerParameters class methodsFor:'initialization'! |
14 |
||
15 |
initialize |
|
16 |
"Invoked at system start or when the class is dynamically loaded." |
|
17 |
||
18 |
"/ please change as required (and remove this comment) |
|
19 |
||
20 |
UnionTypeMaxSize := 15. |
|
21 |
UnionTypeReduceThreshold := 5. |
|
22 |
||
23 |
"Modified: / 01-03-2014 / 23:23:03 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
24 |
! ! |
|
25 |
||
192
f27ce6dac101
Initial support for completing selector parts.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
179
diff
changeset
|
26 |
!SmalltalkInferencerParameters class methodsFor:'documentation'! |
f27ce6dac101
Initial support for completing selector parts.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
179
diff
changeset
|
27 |
|
f27ce6dac101
Initial support for completing selector parts.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
179
diff
changeset
|
28 |
version_HG |
f27ce6dac101
Initial support for completing selector parts.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
179
diff
changeset
|
29 |
|
f27ce6dac101
Initial support for completing selector parts.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
179
diff
changeset
|
30 |
^ '$Changeset: <not expanded> $' |
f27ce6dac101
Initial support for completing selector parts.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
179
diff
changeset
|
31 |
! ! |
f27ce6dac101
Initial support for completing selector parts.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
179
diff
changeset
|
32 |
|
179 | 33 |
|
34 |
SmalltalkInferencerParameters initialize! |