SmallSense__SmalltalkInferencerParameters.st
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--
Package renamed to stx:goodies/smallsense
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
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
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     2
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     3
"{ NameSpace: SmallSense }"
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     4
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     5
SharedPool subclass:#SmalltalkInferencerParameters
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     6
	instanceVariableNames:''
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     7
	classVariableNames:'UnionTypeMaxSize UnionTypeReduceThreshold'
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     8
	poolDictionaries:''
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     9
	category:'SmallSense-Smalltalk-Types-Inference'
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    10
!
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    11
192
f27ce6dac101 Initial support for completing selector parts.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 179
diff changeset
    12
179
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    13
!SmalltalkInferencerParameters class methodsFor:'initialization'!
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    14
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    15
initialize
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    16
    "Invoked at system start or when the class is dynamically loaded."
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    17
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    18
    "/ please change as required (and remove this comment)
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    19
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    20
    UnionTypeMaxSize := 15.
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    21
    UnionTypeReduceThreshold := 5.
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    22
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    23
    "Modified: / 01-03-2014 / 23:23:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    24
! !
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    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
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    33
e444be9de40a Improved type inference.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    34
SmalltalkInferencerParameters initialize!