summaryrefslogtreecommitdiff
path: root/dhall/src/phase
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--dhall/src/phase/typecheck.rs3
1 files changed, 1 insertions, 2 deletions
diff --git a/dhall/src/phase/typecheck.rs b/dhall/src/phase/typecheck.rs
index 56fb5ed..2030f21 100644
--- a/dhall/src/phase/typecheck.rs
+++ b/dhall/src/phase/typecheck.rs
@@ -564,13 +564,12 @@ fn type_last_layer(
Value::UnionType(kts) => match kts.get(&x) {
// Constructor has type T -> < x: T, ... >
Some(Some(t)) => {
- // TODO: avoid capture
Ok(RetTypeOnly(
tck_pi_type(
ctx,
"_".into(),
t.to_type(),
- r.clone(),
+ r.under_binder(Label::from("_")),
)?.to_type()
))
},