2012-07-04 22:53:12 +01:00
|
|
|
//! A general sorting pass
|
2012-01-29 14:15:14 -08:00
|
|
|
|
2012-07-11 15:00:40 -07:00
|
|
|
import doc::item_utils;
|
2012-01-29 14:15:14 -08:00
|
|
|
import std::sort;
|
|
|
|
|
|
|
|
export item_lteq, mk_pass;
|
|
|
|
|
2012-08-02 15:42:56 -07:00
|
|
|
type item_lteq = pure fn~(v1: &doc::itemtag, v2: &doc::itemtag) -> bool;
|
2012-01-29 14:15:14 -08:00
|
|
|
|
2012-07-13 22:57:48 -07:00
|
|
|
fn mk_pass(name: ~str, +lteq: item_lteq) -> pass {
|
2012-02-27 18:07:16 -08:00
|
|
|
{
|
|
|
|
name: name,
|
2012-03-02 18:33:25 -08:00
|
|
|
f: fn~(srv: astsrv::srv, doc: doc::doc) -> doc::doc {
|
2012-02-27 18:07:16 -08:00
|
|
|
run(srv, doc, lteq)
|
|
|
|
}
|
2012-01-29 14:15:14 -08:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2012-08-01 13:35:33 -07:00
|
|
|
#[allow(non_implicitly_copyable_typarams)]
|
2012-01-29 14:15:14 -08:00
|
|
|
fn run(
|
|
|
|
_srv: astsrv::srv,
|
2012-03-02 18:33:25 -08:00
|
|
|
doc: doc::doc,
|
2012-01-29 14:15:14 -08:00
|
|
|
lteq: item_lteq
|
2012-03-02 18:33:25 -08:00
|
|
|
) -> doc::doc {
|
2012-01-29 14:15:14 -08:00
|
|
|
let fold = fold::fold({
|
|
|
|
fold_mod: fold_mod
|
2012-02-20 22:24:59 -08:00
|
|
|
with *fold::default_any_fold(lteq)
|
2012-01-29 14:15:14 -08:00
|
|
|
});
|
2012-03-02 18:33:25 -08:00
|
|
|
fold.fold_doc(fold, doc)
|
2012-01-29 14:15:14 -08:00
|
|
|
}
|
|
|
|
|
2012-08-01 13:35:33 -07:00
|
|
|
#[allow(non_implicitly_copyable_typarams)]
|
2012-01-29 14:15:14 -08:00
|
|
|
fn fold_mod(
|
|
|
|
fold: fold::fold<item_lteq>,
|
|
|
|
doc: doc::moddoc
|
|
|
|
) -> doc::moddoc {
|
2012-02-20 22:24:59 -08:00
|
|
|
let doc = fold::default_any_fold_mod(fold, doc);
|
2012-07-11 15:00:40 -07:00
|
|
|
doc::moddoc_({
|
2012-02-24 13:53:28 -08:00
|
|
|
items: sort::merge_sort(fold.ctxt, doc.items)
|
2012-07-11 15:00:40 -07:00
|
|
|
with *doc
|
|
|
|
})
|
2012-01-29 14:15:14 -08:00
|
|
|
}
|
|
|
|
|
|
|
|
#[test]
|
|
|
|
fn test() {
|
2012-08-02 15:42:56 -07:00
|
|
|
pure fn name_lteq(item1: &doc::itemtag, item2: &doc::itemtag) -> bool {
|
|
|
|
(*item1).name() <= (*item2).name()
|
2012-01-29 14:15:14 -08:00
|
|
|
}
|
|
|
|
|
2012-07-13 22:57:48 -07:00
|
|
|
let source = ~"mod z { mod y { } fn x() { } } mod w { }";
|
2012-06-30 16:19:07 -07:00
|
|
|
do astsrv::from_str(source) |srv| {
|
2012-07-13 22:57:48 -07:00
|
|
|
let doc = extract::from_srv(srv, ~"");
|
|
|
|
let doc = mk_pass(~"", name_lteq).f(srv, doc);
|
|
|
|
assert doc.cratemod().mods()[0].name() == ~"w";
|
|
|
|
assert doc.cratemod().mods()[1].items[0].name() == ~"x";
|
|
|
|
assert doc.cratemod().mods()[1].items[1].name() == ~"y";
|
|
|
|
assert doc.cratemod().mods()[1].name() == ~"z";
|
2012-02-20 21:08:19 -08:00
|
|
|
}
|
2012-01-29 14:15:14 -08:00
|
|
|
}
|
|
|
|
|
|
|
|
#[test]
|
|
|
|
fn should_be_stable() {
|
2012-08-02 15:42:56 -07:00
|
|
|
pure fn always_eq(_item1: &doc::itemtag, _item2: &doc::itemtag) -> bool {
|
2012-01-29 14:15:14 -08:00
|
|
|
true
|
|
|
|
}
|
|
|
|
|
2012-07-13 22:57:48 -07:00
|
|
|
let source = ~"mod a { mod b { } } mod c { mod d { } }";
|
2012-06-30 16:19:07 -07:00
|
|
|
do astsrv::from_str(source) |srv| {
|
2012-07-13 22:57:48 -07:00
|
|
|
let doc = extract::from_srv(srv, ~"");
|
|
|
|
let doc = mk_pass(~"", always_eq).f(srv, doc);
|
|
|
|
assert doc.cratemod().mods()[0].items[0].name() == ~"b";
|
|
|
|
assert doc.cratemod().mods()[1].items[0].name() == ~"d";
|
|
|
|
let doc = mk_pass(~"", always_eq).f(srv, doc);
|
|
|
|
assert doc.cratemod().mods()[0].items[0].name() == ~"b";
|
|
|
|
assert doc.cratemod().mods()[1].items[0].name() == ~"d";
|
2012-02-20 21:08:19 -08:00
|
|
|
}
|
2012-01-29 14:15:14 -08:00
|
|
|
}
|