hara-native 0.1.13

HAL-free native host runtime and package launcher for Hara
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

use super::{Keyword, Symbol};
use num_bigint::BigInt;
use std::rc::Rc;

#[derive(Debug, Clone, PartialEq)]
pub enum MetadataValue {
    Nil,
    Boolean(bool),
    Number(i64),
    Float(f64),
    BigInteger(BigInt),
    Character(char),
    Regex(String),
    Tagged(String, Box<MetadataValue>),
    String(String),
    Keyword(Keyword),
    Symbol(Symbol),
    Vector(Vec<MetadataValue>),
    List(Vec<MetadataValue>),
    Set(Vec<MetadataValue>),
    Map(Vec<(MetadataValue, MetadataValue)>),
}

#[derive(Debug, Clone, Default, PartialEq)]
pub struct Metadata {
    entries: Vec<(MetadataValue, MetadataValue)>,
}

impl Metadata {
    pub fn new(entries: Vec<(MetadataValue, MetadataValue)>) -> Rc<Self> {
        Rc::new(Self { entries })
    }

    pub fn document(value: impl Into<String>) -> Rc<Self> {
        Self::new(vec![(
            MetadataValue::Keyword(Keyword::from("doc")),
            MetadataValue::String(value.into()),
        )])
    }

    pub fn entries(&self) -> &[(MetadataValue, MetadataValue)] {
        &self.entries
    }

    pub fn get(&self, key: &MetadataValue) -> Option<&MetadataValue> {
        self.entries
            .iter()
            .rev()
            .find(|(candidate, _)| candidate == key)
            .map(|(_, value)| value)
    }

    pub fn get_keyword(&self, key: &str) -> Option<&MetadataValue> {
        self.get(&MetadataValue::Keyword(Keyword::from(key)))
    }

    pub fn flag(&self, key: &str) -> bool {
        matches!(self.get_keyword(key), Some(MetadataValue::Boolean(true)))
    }

    pub fn doc(&self) -> Option<&str> {
        match self.get_keyword("doc") {
            Some(MetadataValue::String(value)) => Some(value),
            _ => None,
        }
    }
}