hg/stx-goodies-smallsense: refactoring_custom/SmallSense__CustomValueHolderWithChangeNotificationGetterMethodsCodeGeneratorTests.st@af3a048f9618 (annotated)

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' }"
587 bd181c1f381a add value holder with change notification getter 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: 778 diff changeset	23
634 d77d9a7561be move refactoryBuilder and codeBuilder to CustomCodeGeneratorOrRefactoring Jakub Nesveda <jakubnesveda@seznam.cz> parents: 587 diff changeset	24	CustomCodeGeneratorOrRefactoringTestCase subclass:#CustomValueHolderWithChangeNotificationGetterMethodsCodeGeneratorTests
587 bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	25	instanceVariableNames:''
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	26	classVariableNames:''
bd181c1f381a add value holder with change notification getter 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'
587 bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	29	!
bd181c1f381a add value holder with change notification getter 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	!CustomValueHolderWithChangeNotificationGetterMethodsCodeGeneratorTests 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	! !
778 aa278bcb1d92 fixed wrong guessing that class is abstract in RBAbstractClass >> isAbstract Jakub Nesveda <jakubnesveda@seznam.cz> parents: 734 diff changeset	54
587 bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	55	!CustomValueHolderWithChangeNotificationGetterMethodsCodeGeneratorTests methodsFor:'accessing'!
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	56
634 d77d9a7561be move refactoryBuilder and codeBuilder to CustomCodeGeneratorOrRefactoring Jakub Nesveda <jakubnesveda@seznam.cz> parents: 587 diff changeset	57	generatorOrRefactoring
587 bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	58	^ CustomValueHolderWithChangeNotificationGetterMethodsCodeGenerator new
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	59	! !
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	60
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	61	!CustomValueHolderWithChangeNotificationGetterMethodsCodeGeneratorTests methodsFor:'tests'!
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	62
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	63	test_value_holder_getter_with_change_notification_method_generated_with_comments
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	64	\| expectedSource \|
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	65
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	66	userPreferences generateCommentsForGetters: true.
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	67
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	68	expectedSource := 'instanceVariable
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	69	"return/create the ''instanceVariable'' value holder with change notification (automatically generated)"
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	70
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	71	instanceVariable isNil ifTrue:[
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	72	instanceVariable := ValueHolder new.
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	73	instanceVariable addDependent:self.
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	74	].
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	75	^ instanceVariable'.
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	76
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	77	self executeGeneratorInContext: #classWithInstanceVariable.
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	78	self assertMethodSource: expectedSource atSelector: #instanceVariable
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	79
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	80	"Created: / 30-06-2014 / 19:54:41 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	81	!
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	82
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	83	test_value_holder_getter_with_change_notification_method_generated_without_comments
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	84	\| expectedSource \|
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	85
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	86	userPreferences generateCommentsForGetters: false.
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	87
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	88	expectedSource := 'instanceVariable
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	89	instanceVariable isNil ifTrue:[
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	90	instanceVariable := ValueHolder new.
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	91	instanceVariable addDependent:self.
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	92	].
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	93	^ instanceVariable'.
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	94
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	95	self executeGeneratorInContext: #classWithInstanceVariable.
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	96	self assertMethodSource: expectedSource atSelector: #instanceVariable
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	97
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	98	"Created: / 30-06-2014 / 19:56:11 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	99	! !
bd181c1f381a add value holder with change notification getter generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	100
778 aa278bcb1d92 fixed wrong guessing that class is abstract in RBAbstractClass >> isAbstract Jakub Nesveda <jakubnesveda@seznam.cz> parents: 734 diff changeset	101	!CustomValueHolderWithChangeNotificationGetterMethodsCodeGeneratorTests class methodsFor:'documentation'!
aa278bcb1d92 fixed wrong guessing that class is abstract in RBAbstractClass >> isAbstract Jakub Nesveda <jakubnesveda@seznam.cz> parents: 734 diff changeset	102
aa278bcb1d92 fixed wrong guessing that class is abstract in RBAbstractClass >> isAbstract Jakub Nesveda <jakubnesveda@seznam.cz> parents: 734 diff changeset	103	version_HG
aa278bcb1d92 fixed wrong guessing that class is abstract in RBAbstractClass >> isAbstract Jakub Nesveda <jakubnesveda@seznam.cz> parents: 734 diff changeset	104
aa278bcb1d92 fixed wrong guessing that class is abstract in RBAbstractClass >> isAbstract Jakub Nesveda <jakubnesveda@seznam.cz> parents: 734 diff changeset	105	^ '$Changeset: <not expanded> $'
aa278bcb1d92 fixed wrong guessing that class is abstract in RBAbstractClass >> isAbstract Jakub Nesveda <jakubnesveda@seznam.cz> parents: 734 diff changeset	106	! !
aa278bcb1d92 fixed wrong guessing that class is abstract in RBAbstractClass >> isAbstract Jakub Nesveda <jakubnesveda@seznam.cz> parents: 734 diff changeset	107

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--