move record index to start of update

This commit is contained in:
J.Teeuwissen 2023-05-27 14:42:37 +02:00
parent 9b58c0fb9c
commit 378a298b45
No known key found for this signature in database
GPG key ID: DB5F7A1ED8D478AD
6 changed files with 291 additions and 106 deletions

View file

@ -32,7 +32,7 @@ use roc_module::symbol::{
};
use roc_mono::ir::{
CapturedSymbols, ExternalSpecializations, GlueLayouts, LambdaSetId, PartialProc, Proc,
ProcLayout, Procs, ProcsBase, UpdateModeIds,
ProcLayout, Procs, ProcsBase, UpdateModeIds, UsageTrackingMap,
};
use roc_mono::layout::LayoutInterner;
use roc_mono::layout::{
@ -5783,6 +5783,7 @@ fn make_specializations<'a>(
abilities: AbilitiesView::World(&world_abilities),
exposed_by_module,
derived_module: &derived_module,
struct_indexing: UsageTrackingMap::new(),
};
let mut procs = Procs::new_in(arena);
@ -5883,6 +5884,7 @@ fn build_pending_specializations<'a>(
abilities: AbilitiesView::Module(&abilities_store),
exposed_by_module,
derived_module: &derived_module,
struct_indexing: UsageTrackingMap::new(),
};
let layout_cache_snapshot = layout_cache.snapshot();
@ -6364,6 +6366,7 @@ fn load_derived_partial_procs<'a>(
abilities: AbilitiesView::World(world_abilities),
exposed_by_module,
derived_module,
struct_indexing: UsageTrackingMap::new(),
};
let partial_proc = match derived_expr {