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
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
#[macro_export]
macro_rules! impl_external {
($external:ty) => {
impl $crate::ValueType for $external {
fn value_type() -> $crate::Type {
$crate::Type::Hash($crate::Hash::from_type_id(
std::any::TypeId::of::<$external>(),
))
}
fn type_info() -> $crate::TypeInfo {
$crate::TypeInfo::Any(std::any::type_name::<$external>())
}
}
impl $crate::FromValue for $external {
fn from_value(value: $crate::Value) -> Result<Self, $crate::VmError> {
let any = value.into_any()?;
let any = any.take_downcast::<$external>()?;
Ok(any)
}
}
impl $crate::ToValue for $external {
fn to_value(self) -> Result<$crate::Value, $crate::VmError> {
let any = $crate::Any::new(self);
let shared = $crate::Shared::new(any);
Ok($crate::Value::Any(shared))
}
}
impl<'a> $crate::UnsafeFromValue for &'a $external {
type Output = *const $external;
type Guard = $crate::RawOwnedRef;
unsafe fn unsafe_from_value(
value: $crate::Value,
) -> Result<(Self::Output, Self::Guard), $crate::VmError> {
Ok(value.unsafe_into_any_ref()?)
}
unsafe fn to_arg(output: Self::Output) -> Self {
&*output
}
}
impl<'a> $crate::UnsafeFromValue for &'a mut $external {
type Output = *mut $external;
type Guard = $crate::RawOwnedMut;
unsafe fn unsafe_from_value(
value: $crate::Value,
) -> Result<(Self::Output, Self::Guard), $crate::VmError> {
Ok(value.unsafe_into_any_mut()?)
}
unsafe fn to_arg(output: Self::Output) -> Self {
&mut *output
}
}
};
}
macro_rules! impl_static_type {
(impl <$($p:ident),*> $ty:ty => $static_type:expr) => {
impl<$($p,)*> $crate::ValueType for $ty {
fn value_type() -> $crate::Type {
$crate::Type::StaticType($static_type)
}
fn type_info() -> $crate::TypeInfo {
$crate::TypeInfo::StaticType($static_type)
}
}
};
($ty:ty => $static_type:expr) => {
impl $crate::ValueType for $ty {
fn value_type() -> $crate::Type {
$crate::Type::StaticType($static_type)
}
fn type_info() -> $crate::TypeInfo {
$crate::TypeInfo::StaticType($static_type)
}
}
};
}
macro_rules! repeat_macro {
($macro:tt) => {
$macro! {
{A, a, 16},
{B, b, 15},
{C, c, 14},
{D, d, 13},
{E, e, 12},
{F, f, 11},
{G, g, 10},
{H, h, 9},
{I, i, 8},
{J, j, 7},
{K, k, 6},
{L, l, 5},
{M, m, 4},
{N, n, 3},
{O, o, 2},
{P, p, 1},
}
};
}