CustomSourceCodeBuilder.st
author Jakub Nesveda <jakubnesveda@seznam.cz>
Tue, 01 Apr 2014 22:56:32 +0200
changeset 520 f9f2052d141a
parent 518 e5c0c890d953
child 521 9d7c465ae42a
permissions -rw-r--r--
first draft - add code generator which creates a template class for code generation (fix sourceExits for class builder, assign code to some package, add source even if none class selected, add possibility to execute builded sources)
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
512
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     1
"{ Package: 'jn:refactoring_custom' }"
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     2
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     3
CodeGenerator subclass:#CustomSourceCodeBuilder
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     4
	instanceVariableNames:''
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     5
	classVariableNames:''
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     6
	poolDictionaries:''
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     7
	category:'Interface-Refactoring-Custom'
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     8
!
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     9
518
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    10
CustomSourceCodeBuilder subclass:#Class
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    11
	instanceVariableNames:'className isMeta superclassName instanceVariableNames
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    12
		classVariableNames poolDictionaryNames category'
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    13
	classVariableNames:''
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    14
	poolDictionaries:''
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    15
	privateIn:CustomSourceCodeBuilder
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    16
!
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    17
512
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    18
CustomSourceCodeBuilder subclass:#Method
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    19
	instanceVariableNames:''
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    20
	classVariableNames:''
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    21
	poolDictionaries:''
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    22
	privateIn:CustomSourceCodeBuilder
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    23
!
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    24
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    25
!CustomSourceCodeBuilder class methodsFor:'instance creation'!
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    26
518
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    27
classBuilder
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    28
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    29
    ^ CustomSourceCodeBuilder::Class new
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    30
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    31
    "Created: / 31-03-2014 / 18:05:05 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    32
!
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    33
512
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    34
method
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    35
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    36
    ^ CustomSourceCodeBuilder::Method new
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    37
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    38
    "Created: / 17-03-2014 / 22:56:01 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    39
! !
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    40
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    41
!CustomSourceCodeBuilder methodsFor:'accessing'!
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    42
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    43
buildedMethod
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    44
    | method |
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    45
    method := RBParser parseRewriteMethod: source.
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    46
    method source: nil.
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    47
    method acceptVisitor: self.
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    48
    ^ method formattedCode.
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    49
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    50
    "Created: / 17-03-2014 / 09:24:15 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
514
6e7758b695c5 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 512
diff changeset
    51
!
6e7758b695c5 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 512
diff changeset
    52
515
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    53
change
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    54
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    55
   self createChange.
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    56
   ^change
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    57
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    58
    "Created: / 24-03-2014 / 09:02:36 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    59
!
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    60
514
6e7758b695c5 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 512
diff changeset
    61
classDefault: aClass
6e7758b695c5 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 512
diff changeset
    62
6e7758b695c5 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 512
diff changeset
    63
    class ifNil: [
6e7758b695c5 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 512
diff changeset
    64
        class := aClass.
6e7758b695c5 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 512
diff changeset
    65
    ]
6e7758b695c5 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 512
diff changeset
    66
6e7758b695c5 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 512
diff changeset
    67
    "Created: / 21-03-2014 / 00:15:21 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
512
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    68
! !
a527e7f19b30 work in progress - remove duplicate code in code generation methods
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    69
515
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    70
!CustomSourceCodeBuilder methodsFor:'queries'!
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    71
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    72
sourceExists
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    73
    "Tells whether source is already present in the target class, package ..."
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    74
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    75
    self subclassResponsibility
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    76
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    77
    "Created: / 23-03-2014 / 23:02:08 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    78
! !
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
    79
518
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    80
!CustomSourceCodeBuilder::Class methodsFor:'accessing'!
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    81
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    82
className:something
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    83
    className := something.
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    84
!
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    85
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    86
classVariableNames:something
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    87
    classVariableNames := something.
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    88
!
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    89
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    90
instanceVariableNames:something
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    91
    instanceVariableNames := something.
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    92
!
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    93
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    94
isMeta:aBoolean
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    95
    isMeta := aBoolean.
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    96
!
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    97
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    98
poolDictionaryNames:something
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
    99
    poolDictionaryNames := something.
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   100
!
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   101
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   102
superclassName:something
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   103
    superclassName := something.
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   104
! !
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   105
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   106
!CustomSourceCodeBuilder::Class methodsFor:'initialization'!
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   107
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   108
initialize
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   109
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   110
    className := ''.
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   111
    isMeta := false.
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   112
    superclassName := 'Object'.
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   113
    instanceVariableNames := ''.
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   114
    classVariableNames := ''.
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   115
    poolDictionaryNames := ''.
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   116
    category := ''.
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   117
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   118
    "Created: / 30-03-2014 / 22:34:15 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   119
! !
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   120
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   121
!CustomSourceCodeBuilder::Class methodsFor:'private'!
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   122
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   123
createChange
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   124
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   125
    change := InteractiveAddClassChange definition: 
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   126
        (superclassName, ' subclass:#', className, '
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   127
            instanceVariableNames:''', instanceVariableNames, '''
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   128
            classVariableNames:''', classVariableNames, '''
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   129
            poolDictionaries:''', poolDictionaryNames, '''
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   130
            category:''', category, '''').
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   131
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   132
    "Created: / 30-03-2014 / 19:19:38 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   133
    "Modified: / 31-03-2014 / 08:58:46 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   134
! !
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   135
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   136
!CustomSourceCodeBuilder::Class methodsFor:'queries'!
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   137
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   138
sourceExists
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   139
520
f9f2052d141a first draft - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 518
diff changeset
   140
    ^ Smalltalk hasClassNamed: className
518
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   141
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   142
    "Created: / 29-03-2014 / 21:21:59 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
520
f9f2052d141a first draft - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 518
diff changeset
   143
    "Modified: / 01-04-2014 / 21:20:25 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
518
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   144
! !
e5c0c890d953 work in progress - add code generator which creates a template class for code generation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 515
diff changeset
   145
515
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
   146
!CustomSourceCodeBuilder::Method methodsFor:'queries'!
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
   147
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
   148
sourceExists
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
   149
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
   150
    ^ (class includesSelector: (self change selector)).
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
   151
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
   152
    "Modified: / 24-03-2014 / 22:44:28 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
   153
! !
30d55cc59bf2 - CustomRefactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 514
diff changeset
   154