diff options
author | Nadrieril | 2019-12-24 21:46:29 +0000 |
---|---|---|
committer | Nadrieril | 2019-12-24 21:46:29 +0000 |
commit | f5a588defc0ad22ce2f0d3b32ef8f0e22e43e672 (patch) | |
tree | 405bcef717b1a7ab0ec8de898ca5264698c39362 /dhall/src/semantics/core | |
parent | 611d4ced3a5ffca8b9765971001995a216dbbb54 (diff) |
Ensure inferred type is always in normal form
Diffstat (limited to 'dhall/src/semantics/core')
-rw-r--r-- | dhall/src/semantics/core/value.rs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/dhall/src/semantics/core/value.rs b/dhall/src/semantics/core/value.rs index ca7c4bc..6fa00ac 100644 --- a/dhall/src/semantics/core/value.rs +++ b/dhall/src/semantics/core/value.rs @@ -200,6 +200,9 @@ impl Value { WHNF | NF => {} } } + pub(crate) fn normalize_nf(&self) { + self.as_internal_mut().normalize_nf(); + } pub(crate) fn app(&self, v: Value) -> Value { let body_t = match &*self.get_type_not_sort().as_whnf() { |