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
use super::*;
use crate::fold::shift::Shift;
#[derive(FallibleTypeFolder)]
pub struct Subst<'s, I: Interner> {
parameters: &'s [GenericArg<I>],
interner: I,
}
impl<I: Interner> Subst<'_, I> {
pub fn apply<T: TypeFoldable<I>>(interner: I, parameters: &[GenericArg<I>], value: T) -> T {
value
.try_fold_with(
&mut Subst {
parameters,
interner,
},
DebruijnIndex::INNERMOST,
)
.unwrap()
}
}
impl<I: Interner> TypeFolder<I> for Subst<'_, I> {
fn as_dyn(&mut self) -> &mut dyn TypeFolder<I> {
self
}
fn fold_free_var_ty(&mut self, bound_var: BoundVar, outer_binder: DebruijnIndex) -> Ty<I> {
if let Some(index) = bound_var.index_if_innermost() {
match self.parameters[index].data(TypeFolder::interner(self)) {
GenericArgData::Ty(t) => t
.clone()
.shifted_in_from(TypeFolder::interner(self), outer_binder),
_ => panic!("mismatched kinds in substitution"),
}
} else {
bound_var
.shifted_out()
.expect("cannot fail because this is not the innermost")
.shifted_in_from(outer_binder)
.to_ty(TypeFolder::interner(self))
}
}
fn fold_free_var_lifetime(
&mut self,
bound_var: BoundVar,
outer_binder: DebruijnIndex,
) -> Lifetime<I> {
if let Some(index) = bound_var.index_if_innermost() {
match self.parameters[index].data(TypeFolder::interner(self)) {
GenericArgData::Lifetime(l) => l
.clone()
.shifted_in_from(TypeFolder::interner(self), outer_binder),
_ => panic!("mismatched kinds in substitution"),
}
} else {
bound_var
.shifted_out()
.unwrap()
.shifted_in_from(outer_binder)
.to_lifetime(TypeFolder::interner(self))
}
}
fn fold_free_var_const(
&mut self,
ty: Ty<I>,
bound_var: BoundVar,
outer_binder: DebruijnIndex,
) -> Const<I> {
if let Some(index) = bound_var.index_if_innermost() {
match self.parameters[index].data(TypeFolder::interner(self)) {
GenericArgData::Const(c) => c
.clone()
.shifted_in_from(TypeFolder::interner(self), outer_binder),
_ => panic!("mismatched kinds in substitution"),
}
} else {
bound_var
.shifted_out()
.unwrap()
.shifted_in_from(outer_binder)
.to_const(TypeFolder::interner(self), ty)
}
}
fn interner(&self) -> I {
self.interner
}
}