Add derive key for Inspect

This commit is contained in:
Richard Feldman 2023-08-28 21:46:17 -04:00 committed by Brendan Hansknecht
parent fb9e0fc777
commit d0841fb018
No known key found for this signature in database
GPG key ID: 0EA784685083E75B
6 changed files with 259 additions and 1 deletions

View file

@ -8,7 +8,7 @@ use roc_can::expr::Expr;
use roc_can::pattern::Pattern;
use roc_can::{def::Def, module::ExposedByModule};
use roc_collections::{MutMap, VecMap};
use roc_derive_key::DeriveKey;
use roc_derive_key::{inspect, DeriveKey};
use roc_module::symbol::{IdentIds, ModuleId, Symbol};
use roc_region::all::Loc;
use roc_types::subs::{
@ -79,6 +79,9 @@ fn build_derived_body(
decoding::derive_decoder(&mut env, decoder_key, derived_symbol)
}
DeriveKey::Hash(hash_key) => hash::derive_hash(&mut env, hash_key, derived_symbol),
DeriveKey::ToInspector(to_inspector_key) => {
inspect::derive_to_inspector(&mut env, to_inspector_key, derived_symbol)
}
};
let def = Def {