hg/stx-goodies-smallsense: refactoring_custom/SmallSense__CustomValueHolderAccessMethodsCodeGeneratorTests.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' }"
612 deb04cc2370d add access methods for ValueHolder 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: 612 diff changeset	24	CustomCodeGeneratorOrRefactoringTestCase subclass:#CustomValueHolderAccessMethodsCodeGeneratorTests
612 deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	25	instanceVariableNames:''
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	26	classVariableNames:''
deb04cc2370d add access methods for ValueHolder 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'
612 deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	29	!
deb04cc2370d add access methods for ValueHolder 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	!CustomValueHolderAccessMethodsCodeGeneratorTests 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	! !
59bfd92fcef0 Test fixes (all test pass now) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 803 diff changeset	54
612 deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	55	!CustomValueHolderAccessMethodsCodeGeneratorTests methodsFor:'accessing'!
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	56
634 d77d9a7561be move refactoryBuilder and codeBuilder to CustomCodeGeneratorOrRefactoring Jakub Nesveda <jakubnesveda@seznam.cz> parents: 612 diff changeset	57	generatorOrRefactoring
612 deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	58	^ CustomValueHolderAccessMethodsCodeGenerator new
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	59	! !
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	60
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	61	!CustomValueHolderAccessMethodsCodeGeneratorTests methodsFor:'tests'!
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	62
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	63	test_value_holder_access_methods_generated_with_comments
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	64	\| expectedGetterSource expectedSetterSource \|
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	65
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	66	userPreferences
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	67	generateCommentsForGetters: true;
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	68	generateCommentsForSetters: true.
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	69
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	70	expectedGetterSource := 'instanceVariable
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	71	"return/create the ''instanceVariable'' value holder (automatically generated)"
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	72
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	73	instanceVariable isNil ifTrue:[
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	74	instanceVariable := ValueHolder new.
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	75	].
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	76	^ instanceVariable'.
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	77
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	78	expectedSetterSource := 'instanceVariable:something
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	79	"set the value of the instance variable ''instanceVariable'' (automatically generated)"
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	80
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	81	instanceVariable := something'.
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	82
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	83
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	84	self executeGeneratorInContext: #classWithInstanceVariable.
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	85	self assertMethodSource: expectedGetterSource atSelector: #instanceVariable.
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	86	self assertMethodSource: expectedSetterSource atSelector: #instanceVariable:
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	87
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	88	"Created: / 13-07-2014 / 17:02:59 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	89	!
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	90
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	91	test_value_holder_access_methods_generated_without_comments
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	92	\| expectedGetterSource expectedSetterSource \|
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	93
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	94	userPreferences
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	95	generateCommentsForGetters: false;
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	96	generateCommentsForSetters: false.
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	97
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	98	expectedGetterSource := 'instanceVariable
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	99	instanceVariable isNil ifTrue:[
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	100	instanceVariable := ValueHolder new.
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	101	].
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	102	^ instanceVariable'.
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	103
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	104	expectedSetterSource := 'instanceVariable:something
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	105	instanceVariable := something'.
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	106
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	107
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	108	self executeGeneratorInContext: #classWithInstanceVariable.
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	109	self assertMethodSource: expectedGetterSource atSelector: #instanceVariable.
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	110	self assertMethodSource: expectedSetterSource atSelector: #instanceVariable:
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	111
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	112	"Created: / 13-07-2014 / 17:03:50 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	113	! !
deb04cc2370d add access methods for ValueHolder generator Jakub Nesveda <jakubnesveda@seznam.cz> parents: diff changeset	114

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