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

Test passing in debug but not release

Browse source
This commit is contained in:
Joshua Hoeflich 2021-08-09 22:03:01 -05:00
parent 8c13fecc64
commit ba360a2dd2
2 changed files with 65 additions and 16 deletions
Download patch file Download diff file Expand all files Collapse all files

50
compiler/can/src/builtins.rs
View file

@ -1551,7 +1551,55 @@ fn str_from_utf8_range(symbol: Symbol, var_store: &mut VarStore) -> Def {
),
};
let body = LetNonRec(Box::new(def), Box::new(no_region(cont)), ret_var);
let roc_result = LetNonRec(Box::new(def), Box::new(no_region(cont)), ret_var);
// Only do the business with the let if we're in bounds!
let start_var = var_store.fresh();
let start_bool = var_store.fresh();
let body = If {
cond_var: start_bool,
branch_var: ret_var,
branches: vec![(
no_region(RunLowLevel {
op: LowLevel::NumLt,
args: vec![
(
start_var,
Access {
record_var: arg_record_var,
ext_var: var_store.fresh(),
field: "start".into(),
field_var: var_store.fresh(),
loc_expr: Box::new(no_region(Var(Symbol::ARG_2))),
},
),
(
start_var,
RunLowLevel {
op: LowLevel::ListLen,
args: vec![(bytes_var, Var(Symbol::ARG_1))],
ret_var: start_var,
},
),
],
ret_var: start_bool,
}),
no_region(roc_result),
)],
final_else: Box::new(
// else-branch
no_region(
// Err
tag(
"Err",
vec![tag("OutOfBounds", Vec::new(), var_store)],
var_store,
),
),
),
};
defn(
symbol,