rules 0.0.2

An implementation of Perl 6 regex rules
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59

use super::generate;

#[test]
fn partial_overlap() {
    let left       = generate(vec![('4', '6'), ('3', '4')]);
    let left_full  = generate(vec![('4', '6'), ('3', '6')]);
    
    let right      = generate(vec![('3', '4'), ('4', '6')]);
    let right_full = generate(vec![('3', '4'), ('3', '6')]);

    let other  = generate(vec![('3', '6')]);

    assert_eq!(left, other);
    assert_eq!(left_full, other);
    assert_eq!(right, other);
    assert_eq!(right_full, other);
}
#[test]
fn subset() {
    let inner = generate(vec![('1', '5'), ('2', '3')]);
    let left  = generate(vec![('1', '5'), ('1', '3')]);
    let right = generate(vec![('1', '5'), ('2', '5')]);
    let both  = generate(vec![('1', '5'), ('1', '5')]);

    let other = generate(vec![('1', '5')]);

    assert_eq!(inner, other);
    assert_eq!(left, other);
    assert_eq!(right, other);
    assert_eq!(both, other);
}
#[test]
fn superset() {
    let set   = generate(vec![('3', '5'), ('2', '6')]);
    let other = generate(vec![('2', '6')]);

    assert_eq!(other, set);
}
#[test]
fn disjoint() {
    let set   = generate(vec![('2', '4'), ('6', '8')]);
    let other = generate(vec![('6', '8'), ('2', '4')]);

    assert_eq!(other, set);
}
#[test]
fn disjoint_extend() {
    let left  = generate(vec![('5', '8'), ('2', '4')]);
    let right = generate(vec![('2', '4'), ('5', '8')]);
    let other = generate(vec![('2', '8')]);

    assert_eq!(other, left);
    assert_eq!(other, right);
}
#[test]
#[should_panic]
fn panic_on_decreasing_order() {
    generate(vec![('5', '3')]);
}