xlog-logic 0.9.2

Parser, compiler, and optimizer for XLOG logic programs
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
60
61
62
63
64
65
66
67
68
69

//! Tests for module system parsing

use xlog_logic::parse_program;

#[test]
fn test_parse_use_all() {
    let src = r#"
        use graph.
        edge(1, 2).
    "#;
    let program = parse_program(src).unwrap();
    assert_eq!(program.imports.len(), 1);
    assert_eq!(program.imports[0].module_path, vec!["graph"]);
    assert!(program.imports[0].imports.is_none());
}

#[test]
fn test_parse_use_selective() {
    let src = r#"
        use graph::{edge, reach}.
        node(1).
    "#;
    let program = parse_program(src).unwrap();
    assert_eq!(program.imports.len(), 1);
    assert_eq!(program.imports[0].module_path, vec!["graph"]);
    assert_eq!(
        program.imports[0].imports,
        Some(vec!["edge".to_string(), "reach".to_string()])
    );
}

#[test]
fn test_parse_use_nested() {
    let src = r#"
        use utils/math.
        use deep/nested/module::{foo}.
    "#;
    let program = parse_program(src).unwrap();
    assert_eq!(program.imports.len(), 2);
    assert_eq!(program.imports[0].module_path, vec!["utils", "math"]);
    assert_eq!(
        program.imports[1].module_path,
        vec!["deep", "nested", "module"]
    );
}

#[test]
fn test_parse_private_pred() {
    let src = r#"
        pred public_pred(u32).
        private pred private_pred(u32, u32).
    "#;
    let program = parse_program(src).unwrap();
    assert_eq!(program.predicates.len(), 2);
    assert!(!program.predicates[0].is_private);
    assert!(program.predicates[1].is_private);
}

#[test]
fn test_parse_multiple_imports() {
    let src = r#"
        use a.
        use b.
        use c/d::{x, y, z}.
        fact(1).
    "#;
    let program = parse_program(src).unwrap();
    assert_eq!(program.imports.len(), 3);
}