refactoring_custom/SmallSense__CustomSimpleAccessMethodsCodeGeneratorTests.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Mon, 13 Nov 2017 22:26:12 -0300
changeset 1060 af3a048f9618
parent 833 297eb38e4eee
child 1072 a44c741ee5ef
permissions -rw-r--r--
Fixed xompletion of instance variables in inspector
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
829
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
     1
"
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
     2
A custom code generation and refactoring support for Smalltalk/X
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
     3
Copyright (C) 2013-2015 Jakub Nesveda
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
     4
Copyright (C) 2013-now  Jan Vrany
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
     5
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
     6
This library is free software; you can redistribute it and/or
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
     7
modify it under the terms of the GNU Lesser General Public
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
     8
License as published by the Free Software Foundation; either
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
     9
version 2.1 of the License.
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    10
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    11
This library is distributed in the hope that it will be useful,
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    12
but WITHOUT ANY WARRANTY; without even the implied warranty of
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    13
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    14
Lesser General Public License for more details.
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    15
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    16
You should have received a copy of the GNU Lesser General Public
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    17
License along with this library; if not, write to the Free Software
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    18
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    19
"
833
297eb38e4eee Package jn:refactoring_custom renamed to stx:goodies/smallsense/refactoring_custom
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 830
diff changeset
    20
"{ Package: 'stx:goodies/smallsense/refactoring_custom' }"
601
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    21
830
1a88f5e65fe2 Classes moved to namespace SmallSense
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 829
diff changeset
    22
"{ NameSpace: SmallSense }"
803
95cdac772759 Fixed failing tests caused by new STX release
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 734
diff changeset
    23
634
d77d9a7561be move refactoryBuilder and codeBuilder to CustomCodeGeneratorOrRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 601
diff changeset
    24
CustomCodeGeneratorOrRefactoringTestCase subclass:#CustomSimpleAccessMethodsCodeGeneratorTests
601
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    25
	instanceVariableNames:''
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    26
	classVariableNames:''
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    27
	poolDictionaries:''
734
f8b10fc1ab0e update TestCase categories with respect to their tested subjects ( classes )
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 634
diff changeset
    28
	category:'Interface-Refactoring-Custom-Generators-Tests'
601
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    29
!
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    30
829
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    31
!CustomSimpleAccessMethodsCodeGeneratorTests class methodsFor:'documentation'!
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    32
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    33
copyright
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    34
"
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    35
A custom code generation and refactoring support for Smalltalk/X
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    36
Copyright (C) 2013-2015 Jakub Nesveda
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    37
Copyright (C) 2013-now  Jan Vrany
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    38
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    39
This library is free software; you can redistribute it and/or
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    40
modify it under the terms of the GNU Lesser General Public
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    41
License as published by the Free Software Foundation; either
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    42
version 2.1 of the License.
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    43
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    44
This library is distributed in the hope that it will be useful,
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    45
but WITHOUT ANY WARRANTY; without even the implied warranty of
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    46
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    47
Lesser General Public License for more details.
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    48
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    49
You should have received a copy of the GNU Lesser General Public
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    50
License along with this library; if not, write to the Free Software
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    51
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    52
"
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    53
! !
59bfd92fcef0 Test fixes (all test pass now)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 803
diff changeset
    54
601
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    55
!CustomSimpleAccessMethodsCodeGeneratorTests methodsFor:'accessing'!
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    56
634
d77d9a7561be move refactoryBuilder and codeBuilder to CustomCodeGeneratorOrRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 601
diff changeset
    57
generatorOrRefactoring
601
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    58
    ^ CustomSimpleAccessMethodsCodeGenerator new
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    59
! !
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    60
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    61
!CustomSimpleAccessMethodsCodeGeneratorTests methodsFor:'tests'!
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    62
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    63
test_access_methods_generated_with_comments
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    64
    | expectedGetterSource expectedSetterSource |
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    65
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    66
    userPreferences
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    67
        generateCommentsForGetters: true;
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    68
        generateCommentsForSetters: true.
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    69
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    70
    expectedGetterSource := 'instanceVariable
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    71
    "return the instance variable ''instanceVariable'' (automatically generated)"
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    72
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    73
    ^ instanceVariable'.
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    74
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    75
    expectedSetterSource := 'instanceVariable:something
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    76
    "set the value of the instance variable ''instanceVariable'' (automatically generated)"
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    77
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    78
    instanceVariable := something'.
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    79
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    80
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    81
    self executeGeneratorInContext: #classWithInstanceVariable.
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    82
    self assertMethodSource: expectedGetterSource atSelector: #instanceVariable.
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    83
    self assertMethodSource: expectedSetterSource atSelector: #instanceVariable:
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    84
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    85
    "Created: / 08-07-2014 / 13:28:26 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    86
    "Modified: / 08-07-2014 / 16:02:01 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    87
!
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    88
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    89
test_access_methods_generated_without_comments
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    90
    | expectedGetterSource expectedSetterSource |
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    91
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    92
    userPreferences
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    93
        generateCommentsForGetters: false;
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    94
        generateCommentsForSetters: false.
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    95
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    96
    expectedGetterSource := 'instanceVariable
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    97
    ^ instanceVariable'.
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    98
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    99
    expectedSetterSource := 'instanceVariable:something
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   100
    instanceVariable := something'.
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   101
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   102
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   103
    self executeGeneratorInContext: #classWithInstanceVariable.
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   104
    self assertMethodSource: expectedGetterSource atSelector: #instanceVariable.
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   105
    self assertMethodSource: expectedSetterSource atSelector: #instanceVariable:
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   106
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   107
    "Created: / 08-07-2014 / 16:59:10 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   108
! !
76c721f2a969 add simple access methods code generator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   109