language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-09-30 15:21:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

add record_var to Access and Accessor

Browse source
This commit is contained in:
Folkert 2020-03-14 01:13:44 +01:00
parent e62ddc9ef5
commit b43be95b19
5 changed files with 67 additions and 35 deletions
Download patch file Download diff file Expand all files Collapse all files

26
compiler/can/src/expr.rs
View file

@ -95,6 +95,7 @@ pub enum Expr {
/// Look up exactly one field on a record, e.g. (expr).foo.
Access {
record_var: Variable,
ext_var: Variable,
field_var: Variable,
loc_expr: Box<Located<Expr>>,
@ -102,6 +103,7 @@ pub enum Expr {
},
/// field accessor as a function, e.g. (.foo) expr
Accessor {
record_var: Variable,
ext_var: Variable,
field_var: Variable,
field: Lowercase,
@ -488,6 +490,7 @@ pub fn canonicalize_expr<'a>(
(
Access {
record_var: var_store.fresh(),
field_var: var_store.fresh(),
ext_var: var_store.fresh(),
loc_expr: Box::new(loc_expr),
@ -496,20 +499,15 @@ pub fn canonicalize_expr<'a>(
output,
)
}
ast::Expr::AccessorFunction(field) => {
let ext_var = var_store.fresh();
let field_var = var_store.fresh();
let field_name: Lowercase = (*field).into();
(
Accessor {
field: field_name,
ext_var,
field_var,
},
Output::default(),
)
}
ast::Expr::AccessorFunction(field) => (
Accessor {
record_var: var_store.fresh(),
ext_var: var_store.fresh(),
field_var: var_store.fresh(),
field: (*field).into(),
},
Output::default(),
),
ast::Expr::GlobalTag(tag) => {
let variant_var = var_store.fresh();
let ext_var = var_store.fresh();