Tools__Diff2CodeView2.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Thu, 14 Jun 2018 22:19:39 +0100
branchjv
changeset 18227 d25a407ba86d
parent 15566 184cea584be5
permissions -rw-r--r--
Mini testrunner: show "green" if there's at least one pass and rest is pass or skip This is more meaningfull result then showing "gray" if there's at least one skip.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
13839
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
"
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     2
 COPYRIGHT (c) 2006 by eXept Software AG
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     3
              All Rights Reserved
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
 This software is furnished under a license and may be used
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
 only in accordance with the terms of that license and with the
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
 inclusion of the above copyright notice.   This software may not
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
 be provided or otherwise made available to, or used by, any
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
 other person.  No title to or ownership of the software is
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
 hereby transferred.
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
"
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
"{ Package: 'stx:libtool' }"
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
"{ NameSpace: Tools }"
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
DiffCodeView2 subclass:#Diff2CodeView2
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
	instanceVariableNames:''
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
	classVariableNames:''
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
	poolDictionaries:''
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
	category:'Interface-CodeView'
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
!
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
Object subclass:#Diff2Data
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
	instanceVariableNames:'text1 text2 inserted deleted changed'
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    25
	classVariableNames:''
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    26
	poolDictionaries:''
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    27
	privateIn:Diff2CodeView2
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    28
!
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    29
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    30
!Diff2CodeView2 class methodsFor:'documentation'!
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    31
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    32
copyright
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    33
"
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    34
 COPYRIGHT (c) 2006 by eXept Software AG
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    35
              All Rights Reserved
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    36
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    37
 This software is furnished under a license and may be used
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    38
 only in accordance with the terms of that license and with the
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    39
 inclusion of the above copyright notice.   This software may not
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    40
 be provided or otherwise made available to, or used by, any
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    41
 other person.  No title to or ownership of the software is
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    42
 hereby transferred.
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    43
"
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    44
! !
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    45
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    46
!Diff2CodeView2::Diff2Data methodsFor:'accessing'!
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    47
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    48
changed
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    49
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    50
    ^changed copy
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    51
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    52
    "Modified: / 02-05-2010 / 19:31:18 / Jakub <zelenja7@fel.cvut.cz>"
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    53
    "Modified: / 16-07-2010 / 09:35:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    54
!
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    55
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    56
changed:something
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    57
    changed := something.
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    58
!
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    59
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    60
deleted
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    61
    ^ deleted
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    62
!
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    63
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    64
deleted:something
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    65
    deleted := something.
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    66
!
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    67
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    68
inserted
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    69
    ^ inserted
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    70
!
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    71
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    72
inserted:something
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    73
    inserted := something.
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    74
!
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    75
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    76
text1
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    77
    ^ text1
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    78
!
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    79
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    80
text1:something
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    81
    text1 := something.
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    82
!
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    83
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    84
text2
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    85
    ^ text2
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    86
!
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    87
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    88
text2:something
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    89
    text2 := something.
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    90
! !
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    91
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    92
!Diff2CodeView2 class methodsFor:'documentation'!
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    93
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    94
version
15278
1d449ea6c8e0 class: Tools::Diff2CodeView2
Claus Gittinger <cg@exept.de>
parents: 14371
diff changeset
    95
    ^ '$Header: /cvs/stx/stx/libtool/Tools__Diff2CodeView2.st,v 1.3 2015-02-13 19:27:24 cg Exp $'
13839
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    96
!
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    97
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    98
version_CVS
15278
1d449ea6c8e0 class: Tools::Diff2CodeView2
Claus Gittinger <cg@exept.de>
parents: 14371
diff changeset
    99
    ^ '$Header: /cvs/stx/stx/libtool/Tools__Diff2CodeView2.st,v 1.3 2015-02-13 19:27:24 cg Exp $'
13839
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   100
! !
e691e2233fa1 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   101