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

improve call/N implementation (#1829)

Browse Source
This commit is contained in:
Mark
2023-06-10 01:25:47 -06:00
parent 4d982d22c1
commit d7f5675727
8 changed files with 596 additions and 951 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
build/instructions_template.rs
View File

@@ -560,8 +560,8 @@ enum SystemClauseType {
StripModule,
#[strum_discriminants(strum(props(Arity = "4", Name = "$compile_inline_or_expanded_goal")))]
CompileInlineOrExpandedGoal,
#[strum_discriminants(strum(props(Arity = "arity", Name = "$call_inline")))]
InlineCallN(usize),
#[strum_discriminants(strum(props(Arity = "arity", Name = "$fast_call")))]
FastCallN(usize),
#[strum_discriminants(strum(props(Arity = "1", Name = "$is_expanded_or_inlined")))]
IsExpandedOrInlined,
#[strum_discriminants(strum(props(Arity = "3", Name = "$get_clause_p")))]
@@ -1472,11 +1472,11 @@ fn generate_instruction_preface() -> TokenStream {
&Instruction::DefaultExecuteN(arity) => {
functor!(atom!("execute_default_n"), [fixnum(arity)])
}
&Instruction::CallInlineCallN(arity) => {
functor!(atom!("call_n_inline"), [fixnum(arity)])
&Instruction::CallFastCallN(arity) => {
functor!(atom!("call_fast_call_n"), [fixnum(arity)])
}
&Instruction::ExecuteInlineCallN(arity) => {
functor!(atom!("call_n_inline"), [fixnum(arity)])
&Instruction::ExecuteFastCallN(arity) => {
functor!(atom!("execute_fast_call_n"), [fixnum(arity)])
}
&Instruction::CallTermGreaterThan |
&Instruction::CallTermLessThan |