author | Jan Vrany <jan.vrany@fit.cvut.cz> |
Wed, 05 Dec 2012 20:10:07 +0000 | |
changeset 136 | 2d1512dde043 |
parent 135 | c74b92e6a2f8 |
child 137 | 379bd934f8d0 |
permissions | -rw-r--r-- |
40
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
1 |
"{ Package: 'stx:libscm/mercurial' }" |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
2 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
3 |
TestCase subclass:#HGCommandParserTests |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
4 |
instanceVariableNames:'' |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
5 |
classVariableNames:'' |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
6 |
poolDictionaries:'' |
69
17045d49309f
Refactoring: preparation for accessing changeset contents.
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
40
diff
changeset
|
7 |
category:'SCM-Mercurial-Tests' |
40
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
8 |
! |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
9 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
10 |
|
88 | 11 |
!HGCommandParserTests methodsFor:'tests - commands'! |
12 |
||
105
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
13 |
test_cmd_branches_01 |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
14 |
|
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
15 |
| branches | |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
16 |
|
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
17 |
branches := (HGCommandParser on: 'default 5:f22945219f9be25a1fe436d81afece07b89330be |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
18 |
branch1 4:5bd21fb5eea8a7cb4adf45bccfea76cda11df84a (inactive) |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
19 |
branch2 3:32d32dee719fb422a69cfa6f7f8c1d8e299de2df (closed) |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
20 |
') parseCommandBranches. |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
21 |
|
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
22 |
self assert: branches size == 3. |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
23 |
|
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
24 |
self assert: branches first name = 'default'. |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
25 |
self assert: branches first isActive. |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
26 |
self assert: branches first isClosed not. |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
27 |
|
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
28 |
self assert: branches second name = 'branch1'. |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
29 |
self assert: branches second isActive not. |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
30 |
self assert: branches second isClosed not. |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
31 |
|
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
32 |
self assert: branches third name = 'branch2'. |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
33 |
self assert: branches third isActive. |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
34 |
self assert: branches third isClosed. |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
35 |
|
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
36 |
"Created: / 27-11-2012 / 19:00:30 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
37 |
! |
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
38 |
|
106
99be3b5a40da
Added support for heads (both repository and per-branch)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
105
diff
changeset
|
39 |
test_cmd_heads_01 |
99be3b5a40da
Added support for heads (both repository and per-branch)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
105
diff
changeset
|
40 |
|
99be3b5a40da
Added support for heads (both repository and per-branch)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
105
diff
changeset
|
41 |
| heads | |
99be3b5a40da
Added support for heads (both repository and per-branch)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
105
diff
changeset
|
42 |
|
99be3b5a40da
Added support for heads (both repository and per-branch)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
105
diff
changeset
|
43 |
heads := (HGCommandParser on: '6:4e0568ffbf1a53f2d8980ba9844d2af6f0bac455 |
99be3b5a40da
Added support for heads (both repository and per-branch)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
105
diff
changeset
|
44 |
5:f22945219f9be25a1fe436d81afece07b89330be |
99be3b5a40da
Added support for heads (both repository and per-branch)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
105
diff
changeset
|
45 |
4:5bd21fb5eea8a7cb4adf45bccfea76cda11df84a |
99be3b5a40da
Added support for heads (both repository and per-branch)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
105
diff
changeset
|
46 |
') parseCommandHeads. |
99be3b5a40da
Added support for heads (both repository and per-branch)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
105
diff
changeset
|
47 |
|
99be3b5a40da
Added support for heads (both repository and per-branch)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
105
diff
changeset
|
48 |
self assert: heads size == 3. |
99be3b5a40da
Added support for heads (both repository and per-branch)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
105
diff
changeset
|
49 |
|
116
b690f5845323
Class revision ID refactoring.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
115
diff
changeset
|
50 |
self assert: heads first asString = '6:4e0568ffbf1a'. |
b690f5845323
Class revision ID refactoring.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
115
diff
changeset
|
51 |
self assert: heads second asString = '5:f22945219f9b'. |
b690f5845323
Class revision ID refactoring.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
115
diff
changeset
|
52 |
self assert: heads third asString = '4:5bd21fb5eea8'. |
106
99be3b5a40da
Added support for heads (both repository and per-branch)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
105
diff
changeset
|
53 |
|
99be3b5a40da
Added support for heads (both repository and per-branch)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
105
diff
changeset
|
54 |
"Created: / 27-11-2012 / 21:22:31 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
116
b690f5845323
Class revision ID refactoring.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
115
diff
changeset
|
55 |
"Modified: / 30-11-2012 / 23:43:24 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
106
99be3b5a40da
Added support for heads (both repository and per-branch)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
105
diff
changeset
|
56 |
! |
99be3b5a40da
Added support for heads (both repository and per-branch)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
105
diff
changeset
|
57 |
|
136
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
58 |
test_cmd_log_file_01 |
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
59 |
|
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
60 |
| heads | |
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
61 |
|
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
62 |
heads := (HGCommandParser on: '6:4e0568ffbf1a53f2d8980ba9844d2af6f0bac455 |
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
63 |
5:f22945219f9be25a1fe436d81afece07b89330be |
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
64 |
4:5bd21fb5eea8a7cb4adf45bccfea76cda11df84a |
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
65 |
') parseCommandLogFile. |
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
66 |
|
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
67 |
self assert: heads size == 3. |
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
68 |
|
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
69 |
self assert: heads first asString = '6:4e0568ffbf1a'. |
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
70 |
self assert: heads second asString = '5:f22945219f9b'. |
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
71 |
self assert: heads third asString = '4:5bd21fb5eea8'. |
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
72 |
|
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
73 |
"Created: / 05-12-2012 / 19:16:31 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
74 |
! |
2d1512dde043
Added HGWorkingCopyFile>>revisions.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
75 |
|
88 | 76 |
test_cmd_status_01 |
77 |
||
78 |
| statuses | |
|
79 |
||
80 |
statuses := (HGCommandParser on: 'M HGRevisionInfo.st |
|
81 |
? something.txt |
|
82 |
') parseCommandStatus. |
|
83 |
||
84 |
self assert: statuses size == 2. |
|
85 |
self assert: statuses first first isModified. |
|
86 |
self assert: statuses first second = 'HGRevisionInfo.st'. |
|
87 |
||
88 |
self assert: statuses second first isUntracked. |
|
89 |
self assert: statuses second second = 'something.txt'. |
|
90 |
||
91 |
"Created: / 21-11-2012 / 00:53:43 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
92 |
! |
|
93 |
||
94 |
test_cmd_status_02 |
|
95 |
||
96 |
| statuses | |
|
97 |
||
98 |
statuses := (HGCommandParser on: 'A HGRevisionInfo.st |
|
99 |
HGVersionInfo.st |
|
100 |
') parseCommandStatus. |
|
101 |
||
102 |
self assert: statuses size == 1. |
|
103 |
self assert: statuses first first isCopied. |
|
104 |
self assert: statuses first first source = 'HGVersionInfo.st'. |
|
105 |
self assert: statuses first second = 'HGRevisionInfo.st'. |
|
106 |
||
107 |
"Created: / 21-11-2012 / 01:08:27 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
108 |
! |
|
109 |
||
110 |
test_cmd_status_03 |
|
111 |
||
112 |
| statuses | |
|
113 |
||
114 |
statuses := (HGCommandParser on: 'A HGRevisionInfo.st |
|
115 |
HGVersionInfo.st |
|
116 |
? something.txt |
|
117 |
') parseCommandStatus. |
|
118 |
||
119 |
self assert: statuses size == 2. |
|
120 |
self assert: statuses first first isCopied. |
|
121 |
self assert: statuses first first source = 'HGVersionInfo.st'. |
|
122 |
self assert: statuses first second = 'HGRevisionInfo.st'. |
|
123 |
||
124 |
self assert: statuses second first isUntracked. |
|
125 |
self assert: statuses second second = 'something.txt'. |
|
126 |
||
127 |
"Created: / 21-11-2012 / 01:09:21 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
128 |
! ! |
|
129 |
||
40
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
130 |
!HGCommandParserTests methodsFor:'tests - misc'! |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
131 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
132 |
test_misc_01 |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
133 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
134 |
| id | |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
135 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
136 |
id := (HGCommandParser on: '4:6f88e1f44d9eb86e0b56ca15e30e5d786acd83c7') parseNodeId. |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
137 |
self assert: ( id revno == 4 ). |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
138 |
self assert: ( id hexPrintString = '6F88E1F44D9EB86E0B56CA15E30E5D786ACD83C7' ). |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
139 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
140 |
id := (HGCommandParser on: '4:6f88e1f44d9e') parseNodeId. |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
141 |
self assert: ( id revno == 4 ). |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
142 |
self assert: ( id hexPrintString = '6F88E1F44D9E' ). |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
143 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
144 |
id := (HGCommandParser on: '-1:0000000000000000000000000000000000000000') parseNodeId. |
103
04731ef44417
HGNodeId renamed to HGChangesetId
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
93
diff
changeset
|
145 |
self assert: id == HGChangesetId null. |
40
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
146 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
147 |
id := (HGCommandParser on: '-1:000000000000') parseNodeId. |
103
04731ef44417
HGNodeId renamed to HGChangesetId
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
93
diff
changeset
|
148 |
self assert: id == HGChangesetId null. |
40
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
149 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
150 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
151 |
"/ Too short id |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
152 |
self |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
153 |
should:[id := (HGCommandParser on: '4:6f88e1f44d9eb86e0b56ca15e30e5d786acd83') parseNodeId.] |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
154 |
raise: Error. |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
155 |
self |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
156 |
should:[id := (HGCommandParser on: '4:6f88e1f44d9') parseNodeId.] |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
157 |
raise: Error. |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
158 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
159 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
160 |
"/ Invalid char |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
161 |
self |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
162 |
should:[id := (HGCommandParser on: '4:6f88e1f44d9eb86e0b56ca15e30e5d786acd8X') parseNodeId.] |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
163 |
raise: Error. |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
164 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
165 |
self |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
166 |
should:[id := (HGCommandParser on: '4:6f88e1f44d9X') parseNodeId.] |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
167 |
raise: Error. |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
168 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
169 |
"Created: / 13-11-2012 / 16:34:41 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
170 |
! |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
171 |
|
134
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
172 |
test_misc_03a |
40
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
173 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
174 |
| rev | |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
175 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
176 |
rev := (HGCommandParser on: '4:6f88e1f44d9eb86e0b56ca15e30e5d786acd83c7 |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
177 |
default |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
178 |
3:912a64597e4f133ffbc1fdabdda99167a2d69ce2 -1:0000000000000000000000000000000000000000 |
134
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
179 |
|
135
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
180 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
181 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
182 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
183 |
|
40
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
184 |
Jan Vrany <jan.vrany@fit.cvut.cz> |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
185 |
2012-10-17 13:20 +0200 |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
186 |
Commit 4 |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
187 |
**EOE** |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
188 |
') parseLogEntry. |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
189 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
190 |
self assert: rev id revno = 4. |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
191 |
self assert: rev author = 'Jan Vrany <jan.vrany@fit.cvut.cz>'. |
93
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
192 |
self assert: rev timestamp hour = 13. |
134
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
193 |
self assert: rev message = 'Commit 4'. |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
194 |
self assert: (rev instVarNamed:#children) isEmpty. |
40
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
195 |
|
134
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
196 |
"Created: / 05-12-2012 / 17:37:17 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
93
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
197 |
! |
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
198 |
|
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
199 |
test_misc_03b |
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
200 |
|
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
201 |
| rev | |
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
202 |
|
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
203 |
rev := (HGCommandParser on: '4:6f88e1f44d9eb86e0b56ca15e30e5d786acd83c7 |
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
204 |
default |
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
205 |
3:912a64597e4f133ffbc1fdabdda99167a2d69ce2 -1:0000000000000000000000000000000000000000 |
134
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
206 |
5:3f88e1f44d9e |
135
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
207 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
208 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
209 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
210 |
|
93
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
211 |
Jan Vrany <jan.vrany@fit.cvut.cz> |
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
212 |
2012-10-17 13:20 +0200 |
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
213 |
Commit 4 |
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
214 |
Two lones |
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
215 |
**EOE** |
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
216 |
') parseLogEntry. |
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
217 |
|
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
218 |
self assert: rev message = 'Commit 4 |
134
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
219 |
Two lones'. |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
220 |
self assert: (rev instVarNamed:#children) size == 1. |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
221 |
self assert: (rev instVarNamed:#children) first revno == 5. |
93
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
222 |
|
2579830f6b61
Tests fixed. Not-yet-supported tests marked as skipped.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
223 |
"Created: / 21-11-2012 / 18:09:05 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
135
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
224 |
"Modified: / 05-12-2012 / 18:33:13 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
134
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
225 |
! |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
226 |
|
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
227 |
test_misc_03c |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
228 |
|
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
229 |
| rev | |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
230 |
|
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
231 |
rev := (HGCommandParser on: '4:6f88e1f44d9eb86e0b56ca15e30e5d786acd83c7 |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
232 |
default |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
233 |
3:912a64597e4f133ffbc1fdabdda99167a2d69ce2 -1:0000000000000000000000000000000000000000 |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
234 |
5:3f88e1f44d9e 6:3f88e1f44d9d |
135
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
235 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
236 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
237 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
238 |
|
134
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
239 |
Jan Vrany <jan.vrany@fit.cvut.cz> |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
240 |
2012-10-17 13:20 +0200 |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
241 |
Commit 4 |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
242 |
Two lones |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
243 |
**EOE** |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
244 |
') parseLogEntry. |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
245 |
|
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
246 |
self assert: rev message = 'Commit 4 |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
247 |
Two lones'. |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
248 |
self assert: (rev instVarNamed:#children) size == 2. |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
249 |
self assert: (rev instVarNamed:#children) first revno == 5. |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
250 |
self assert: (rev instVarNamed:#children) second revno == 6. |
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
251 |
|
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
252 |
"Created: / 05-12-2012 / 17:39:12 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
40
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
253 |
! |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
254 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
255 |
test_misc_04 |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
256 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
257 |
| revs | |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
258 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
259 |
revs := (HGCommandParser on: '4:6f88e1f44d9eb86e0b56ca15e30e5d786acd83c7 |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
260 |
default |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
261 |
3:912a64597e4f133ffbc1fdabdda99167a2d69ce2 -1:0000000000000000000000000000000000000000 |
134
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
262 |
|
135
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
263 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
264 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
265 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
266 |
|
40
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
267 |
Jan Vrany <jan.vrany@fit.cvut.cz> |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
268 |
2012-10-17 13:20 +0200 |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
269 |
Commit 4 |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
270 |
**EOE** |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
271 |
3:912a64597e4f133ffbc1fdabdda99167a2d69ce2 |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
272 |
default |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
273 |
2:db43a5baa9acaf2536d8b12c070b4f5e0363d45c -1:0000000000000000000000000000000000000000 |
134
565c8bd9c9e8
Added children support to changesets.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
116
diff
changeset
|
274 |
4:6f88e1f44d9e |
135
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
275 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
276 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
277 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
278 |
|
40
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
279 |
Jan Vrany <jan.vrany@fit.cvut.cz> |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
280 |
2012-10-17 13:20 +0200 |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
281 |
Commit 3 |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
282 |
**EOE** |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
283 |
') parseLog. |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
284 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
285 |
self assert: revs size == 2 |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
286 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
287 |
"Created: / 13-11-2012 / 17:31:41 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
135
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
288 |
"Modified: / 05-12-2012 / 18:33:29 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
289 |
! |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
290 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
291 |
test_misc_05a |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
292 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
293 |
| rev | |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
294 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
295 |
rev := (HGCommandParser on: '4:6f88e1f44d9eb86e0b56ca15e30e5d786acd83c7 |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
296 |
default |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
297 |
3:912a64597e4f133ffbc1fdabdda99167a2d69ce2 -1:0000000000000000000000000000000000000000 |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
298 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
299 |
b/f2.txt b/f3.txt f1.txt |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
300 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
301 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
302 |
README.txt |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
303 |
Jan Vrany <jan.vrany@fit.cvut.cz> |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
304 |
2012-10-17 13:20 +0200 |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
305 |
Commit 4 |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
306 |
**EOE** |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
307 |
') parseLogEntry. |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
308 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
309 |
self assert: rev changes size == 4. |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
310 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
311 |
"Created: / 05-12-2012 / 18:34:34 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
312 |
! |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
313 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
314 |
test_misc_05b |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
315 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
316 |
| rev | |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
317 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
318 |
rev := (HGCommandParser on: '4:6f88e1f44d9eb86e0b56ca15e30e5d786acd83c7 |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
319 |
default |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
320 |
3:912a64597e4f133ffbc1fdabdda99167a2d69ce2 -1:0000000000000000000000000000000000000000 |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
321 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
322 |
c/f3.txt |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
323 |
c/f3.txt (b/f3.txt) |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
324 |
b/f3.txt |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
325 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
326 |
Jan Vrany <jan.vrany@fit.cvut.cz> |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
327 |
2012-10-17 13:20 +0200 |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
328 |
Commit 4 |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
329 |
**EOE** |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
330 |
') parseLogEntry. |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
331 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
332 |
self assert: rev changes size == 1. |
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
333 |
|
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
134
diff
changeset
|
334 |
"Created: / 05-12-2012 / 18:45:30 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
80
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
335 |
! |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
336 |
|
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
337 |
test_version_2_3_3 |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
338 |
|
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
339 |
| vsn | |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
340 |
|
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
341 |
vsn := (HGCommandParser on: 'Mercurial Distributed SCM (version 2.3.2) |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
342 |
(see http://mercurial.selenic.com for more information) |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
343 |
|
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
344 |
Copyright (C) 2005-2012 Matt Mackall and others |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
345 |
This is free software; see the source for copying conditions. There is NO |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
346 |
warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
347 |
') parseCommandVersion. |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
348 |
|
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
349 |
self assert: vsn = #(2 3 2) |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
350 |
|
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
351 |
"Created: / 19-11-2012 / 20:59:44 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
352 |
! |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
353 |
|
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
354 |
test_version_2_4 |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
355 |
|
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
356 |
| vsn | |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
357 |
|
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
358 |
vsn := (HGCommandParser on: 'Mercurial Distributed SCM (version 2.4) |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
359 |
(see http://mercurial.selenic.com for more information) |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
360 |
|
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
361 |
Copyright (C) 2005-2012 Matt Mackall and others |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
362 |
This is free software; see the source for copying conditions. There is NO |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
363 |
warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
364 |
') parseCommandVersion. |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
365 |
|
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
366 |
self assert: vsn = #(2 4 nil) |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
367 |
|
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
368 |
"Created: / 19-11-2012 / 21:00:20 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
40
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
369 |
! ! |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
370 |
|
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
371 |
!HGCommandParserTests class methodsFor:'documentation'! |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
372 |
|
69
17045d49309f
Refactoring: preparation for accessing changeset contents.
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
40
diff
changeset
|
373 |
version_HG |
115
b1ed2d29054b
version_HG changed to return string.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
106
diff
changeset
|
374 |
|
b1ed2d29054b
version_HG changed to return string.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
106
diff
changeset
|
375 |
^ '$Changeset: <not expanded> $' |
69
17045d49309f
Refactoring: preparation for accessing changeset contents.
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
40
diff
changeset
|
376 |
! |
17045d49309f
Refactoring: preparation for accessing changeset contents.
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
40
diff
changeset
|
377 |
|
40
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
378 |
version_SVN |
69
17045d49309f
Refactoring: preparation for accessing changeset contents.
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
40
diff
changeset
|
379 |
^ '§Id:: §' |
40
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
diff
changeset
|
380 |
! ! |