eggplant 0.2.7

eggplant is a High-Level Rust API crate for Egglog
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

use eggplant::basic_tx_rx_vt;
use eggplant::func;
use eggplant::prelude::*;

#[eggplant::dsl]
enum Cons {
    Value { v: i64, con: Cons },
    End {},
}

#[eggplant::dsl]
struct VecCon {
    v: VecContainer<Cons>,
}

#[eggplant::dsl]
enum Root {
    V { v: VecCon },
}

#[func(output=Root)]
struct Selected {}

fn main() {
    env_logger::init();
    let end = End::new();
    let node1 = Value::new(1, &end);
    let mut node2 = Value::new(2, &node1);
    let _node3 = Value::new(3, &node2);
    let mut root = V::new(&VecCon::new(vec![&node2]));
    println!("node2's current version is {}", node2.cur_sym());
    // node2.set_v(4).stage();
    root.commit();

    println!("node2's current version is {}", node2.cur_sym());
    node2.set_v(6).stage();
    root.commit();
    root.pull();
    // let old_root = root.clone();
    Selected::<MyTx>::set((), &root);
    root.locate_latest();
    Selected::<MyTx>::set((), &root);
    // MyTx::on_union(&root, &old_root);
    // MyTx::on_union(&node2, &end);
    // MyTx::on_union(&node1, &end);
    MyTx::egraph_to_dot("egraph0.dot");
    MyTx::wag_to_dot("wag0.dot");
    let selected = Selected::<MyTx>::get(());
    println!("selected is {:?}", selected.cur_sym());
    MyTx::egraph_to_dot("egraph1.dot");
    MyTx::wag_to_dot("wag1.dot");
}

basic_tx_rx_vt!(MyTx);