Mercurial > feed

comparison src/ur/feed.ur @ 13:7eea7ff1904c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Handle case of finish on self-closing tag.
author Karn Kallio <kkallio@eka>
date Sun, 24 Jul 2011 03:36:07 -0430
parents 43c3fbd8527a
children f641cfcd5153
comparison
equal deleted inserted replaced
12:a40cf9c8d615 13:7eea7ff1904c
371 | Some (data, cont) => 371 | Some (data, cont) =>
372 acc <- f data acc; 372 acc <- f data acc;
373 recur xml acc (if cont then state else p.Initial)) 373 recur xml acc (if cont then state else p.Initial))
374 | Some (data, cont) => 374 | Some (data, cont) =>
375 acc <- f data acc; 375 acc <- f data acc;
376 state <- return (if ended then
377 Option.get p.Initial (p.ExitTag state)
378 else
379 state);
380
376 recur xml acc (if cont then state else p.Initial) 381 recur xml acc (if cont then state else p.Initial)
377 end 382 end
378 in 383 in
379 recur doc acc p.Initial 384 recur doc acc p.Initial
380 end 385 end