Diff3InclusiveVisitor.st
author Claus Gittinger <cg@exept.de>
Wed, 05 Feb 2014 19:59:03 +0100
changeset 13841 9991fe4fe333
child 14010 268d0656c350
permissions -rw-r--r--
initial checkin
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
13841
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
"
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     2
 Copyright (c) 2007-2012 Tony Garnock-Jones
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     3
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
 This code is based on Squeak's DiffMerge package
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
 written by Tony Garnock-Jones. Original project's web site:
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
 http://www.squeaksource.com/DiffMerge
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
 Permission is hereby granted, free of charge, to any person
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
 obtaining a copy of this software and associated documentation
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
 files (the 'Software'), to deal in the Software without
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
 restriction, including without limitation the rights to use,
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
 copy, modify, merge, publish, distribute, sublicense, and/or sell
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
 copies of the Software, and to permit persons to whom the
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
 Software is furnished to do so, subject to the following
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
 conditions:
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
 The above copyright notice and this permission notice shall be
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
 included in all copies or substantial portions of the Software.
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
 THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
 EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
 OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
 NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    25
 HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    26
 WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    27
 FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    28
 OTHER DEALINGS IN THE SOFTWARE.
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    29
"
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    30
"{ Package: 'stx:libtool' }"
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    31
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    32
Object subclass:#Diff3InclusiveVisitor
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    33
	instanceVariableNames:'result okLines files'
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    34
	classVariableNames:''
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    35
	poolDictionaries:''
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    36
	category:'Collections-Sequenceable-Diff3'
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    37
!
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    38
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    39
Diff3InclusiveVisitor comment:'A Diff3InclusiveVisitor is used by Diff3 to construct a three-way SequenceableCollection merge that treats "false conflicts" (a.k.a "accidental clean merges") as true conflicts.
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    40
Instance Variables
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    41
	files:		Used to extract the elements for each part of the result
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    42
	okLines:		Used to buffer up lists of non-conflicting elements
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    43
	result:		Accumulator
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    44
-- 
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    45
Copyright (c) 2008 Tony Garnock-Jones <tonyg@lshift.net>
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    46
Copyright (c) 2008 LShift Ltd. <query@lshift.net>
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    47
Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the "Software"), to deal in the Software without restriction,including without limitation the rights to use, copy, modify, merge,publish, distribute, sublicense, and/or sell copies of the Software,and to permit persons to whom the Software is furnished to do so,subject to the following conditions:
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    48
The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software.
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    49
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    50
'
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    51
!
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    52
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    53
!Diff3InclusiveVisitor class methodsFor:'documentation'!
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    54
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    55
copyright
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    56
"
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    57
 Copyright (c) 2007-2012 Tony Garnock-Jones
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    58
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    59
 This code is based on Squeak's DiffMerge package
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    60
 written by Tony Garnock-Jones. Original project's web site:
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    61
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    62
 http://www.squeaksource.com/DiffMerge
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    63
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    64
 Permission is hereby granted, free of charge, to any person
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    65
 obtaining a copy of this software and associated documentation
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    66
 files (the 'Software'), to deal in the Software without
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    67
 restriction, including without limitation the rights to use,
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    68
 copy, modify, merge, publish, distribute, sublicense, and/or sell
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    69
 copies of the Software, and to permit persons to whom the
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    70
 Software is furnished to do so, subject to the following
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    71
 conditions:
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    72
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    73
 The above copyright notice and this permission notice shall be
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    74
 included in all copies or substantial portions of the Software.
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    75
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    76
 THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    77
 EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    78
 OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    79
 NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    80
 HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    81
 WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    82
 FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    83
 OTHER DEALINGS IN THE SOFTWARE.
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    84
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    85
"
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    86
!
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    87
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    88
documentation
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    89
"
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    90
A Diff3InclusiveVisitor is used by Diff3 to construct a three-way SequenceableCollection merge that treats 'false conflicts' (a.k.a 'accidental clean merges') as true conflicts.
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    91
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    92
Instance Variables
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    93
        files:          Used to extract the elements for each part of the result
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    94
        okLines:                Used to buffer up lists of non-conflicting elements
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    95
        result:                 Accumulator
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    96
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    97
    [author:]
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    98
        Tony Garnock-Jones <tonyg@lshift.com>
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    99
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   100
    [instance variables:]
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   101
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   102
    [class variables:]
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   103
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   104
    [see also:]
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   105
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   106
"
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   107
! !
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   108
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   109
!Diff3InclusiveVisitor class methodsFor:'instance creation'!
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   110
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   111
new
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   112
    "return an initialized instance"
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   113
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   114
    ^ self basicNew initialize.
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   115
! !
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   116
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   117
!Diff3InclusiveVisitor methodsFor:'as yet unclassified'!
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   118
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   119
files: aDictionary
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   120
	files := aDictionary
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   121
!
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   122
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   123
flushOk
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   124
	okLines isEmpty ifFalse: [
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   125
		result add: #ok -> okLines asArray.
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   126
		okLines := OrderedCollection new].
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   127
!
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   128
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   129
initialize
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   130
	result := OrderedCollection new.
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   131
	okLines := OrderedCollection new.
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   132
!
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   133
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   134
left: left original: original right: right
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   135
        | c |
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   136
        self flushOk.
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   137
        c := Diff3::Conflict new.
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   138
        c left: (left extractFrom: (files at: #left)).
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   139
        c original: (original extractFrom: (files at: #original)).
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   140
        c right: (right extractFrom: (files at: #right)).
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   141
        result add: #conflict -> c.
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   142
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   143
    "Modified: / 16-03-2012 / 19:20:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   144
!
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   145
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   146
result
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   147
	self flushOk.
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   148
	^ result asArray
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   149
!
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   150
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   151
side: aSelector chunk: aChunk
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   152
	okLines addAll: (aChunk extractFrom: (files at: aSelector)).
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   153
! !
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   154
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   155
!Diff3InclusiveVisitor class methodsFor:'documentation'!
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   156
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   157
version
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   158
    ^ '$Header: /cvs/stx/stx/libtool/Diff3InclusiveVisitor.st,v 1.1 2014-02-05 18:59:03 cg Exp $'
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   159
!
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   160
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   161
version_CVS
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   162
    ^ '$Header: /cvs/stx/stx/libtool/Diff3InclusiveVisitor.st,v 1.1 2014-02-05 18:59:03 cg Exp $'
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   163
! !
9991fe4fe333 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   164