hg/stx-goodies-smallsense: refactoring_custom/SmallSense__CustomValueHolderWithChangeNotificationAccessMethodsCodeGeneratorTests.st@b51ace366efc (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
1072 a44c741ee5ef Copyright updates Jan Vrany <jan.vrany@fit.cvut.cz> parents: 833 diff changeset	4	Copyright (C) 2015 Jan Vrany
829 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' }"
613 9bb8c8bebb10 add access methods generator for ValueHolder with change notification 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: 613 diff changeset	24	CustomCodeGeneratorOrRefactoringTestCase subclass:#CustomValueHolderWithChangeNotificationAccessMethodsCodeGeneratorTests
613 9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	25	instanceVariableNames:''
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	26	classVariableNames:''
9bb8c8bebb10 add access methods generator for ValueHolder with change notification 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: 681 diff changeset	28	category:'Interface-Refactoring-Custom-Generators-Tests'
613 9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	29	!
9bb8c8bebb10 add access methods generator for ValueHolder with change notification 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	!CustomValueHolderWithChangeNotificationAccessMethodsCodeGeneratorTests 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
1072 a44c741ee5ef Copyright updates Jan Vrany <jan.vrany@fit.cvut.cz> parents: 833 diff changeset	37	Copyright (C) 2015 Jan Vrany
829 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	! !
681 34c671a3cf59 work in progress - rewriting code generators to replace CustomSourceCodeBuilder, but RBClass, RBMetaclass, RBNamespace and CodeGenerator Jakub Nesveda <jakubnesveda@seznam.cz> parents: 634 diff changeset	54
613 9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	55	!CustomValueHolderWithChangeNotificationAccessMethodsCodeGeneratorTests methodsFor:'accessing'!
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	56
634 d77d9a7561be move refactoryBuilder and codeBuilder to CustomCodeGeneratorOrRefactoring Jakub Nesveda <jakubnesveda@seznam.cz> parents: 613 diff changeset	57	generatorOrRefactoring
613 9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	58	^ CustomValueHolderWithChangeNotificationAccessMethodsCodeGenerator new
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	59	! !
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	60
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	61	!CustomValueHolderWithChangeNotificationAccessMethodsCodeGeneratorTests methodsFor:'tests'!
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	62
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	63	test_value_holder_access_methods_generated_with_comments
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	64	\| expectedGetterSource expectedSetterSource \|
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	65
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	66	userPreferences
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	67	generateCommentsForGetters: true;
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	68	generateCommentsForSetters: true.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	69
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	70	expectedGetterSource := 'instanceVariable
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	71	"return/create the ''instanceVariable'' value holder with change notification (automatically generated)"
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	72
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	73	instanceVariable isNil ifTrue:[
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	74	instanceVariable := ValueHolder new.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	75	instanceVariable addDependent:self.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	76	].
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	77	^ instanceVariable'.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	78
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	79	expectedSetterSource := 'instanceVariable:something
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	80	"set the ''instanceVariable'' value holder (automatically generated)"
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	81
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	82	\|oldValue newValue\|
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	83
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	84	instanceVariable notNil ifTrue:[
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	85	oldValue := instanceVariable value.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	86	instanceVariable removeDependent:self.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	87	].
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	88	instanceVariable := something.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	89	instanceVariable notNil ifTrue:[
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	90	instanceVariable addDependent:self.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	91	].
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	92	newValue := instanceVariable value.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	93	oldValue ~~ newValue ifTrue:[
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	94	self
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	95	update:#value
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	96	with:newValue
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	97	from:instanceVariable.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	98	].'.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	99
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	100	self executeGeneratorInContext: #classWithInstanceVariable.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	101	self assertMethodSource: expectedGetterSource atSelector: #instanceVariable.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	102	self assertMethodSource: expectedSetterSource atSelector: #instanceVariable:
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	103
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	104	"Created: / 13-07-2014 / 17:16:44 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	105	!
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	106
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	107	test_value_holder_access_methods_generated_without_comments
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	108	\| expectedGetterSource expectedSetterSource \|
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	109
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	110	userPreferences
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	111	generateCommentsForGetters: false;
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	112	generateCommentsForSetters: false.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	113
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	114	expectedGetterSource := 'instanceVariable
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	115	instanceVariable isNil ifTrue:[
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	116	instanceVariable := ValueHolder new.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	117	instanceVariable addDependent:self.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	118	].
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	119	^ instanceVariable'.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	120
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	121	expectedSetterSource := 'instanceVariable:something
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	122	\|oldValue newValue\|
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	123
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	124	instanceVariable notNil ifTrue:[
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	125	oldValue := instanceVariable value.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	126	instanceVariable removeDependent:self.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	127	].
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	128	instanceVariable := something.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	129	instanceVariable notNil ifTrue:[
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	130	instanceVariable addDependent:self.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	131	].
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	132	newValue := instanceVariable value.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	133	oldValue ~~ newValue ifTrue:[
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	134	self
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	135	update:#value
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	136	with:newValue
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	137	from:instanceVariable.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	138	].'.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	139
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	140	self executeGeneratorInContext: #classWithInstanceVariable.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	141	self assertMethodSource: expectedGetterSource atSelector: #instanceVariable.
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	142	self assertMethodSource: expectedSetterSource atSelector: #instanceVariable:
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	143
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	144	"Created: / 13-07-2014 / 17:23:09 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	145	! !
9bb8c8bebb10 add access methods generator for ValueHolder with change notification Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	146
681 34c671a3cf59 work in progress - rewriting code generators to replace CustomSourceCodeBuilder, but RBClass, RBMetaclass, RBNamespace and CodeGenerator Jakub Nesveda <jakubnesveda@seznam.cz> parents: 634 diff changeset	147	!CustomValueHolderWithChangeNotificationAccessMethodsCodeGeneratorTests class methodsFor:'documentation'!
34c671a3cf59 work in progress - rewriting code generators to replace CustomSourceCodeBuilder, but RBClass, RBMetaclass, RBNamespace and CodeGenerator Jakub Nesveda <jakubnesveda@seznam.cz> parents: 634 diff changeset	148
34c671a3cf59 work in progress - rewriting code generators to replace CustomSourceCodeBuilder, but RBClass, RBMetaclass, RBNamespace and CodeGenerator Jakub Nesveda <jakubnesveda@seznam.cz> parents: 634 diff changeset	149	version_HG
34c671a3cf59 work in progress - rewriting code generators to replace CustomSourceCodeBuilder, but RBClass, RBMetaclass, RBNamespace and CodeGenerator Jakub Nesveda <jakubnesveda@seznam.cz> parents: 634 diff changeset	150
34c671a3cf59 work in progress - rewriting code generators to replace CustomSourceCodeBuilder, but RBClass, RBMetaclass, RBNamespace and CodeGenerator Jakub Nesveda <jakubnesveda@seznam.cz> parents: 634 diff changeset	151	^ '$Changeset: <not expanded> $'
34c671a3cf59 work in progress - rewriting code generators to replace CustomSourceCodeBuilder, but RBClass, RBMetaclass, RBNamespace and CodeGenerator Jakub Nesveda <jakubnesveda@seznam.cz> parents: 634 diff changeset	152	! !
34c671a3cf59 work in progress - rewriting code generators to replace CustomSourceCodeBuilder, but RBClass, RBMetaclass, RBNamespace and CodeGenerator Jakub Nesveda <jakubnesveda@seznam.cz> parents: 634 diff changeset	153

author	convert-repo
	Wed, 11 Dec 2019 04:28:36 +0000
changeset 1116	b51ace366efc
parent 1072	a44c741ee5ef
permissions	-rw-r--r--