CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Tue, 16 Sep 2014 11:11:21 +0100
changeset 670 f49ac58dd32c
parent 656 a95284467938
child 671 ad1e0393231a
permissions -rw-r--r--
Fixes / improvements in testcase generatoris, update to new API.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
565
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     1
"{ Package: 'jn:refactoring_custom' }"
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     2
636
a7f9fcc82017 rename CustomCodeGeneratorTestCaseCodeGenerator to CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator and change its implementation to the new naming
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 634
diff changeset
     3
CustomTestCaseCodeGenerator subclass:#CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator
565
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     4
	instanceVariableNames:''
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     5
	classVariableNames:''
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     6
	poolDictionaries:''
656
a95284467938 move all code generators to category Interface-Refactoring-Custom-Generators
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 646
diff changeset
     7
	category:'Interface-Refactoring-Custom-Generators'
565
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     8
!
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     9
636
a7f9fcc82017 rename CustomCodeGeneratorTestCaseCodeGenerator to CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator and change its implementation to the new naming
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 634
diff changeset
    10
a7f9fcc82017 rename CustomCodeGeneratorTestCaseCodeGenerator to CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator and change its implementation to the new naming
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 634
diff changeset
    11
!CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator class methodsFor:'accessing-presentation'!
565
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    12
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    13
description
636
a7f9fcc82017 rename CustomCodeGeneratorTestCaseCodeGenerator to CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator and change its implementation to the new naming
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 634
diff changeset
    14
    ^ 'Generate CodeGeneratorOrRefactoringTestCase subclass for selected classes (code generators/refactorings)'
565
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    15
636
a7f9fcc82017 rename CustomCodeGeneratorTestCaseCodeGenerator to CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator and change its implementation to the new naming
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 634
diff changeset
    16
    "Modified: / 23-08-2014 / 19:50:52 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
565
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    17
!
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    18
628
6f639016753b Sort generators or refactorings by their group.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 592
diff changeset
    19
group
6f639016753b Sort generators or refactorings by their group.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 592
diff changeset
    20
    "Returns a collection strings describing a group to which
6f639016753b Sort generators or refactorings by their group.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 592
diff changeset
    21
     receiver belongs. A groups may be nested hence the array of
6f639016753b Sort generators or refactorings by their group.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 592
diff changeset
    22
     strings. For example for subgroup 'Accessors' in group 'Generators'
6f639016753b Sort generators or refactorings by their group.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 592
diff changeset
    23
     this method should return #('Generators' 'Accessors')."
6f639016753b Sort generators or refactorings by their group.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 592
diff changeset
    24
6f639016753b Sort generators or refactorings by their group.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 592
diff changeset
    25
    "/ By default return an empty array which means the item will appear
6f639016753b Sort generators or refactorings by their group.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 592
diff changeset
    26
    "/ in top-level group.
6f639016753b Sort generators or refactorings by their group.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 592
diff changeset
    27
    ^ #('Generators')
6f639016753b Sort generators or refactorings by their group.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 592
diff changeset
    28
6f639016753b Sort generators or refactorings by their group.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 592
diff changeset
    29
    "Created: / 22-08-2014 / 18:50:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
6f639016753b Sort generators or refactorings by their group.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 592
diff changeset
    30
!
6f639016753b Sort generators or refactorings by their group.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 592
diff changeset
    31
565
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    32
label
628
6f639016753b Sort generators or refactorings by their group.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 592
diff changeset
    33
    ^ 'New Code Generator Testcase'
565
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    34
636
a7f9fcc82017 rename CustomCodeGeneratorTestCaseCodeGenerator to CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator and change its implementation to the new naming
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 634
diff changeset
    35
    "Modified: / 23-08-2014 / 19:50:58 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
628
6f639016753b Sort generators or refactorings by their group.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 592
diff changeset
    36
    "Modified: / 22-08-2014 / 18:50:50 / Jan Vrany <jan.vrany@fit.cvut.cz>"
565
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    37
! !
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    38
670
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    39
!CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator class methodsFor:'queries'!
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    40
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    41
availableInContext:aCustomContext 
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    42
    | classes |
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    43
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    44
    classes := aCustomContext selectedClasses.
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    45
    ^ classes notEmpty 
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    46
        and:[ classes allSatisfy: [:e | e inheritsFrom: CustomCodeGeneratorOrRefactoring ] ].
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    47
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    48
    "Created: / 15-09-2014 / 15:19:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    49
! !
565
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    50
670
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    51
!CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator methodsFor:'accessing - defaults'!
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    52
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    53
defaultTestSuperName
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    54
    ^ 'CustomCodeGeneratorOrRefactoringTestCase'
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    55
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    56
    "Created: / 16-09-2014 / 10:32:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    57
! !
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    58
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    59
!CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator methodsFor:'executing - private'!
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    60
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    61
generateTestCaseCodeFor:aTestClass forClassUnderTest:aClass 
565
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    62
    | source className |
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    63
670
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    64
    super generateTestCaseCodeFor:aTestClass forClassUnderTest:aClass.
592
25f7fff0dc9e fix class name retrieving in test case code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 591
diff changeset
    65
    className := aClass theNonMetaClass name.
565
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    66
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    67
    source := 'test_code_generated
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    68
    | expectedSource |
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    69
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    70
    expectedSource := ''instanceVariable
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    71
    ^ instanceVariable''.
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    72
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    73
    self executeGeneratorInContext: #classWithInstanceVariable.
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    74
    self assertMethodSource: expectedSource atSelector: #instanceVariable'.
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    75
634
d77d9a7561be move refactoryBuilder and codeBuilder to CustomCodeGeneratorOrRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 592
diff changeset
    76
    codeBuilder
565
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    77
        class: aTestClass;
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    78
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    79
        protocol: 'tests';
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    80
        source: source;
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    81
        createMethod;
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    82
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    83
        protocol: 'accessing';
636
a7f9fcc82017 rename CustomCodeGeneratorTestCaseCodeGenerator to CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator and change its implementation to the new naming
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 634
diff changeset
    84
        source: 'generatorOrRefactoring
565
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    85
    ^ `className new';
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    86
        replace: '`className' with: className asString;
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    87
        createMethod
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    88
670
f49ac58dd32c Fixes / improvements in testcase generatoris, update to new API.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 656
diff changeset
    89
    "Created: / 16-09-2014 / 10:40:58 / Jan Vrany <jan.vrany@fit.cvut.cz>"
565
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    90
! !
e80ce770e237 CustomTestCaseCodeGenerator made as abstract to support multiple implementations of TestCase generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    91
636
a7f9fcc82017 rename CustomCodeGeneratorTestCaseCodeGenerator to CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator and change its implementation to the new naming
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 634
diff changeset
    92
!CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator class methodsFor:'documentation'!
a7f9fcc82017 rename CustomCodeGeneratorTestCaseCodeGenerator to CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator and change its implementation to the new naming
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 634
diff changeset
    93
a7f9fcc82017 rename CustomCodeGeneratorTestCaseCodeGenerator to CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator and change its implementation to the new naming
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 634
diff changeset
    94
version_HG
a7f9fcc82017 rename CustomCodeGeneratorTestCaseCodeGenerator to CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator and change its implementation to the new naming
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 634
diff changeset
    95
a7f9fcc82017 rename CustomCodeGeneratorTestCaseCodeGenerator to CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator and change its implementation to the new naming
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 634
diff changeset
    96
    ^ '$Changeset: <not expanded> $'
a7f9fcc82017 rename CustomCodeGeneratorTestCaseCodeGenerator to CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator and change its implementation to the new naming
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 634
diff changeset
    97
! !
a7f9fcc82017 rename CustomCodeGeneratorTestCaseCodeGenerator to CustomCodeGeneratorOrRefactoringTestCaseCodeGenerator and change its implementation to the new naming
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 634
diff changeset
    98