rishi/scryer-prolog
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

do not emit indexing instructions for single clause subsequences (#1503)

Browse Source
This commit is contained in:
Mark Thom
2022-06-04 15:29:00 -06:00
parent 140a199805
commit ab4f93dcee
1 changed files with 11 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
src/codegen.rs
View File

@@ -1130,7 +1130,6 @@ impl<'b> CodeGenerator<'b> {
if clauses.len() > 1 {
let choice = match i {
0 => self.settings.internal_try_me_else(clause_code.len() + 1),
//Instruction::TryMeElse(clause_code.len() + 1),
_ if i == clauses.len() - 1 => self.settings.internal_trust_me(),
_ => self.settings.internal_retry_me_else(clause_code.len() + 1),
};
@@ -1152,18 +1151,15 @@ impl<'b> CodeGenerator<'b> {
skip_stub_try_me_else = !self.settings.is_dynamic();
}
let arg = match clause.args() {
Some(args) => match args.iter().nth(optimal_index) {
Some(term) => Some(term),
None => None,
},
None => None,
};
let arg = clause.args().and_then(|args| args.iter().nth(optimal_index));
if let Some(arg) = arg {
let index = code.len();
if clauses.len() > 1 {
code_offsets.index_term(arg, index, &mut clause_index_info, self.atom_tbl);
}
}
if !(code_offsets.no_indices() && clauses.len() == 1 && self.settings.is_extensible) {
// the peculiar condition of this block, when false,
@@ -1182,7 +1178,12 @@ impl<'b> CodeGenerator<'b> {
code.extend(clause_code.into_iter());
}
let index_code = code_offsets.compute_indices(skip_stub_try_me_else);
let index_code = if clauses.len() > 1 {
code_offsets.compute_indices(skip_stub_try_me_else)
} else {
vec![]
};
self.global_jmp_by_locs_offset = jmp_by_locs_len;
if !index_code.is_empty() {