hacklab/strudel
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Support subpattern sequences in stack like slowcat in ref #87

Browse source
This commit is contained in:
alex 2022-04-23 09:47:12 +01:00
parent 9df20fcbc5
commit a4cacc079e
2 changed files with 11 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

8
packages/core/pattern.mjs
View file

@ -826,11 +826,13 @@ export function reify(thing) {
}
return pure(thing);
}
// Basic functions for combining patterns
export function stack(...pats) {
const reified = pats.map((pat) => reify(pat));
const query = (state) => flatten(reified.map((pat) => pat.query(state)));
// Array test here is to avoid infinite recursions..
pats = pats.map((pat) => (Array.isArray(pat) ? sequence(...pat) : reify(pat)));
const query = (state) => flatten(pats.map((pat) => pat.query(state)));
return new Pattern(query);
}
@ -839,7 +841,7 @@ export function slowcat(...pats) {
// successively, one per cycle.
// Array test here is to avoid infinite recursions..
pats = pats.map(pat => Array.isArray(pat) ? sequence(...pat) : reify(pat));
pats = pats.map((pat) => (Array.isArray(pat) ? sequence(...pat) : reify(pat)));
const query = function (state) {
const span = state.span;

6
packages/core/test/pattern.test.mjs
View file

@ -247,6 +247,12 @@ describe('Pattern', function () {
['a', 'b', 'c'],
);
});
it('Can stack subpatterns', function () {
sameFirst(
stack('a', ['b','c']),
stack('a', sequence('b', 'c')),
);
});
});
describe('_fast()', function () {
it('Makes things faster', function () {