mercurial/HGCommandParserTests.st
changeset 796 ae6b5b28acd5
parent 795 aea8f9d9a237
child 804 e73451884939
equal deleted inserted replaced
795:aea8f9d9a237 796:ae6b5b28acd5
   171 4:5bd21fb5eea8a7cb4adf45bccfea76cda11df84a
   171 4:5bd21fb5eea8a7cb4adf45bccfea76cda11df84a
   172 ') parseCommandHeads.
   172 ') parseCommandHeads.
   173 
   173 
   174     self assert: heads size == 3.
   174     self assert: heads size == 3.
   175 
   175 
   176     self assert: heads first  asString = '6:4e0568ffbf1a'.
   176     self assert: heads first  printString = '6:4e0568ffbf1a'.
   177     self assert: heads second asString = '5:f22945219f9b'.
   177     self assert: heads second printString = '5:f22945219f9b'.
   178     self assert: heads third  asString = '4:5bd21fb5eea8'.
   178     self assert: heads third  printString = '4:5bd21fb5eea8'.
   179 
   179 
   180     "Created: / 27-11-2012 / 21:22:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   180     "Created: / 27-11-2012 / 21:22:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   181     "Modified: / 30-11-2012 / 23:43:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   181     "Modified: / 30-10-2017 / 20:59:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   182 !
   182 !
   183 
   183 
   184 test_cmd_help_01
   184 test_cmd_help_01
   185 
   185 
   186     | expected got |
   186     | expected got |
   216 ') 
   216 ') 
   217                 parseCommandLogChildren.
   217                 parseCommandLogChildren.
   218 
   218 
   219     self assert: children first second size == 3.
   219     self assert: children first second size == 3.
   220 
   220 
   221     self assert: children first second first  asString = '6:4e0568ffbf1a'.
   221     self assert: children first second first  printString = '6:4e0568ffbf1a'.
   222     self assert: children first second second asString = '5:f22945219f9b'.
   222     self assert: children first second second printString = '5:f22945219f9b'.
   223     self assert: children first second third  asString = '4:5bd21fb5eea8'.
   223     self assert: children first second third  printString = '4:5bd21fb5eea8'.
   224 
   224 
   225     "Created: / 05-12-2012 / 23:35:35 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   225     "Created: / 05-12-2012 / 23:35:35 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
   226     "Modified: / 30-10-2017 / 20:59:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   226 !
   227 !
   227 
   228 
   228 test_cmd_log_file_01
   229 test_cmd_log_file_01
   229 
   230 
   230     | heads |
   231     | heads |
   236 ') 
   237 ') 
   237                        parseCommandLogIdsOnly.
   238                        parseCommandLogIdsOnly.
   238 
   239 
   239     self assert: heads size == 3.
   240     self assert: heads size == 3.
   240 
   241 
   241     self assert: heads first  asString = '6:4e0568ffbf1a'.
   242     self assert: heads first  printString = '6:4e0568ffbf1a'.
   242     self assert: heads second asString = '5:f22945219f9b'.
   243     self assert: heads second printString = '5:f22945219f9b'.
   243     self assert: heads third  asString = '4:5bd21fb5eea8'.
   244     self assert: heads third  printString = '4:5bd21fb5eea8'.
   244 
   245 
   245     "Created: / 05-12-2012 / 19:16:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   246     "Created: / 05-12-2012 / 19:16:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   246     "Modified: / 08-02-2014 / 22:17:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   247     "Modified: / 30-10-2017 / 20:59:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   247 !
   248 !
   248 
   249 
   249 test_cmd_merge_01
   250 test_cmd_merge_01
   250 
   251 
   251     | nergeinfo |
   252     | nergeinfo |