amaru-uplc 0.1.0

A UPLC Evaluator as a CEK machine
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

pub mod builtin_costs;
pub(crate) mod cost_map;
mod costing;
pub mod ex_budget;
mod machine_costs;
mod value;

pub use value::*;

use crate::machine::{
    cost_model::{builtin_costs::BuiltinCostModel, machine_costs::MachineCosts},
    ExBudget, PlutusVersion,
};

#[derive(Debug, PartialEq)]
pub struct CostModel<B: BuiltinCostModel> {
    pub machine_startup: ExBudget,
    pub machine_costs: MachineCosts,
    pub builtin_costs: B,
}

impl<B: BuiltinCostModel> CostModel<B> {
    pub fn initialize_cost_model(version: &PlutusVersion, cost_model: &[i64]) -> CostModel<B> {
        let cost_map = cost_map::CostMap::new(version, cost_model);
        Self {
            machine_startup: ExBudget {
                mem: cost_map["cek_startup_cost-exBudgetmem"],
                cpu: cost_map["cek_startup_cost-exBudgetCPU"],
            },
            machine_costs: MachineCosts::initialize_machine_costs(&cost_map),
            builtin_costs: B::initialize(&cost_map),
        }
    }
}

impl<B: BuiltinCostModel + Default> Default for CostModel<B> {
    fn default() -> Self {
        Self {
            machine_startup: ExBudget::start_up(),
            machine_costs: Default::default(),
            builtin_costs: Default::default(),
        }
    }
}

#[repr(usize)]
pub enum StepKind {
    Constant = 0,
    Var = 1,
    Lambda = 2,
    Apply = 3,
    Delay = 4,
    Force = 5,
    Builtin = 6,
    Constr = 7,
    Case = 8,
}