hg/stx-libscm: mercurial/HGCommandParserTests.st@565c8bd9c9e8 (annotated)

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 1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	11	!HGCommandParserTests methodsFor:'tests - commands'!
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	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
88 1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	58	test_cmd_status_01
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	59
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	60	\| statuses \|
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	61
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	62	statuses := (HGCommandParser on: 'M HGRevisionInfo.st
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	63	? something.txt
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	64	') parseCommandStatus.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	65
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	66	self assert: statuses size == 2.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	67	self assert: statuses first first isModified.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	68	self assert: statuses first second = 'HGRevisionInfo.st'.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	69
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	70	self assert: statuses second first isUntracked.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	71	self assert: statuses second second = 'something.txt'.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	72
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	73	"Created: / 21-11-2012 / 00:53:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	74	!
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	75
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	76	test_cmd_status_02
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	77
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	78	\| statuses \|
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	79
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	80	statuses := (HGCommandParser on: 'A HGRevisionInfo.st
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	81	HGVersionInfo.st
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	82	') parseCommandStatus.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	83
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	84	self assert: statuses size == 1.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	85	self assert: statuses first first isCopied.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	86	self assert: statuses first first source = 'HGVersionInfo.st'.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	87	self assert: statuses first second = 'HGRevisionInfo.st'.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	88
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	89	"Created: / 21-11-2012 / 01:08:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	90	!
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	91
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	92	test_cmd_status_03
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	93
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	94	\| statuses \|
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	95
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	96	statuses := (HGCommandParser on: 'A HGRevisionInfo.st
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	97	HGVersionInfo.st
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	98	? something.txt
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	99	') parseCommandStatus.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	100
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	101	self assert: statuses size == 2.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	102	self assert: statuses first first isCopied.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	103	self assert: statuses first first source = 'HGVersionInfo.st'.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	104	self assert: statuses first second = 'HGRevisionInfo.st'.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	105
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	106	self assert: statuses second first isUntracked.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	107	self assert: statuses second second = 'something.txt'.
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	108
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	109	"Created: / 21-11-2012 / 01:09:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	110	! !
1ad71a063a20 Bunch of fixes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 80 diff changeset	111
40 e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	112	!HGCommandParserTests methodsFor:'tests - misc'!
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	113
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	114	test_misc_01
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	115
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	116	\| id \|
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	117
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	118	id := (HGCommandParser on: '4:6f88e1f44d9eb86e0b56ca15e30e5d786acd83c7') parseNodeId.
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	119	self assert: ( id revno == 4 ).
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	120	self assert: ( id hexPrintString = '6F88E1F44D9EB86E0B56CA15E30E5D786ACD83C7' ).
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	121
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	122	id := (HGCommandParser on: '4:6f88e1f44d9e') parseNodeId.
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	123	self assert: ( id revno == 4 ).
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	124	self assert: ( id hexPrintString = '6F88E1F44D9E' ).
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	125
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	126	id := (HGCommandParser on: '-1:0000000000000000000000000000000000000000') parseNodeId.
103 04731ef44417 HGNodeId renamed to HGChangesetId Jan Vrany <jan.vrany@fit.cvut.cz> parents: 93 diff changeset	127	self assert: id == HGChangesetId null.
40 e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	128
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	129	id := (HGCommandParser on: '-1:000000000000') parseNodeId.
103 04731ef44417 HGNodeId renamed to HGChangesetId Jan Vrany <jan.vrany@fit.cvut.cz> parents: 93 diff changeset	130	self assert: id == HGChangesetId null.
40 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
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	133	"/ Too short id
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	134	self
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	135	should:[id := (HGCommandParser on: '4:6f88e1f44d9eb86e0b56ca15e30e5d786acd83') parseNodeId.]
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	136	raise: Error.
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	137	self
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	138	should:[id := (HGCommandParser on: '4:6f88e1f44d9') parseNodeId.]
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	139	raise: Error.
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	140
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	141
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	142	"/ Invalid char
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	143	self
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	144	should:[id := (HGCommandParser on: '4:6f88e1f44d9eb86e0b56ca15e30e5d786acd8X') parseNodeId.]
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	145	raise: Error.
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	self
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	148	should:[id := (HGCommandParser on: '4:6f88e1f44d9X') parseNodeId.]
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	149	raise: Error.
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	"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	152	!
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	153
134 565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	154	test_misc_03a
40 e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	155
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	156	\| rev \|
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	157
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	158	rev := (HGCommandParser on: '4:6f88e1f44d9eb86e0b56ca15e30e5d786acd83c7
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	159	default
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	160	3:912a64597e4f133ffbc1fdabdda99167a2d69ce2 -1:0000000000000000000000000000000000000000
134 565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	161
40 e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	162	Jan Vrany <jan.vrany@fit.cvut.cz>
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	163	2012-10-17 13:20 +0200
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	164	Commit 4
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	165	EOE
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	166	') parseLogEntry.
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	167
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	168	self assert: rev id revno = 4.
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	169	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	170	self assert: rev timestamp hour = 13.
134 565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	171	self assert: rev message = 'Commit 4'.
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	172	self assert: (rev instVarNamed:#children) isEmpty.
40 e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	173
134 565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	174	"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	175	!
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 88 diff changeset	176
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 88 diff changeset	177	test_misc_03b
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 88 diff changeset	178
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 88 diff changeset	179	\| rev \|
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 88 diff changeset	180
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 88 diff changeset	181	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	182	default
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 88 diff changeset	183	3:912a64597e4f133ffbc1fdabdda99167a2d69ce2 -1:0000000000000000000000000000000000000000
134 565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	184	5:3f88e1f44d9e
93 2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 88 diff changeset	185	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	186	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	187	Commit 4
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 88 diff changeset	188	Two lones
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 88 diff changeset	189	EOE
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 88 diff changeset	190	') parseLogEntry.
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 88 diff changeset	191
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 message = 'Commit 4
134 565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	193	Two lones'.
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	194	self assert: (rev instVarNamed:#children) size == 1.
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	195	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	196
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 88 diff changeset	197	"Created: / 21-11-2012 / 18:09:05 / 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	198	"Modified: / 05-12-2012 / 17:38:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	199	!
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	200
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	201	test_misc_03c
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	202
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	203	\| rev \|
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	204
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	205	rev := (HGCommandParser on: '4:6f88e1f44d9eb86e0b56ca15e30e5d786acd83c7
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	206	default
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	207	3:912a64597e4f133ffbc1fdabdda99167a2d69ce2 -1:0000000000000000000000000000000000000000
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	208	5:3f88e1f44d9e 6:3f88e1f44d9d
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	209	Jan Vrany <jan.vrany@fit.cvut.cz>
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	210	2012-10-17 13:20 +0200
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	211	Commit 4
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	212	Two lones
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	213	EOE
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	214	') parseLogEntry.
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	215
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	216	self assert: rev message = 'Commit 4
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	217	Two lones'.
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	218	self assert: (rev instVarNamed:#children) size == 2.
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	219	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	220	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	221
565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	222	"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	223	!
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	224
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	225	test_misc_04
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	226
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	227	\| revs \|
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	228
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	229	revs := (HGCommandParser on: '4:6f88e1f44d9eb86e0b56ca15e30e5d786acd83c7
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	230	default
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	231	3:912a64597e4f133ffbc1fdabdda99167a2d69ce2 -1:0000000000000000000000000000000000000000
134 565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	232
40 e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	233	Jan Vrany <jan.vrany@fit.cvut.cz>
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	234	2012-10-17 13:20 +0200
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	235	Commit 4
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	236	EOE
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	237	3:912a64597e4f133ffbc1fdabdda99167a2d69ce2
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	238	default
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	239	2:db43a5baa9acaf2536d8b12c070b4f5e0363d45c -1:0000000000000000000000000000000000000000
134 565c8bd9c9e8 Added children support to changesets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 116 diff changeset	240	4:6f88e1f44d9e
40 e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	241	Jan Vrany <jan.vrany@fit.cvut.cz>
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	242	2012-10-17 13:20 +0200
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	243	Commit 3
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	244	EOE
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	245	') parseLog.
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	246
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	247	self assert: revs size == 2
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	248
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	249	"Created: / 13-11-2012 / 17:31:41 / 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	250	"Modified: / 05-12-2012 / 17:36:45 / 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	251	!
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	252
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	253	test_version_2_3_3
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	254
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	255	\| vsn \|
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	256
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	257	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	258	(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	259
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	260	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	261	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	262	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	263	') parseCommandVersion.
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	264
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	265	self assert: vsn = #(2 3 2)
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	266
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	267	"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	268	!
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	269
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	270	test_version_2_4
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	271
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	272	\| vsn \|
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	273
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	274	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	275	(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	276
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	277	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	278	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	279	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	280	') parseCommandVersion.
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	281
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	282	self assert: vsn = #(2 4 nil)
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	283
8f300696b26b Added configurable path to 'hg' command. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 69 diff changeset	284	"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	285	! !
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	!HGCommandParserTests class methodsFor:'documentation'!
e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	288
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: 40 diff changeset	289	version_HG
115 b1ed2d29054b version_HG changed to return string. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 106 diff changeset	290
b1ed2d29054b version_HG changed to return string. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 106 diff changeset	291	^ '$Changeset: <not expanded> $'
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: 40 diff changeset	292	!
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: 40 diff changeset	293
40 e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	294	version_SVN
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: 40 diff changeset	295	^ '�Id:: �'
40 e3699c0b00f9 Baisc support for changesets (revision log) vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	296	! !

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Wed, 05 Dec 2012 18:09:53 +0000
changeset 134	565c8bd9c9e8
parent 116	b690f5845323
child 135	c74b92e6a2f8
permissions	-rw-r--r--