syndicate-lang
/
syndicate-js
1
0
Fork 0
Code Issues 1 Pull Requests Projects Releases Wiki Activity

Skeleton.isCompletelyConcrete

This commit is contained in:
Tony Garnock-Jones 2018-12-14 13:01:54 +00:00
parent 0f4a572393
commit f538891a25
1 changed files with 14 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
packages/core/src/skeleton.js
View File

@ -447,6 +447,19 @@ function match(p, v) {
return walk(p, v) ? captures : false;
}
function isCompletelyConcrete(p) {
function walk(p) {
if (Capture.isClassOf(p)) return false;
if (Discard.isClassOf(p)) return false;
const cls = classOf(p);
if (cls === null) return true;
if (typeof cls === 'number') return p.every(walk);
return p.fields.every(walk);
}
return walk(p);
}
///////////////////////////////////////////////////////////////////////////
module.exports.EVENT_ADDED = EVENT_ADDED;
@ -457,3 +470,4 @@ module.exports.Index = Index;
module.exports.analyzeAssertion = analyzeAssertion;
module.exports.instantiateAssertion = instantiateAssertion;
module.exports.match = match;
module.exports.isCompletelyConcrete = isCompletelyConcrete;