JavaSourceFileWriter.st
author Claus Gittinger <cg@exept.de>
Sun, 23 Feb 2020 14:03:15 +0100
branchcvs_MAIN
changeset 3997 5bb44f7e1d20
parent 3940 0384371831e4
permissions -rw-r--r--
#REFACTORING by exept class: Java class changed: #dumpConfigOn:
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
3940
0384371831e4 #QUALITY by exept
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
     1
"{ Encoding: utf8 }"
0384371831e4 #QUALITY by exept
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
     2
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     3
"
3324
a58245c0e83a Updated copyright notices.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3194
diff changeset
     4
 COPYRIGHT (c) 1996-2015 by Claus Gittinger
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
     5
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
     6
 New code and modifications done at SWING Research Group [1]:
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
     7
3324
a58245c0e83a Updated copyright notices.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3194
diff changeset
     8
 COPYRIGHT (c) 2010-2015 by Jan Vrany, Jan Kurs and Marcel Hlopko
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     9
                            SWING Research Group, Czech Technical University in Prague
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    10
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    11
 This software is furnished under a license and may be used
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    12
 only in accordance with the terms of that license and with the
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    13
 inclusion of the above copyright notice.   This software may not
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    14
 be provided or otherwise made available to, or used by, any
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    15
 other person.  No title to or ownership of the software is
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    16
 hereby transferred.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    17
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
    18
 [1] Code written at SWING Research Group contains a signature
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
    19
     of one of the above copright owners. For exact set of such code,
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
    20
     see the differences between this version and version stx:libjava
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
    21
     as of 1.9.2010
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    22
"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    23
"{ Package: 'stx:libjava' }"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    24
3940
0384371831e4 #QUALITY by exept
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
    25
"{ NameSpace: Smalltalk }"
0384371831e4 #QUALITY by exept
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
    26
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    27
AbstractSourceFileWriter subclass:#JavaSourceFileWriter
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    28
	instanceVariableNames:''
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    29
	classVariableNames:''
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    30
	poolDictionaries:''
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    31
	category:'Languages-Java-Support'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    32
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    33
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    34
!JavaSourceFileWriter class methodsFor:'documentation'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    35
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    36
copyright
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    37
"
3324
a58245c0e83a Updated copyright notices.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3194
diff changeset
    38
 COPYRIGHT (c) 1996-2015 by Claus Gittinger
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
    39
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
    40
 New code and modifications done at SWING Research Group [1]:
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
    41
3324
a58245c0e83a Updated copyright notices.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3194
diff changeset
    42
 COPYRIGHT (c) 2010-2015 by Jan Vrany, Jan Kurs and Marcel Hlopko
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    43
                            SWING Research Group, Czech Technical University in Prague
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    44
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    45
 This software is furnished under a license and may be used
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    46
 only in accordance with the terms of that license and with the
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    47
 inclusion of the above copyright notice.   This software may not
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    48
 be provided or otherwise made available to, or used by, any
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    49
 other person.  No title to or ownership of the software is
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    50
 hereby transferred.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    51
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
    52
 [1] Code written at SWING Research Group contains a signature
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
    53
     of one of the above copright owners. For exact set of such code,
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
    54
     see the differences between this version and version stx:libjava
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
    55
     as of 1.9.2010
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    56
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    57
"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    58
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    59
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    60
!JavaSourceFileWriter methodsFor:'source writing'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    61
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    62
fileOut:class on:stream withTimeStamp:stampIt withInitialize:initIt withDefinition:withDefinition methodFilter:methodFilter encoder:encoderOrNil
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    63
    "raise an error: must be redefined in concrete subclass(es)"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    64
3194
9aade8151557 Added JavaSourceFileWriter>>fileOut:on:withTimestamp:...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2731
diff changeset
    65
    stream nextPutAll: class source.
9aade8151557 Added JavaSourceFileWriter>>fileOut:on:withTimestamp:...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2731
diff changeset
    66
9aade8151557 Added JavaSourceFileWriter>>fileOut:on:withTimestamp:...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2731
diff changeset
    67
    "Modified: / 04-08-2014 / 00:23:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    68
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    69
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    70
fileOutMethods:methods on:stream
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    71
    "superclass AbstractSourceFileWriter says that I am responsible to implement this method"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    72
3194
9aade8151557 Added JavaSourceFileWriter>>fileOut:on:withTimestamp:...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2731
diff changeset
    73
    ^ self shouldNotImplement
9aade8151557 Added JavaSourceFileWriter>>fileOut:on:withTimestamp:...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2731
diff changeset
    74
9aade8151557 Added JavaSourceFileWriter>>fileOut:on:withTimestamp:...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2731
diff changeset
    75
    "Modified: / 04-08-2014 / 00:36:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    76
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    77
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    78
fileOutPackageDefinition:packageId on:stream
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    79
    "Files out a package definition on the stream, so all subsequent
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    80
     code entities will be placed in that package"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    81
3194
9aade8151557 Added JavaSourceFileWriter>>fileOut:on:withTimestamp:...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2731
diff changeset
    82
    ^ self shouldNotImplement
9aade8151557 Added JavaSourceFileWriter>>fileOut:on:withTimestamp:...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2731
diff changeset
    83
9aade8151557 Added JavaSourceFileWriter>>fileOut:on:withTimestamp:...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2731
diff changeset
    84
    "Modified: / 04-08-2014 / 00:36:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    85
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    86
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    87
!JavaSourceFileWriter methodsFor:'source writing - comments'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    88
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    89
fileOutCommentEndOn:aStream
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    90
    "
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    91
     Writes a comment end mark on aStream."
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    92
3940
0384371831e4 #QUALITY by exept
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
    93
    aStream nextPutAll: ' */'
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    94
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    95
    "Modified: / 27-10-2010 / 18:39:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    96
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    97
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    98
fileOutCommentLine:aString on:aStream
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    99
    "superclass AbstractSourceFileWriter says that I am responsible to implement this method"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   100
3940
0384371831e4 #QUALITY by exept
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
   101
    aStream 
0384371831e4 #QUALITY by exept
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
   102
        nextPutAll: '// '; 
0384371831e4 #QUALITY by exept
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
   103
        nextPutAll: aString
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   104
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   105
    "Modified: / 27-10-2010 / 18:40:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   106
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   107
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   108
fileOutCommentStartOn:aStream
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   109
    "
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   110
     Writes a comment end mark on aStream."
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   111
3940
0384371831e4 #QUALITY by exept
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
   112
    aStream nextPutAll: '/* '
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   113
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   114
    "Modified: / 27-10-2010 / 18:39:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   115
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   116
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   117
!JavaSourceFileWriter class methodsFor:'documentation'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   118
2250
af684f20cbeb added: #version_CVS
Claus Gittinger <cg@exept.de>
parents: 2152
diff changeset
   119
version_CVS
3940
0384371831e4 #QUALITY by exept
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
   120
    ^ '$Header$'
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
   121
!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
   122
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
   123
version_HG
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
   124
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
   125
    ^ '$Changeset: <not expanded> $'
2250
af684f20cbeb added: #version_CVS
Claus Gittinger <cg@exept.de>
parents: 2152
diff changeset
   126
!
af684f20cbeb added: #version_CVS
Claus Gittinger <cg@exept.de>
parents: 2152
diff changeset
   127
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   128
version_SVN
3940
0384371831e4 #QUALITY by exept
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
   129
    ^ '$Id$'
2152
1cbdfbcc685c Jan's version
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 749
diff changeset
   130
! !
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2250
diff changeset
   131