wcore 0.5.1

A highly abstracted mathematical programming language
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

use criterion::{black_box, criterion_group, criterion_main, Criterion};
use wcore::{evaluator::WEval, models::*};

fn factorial(n: f64) -> f64 {
    let code = format!("
factorial <-|
  $0 2 < -> 1
  $0 $0 1 sub factorial mul

{} factorial
", n);
    let mut state = State::new();
    match state.apply(&code)[0][0] {
        Token::Value(x) => x,
        _ => panic!("Invalid response!"),
    }
}

fn criterion_benchmark(c: &mut Criterion) {
    c.bench_function("factorial", |b| b.iter(|| factorial(black_box(20.))));
}

criterion_group!(benches, criterion_benchmark);
criterion_main!(benches);