add system call preliminaries

This commit is contained in:
Mark Thom
2018-05-07 22:29:02 -06:00
parent 1a0f50200f
commit 24d6fb16a8
2 changed files with 4 additions and 7 deletions

View File

@@ -399,7 +399,10 @@ impl RelationWorker {
Term::Var(_, ref v) if v.as_str() == "!" =>
Ok(QueryTerm::UnblockedCut(Cell::default())),
Term::Clause(r, name, mut terms, fixity) =>
if let Some(inlined_ct) = InlinedClauseType::from(name.as_str(), terms.len()) {
if let Some(system_ct) = SystemClauseType::from(name.as_str(), terms.len()) {
Ok(QueryTerm::Clause(r, ClauseType::System(system_ct), terms))
}
else if let Some(inlined_ct) = InlinedClauseType::from(name.as_str(), terms.len()) {
Ok(QueryTerm::Clause(r, ClauseType::Inlined(inlined_ct), terms))
} else if name.as_str() == ";" {
if terms.len() == 2 {