mirror of
https://github.com/eliasstepanik/strudel-docker.git
synced 2026-01-11 13:48:34 +00:00
69 lines
3.0 KiB
JavaScript
69 lines
3.0 KiB
JavaScript
/*
|
|
index.js - <short description TODO>
|
|
Copyright (C) 2022 Strudel contributors - see <https://github.com/tidalcycles/strudel/blob/main/packages/eval/shift-traverser/index.js>
|
|
This program is free software: you can redistribute it and/or modify it under the terms of the GNU Affero General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Affero General Public License for more details. You should have received a copy of the GNU Affero General Public License along with this program. If not, see <https://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
/*
|
|
Copyright (C) 2014 Yusuke Suzuki <utatane.tea@gmail.com>
|
|
|
|
Redistribution and use in source and binary forms, with or without
|
|
modification, are permitted provided that the following conditions are met:
|
|
|
|
* Redistributions of source code must retain the above copyright
|
|
notice, this list of conditions and the following disclaimer.
|
|
* Redistributions in binary form must reproduce the above copyright
|
|
notice, this list of conditions and the following disclaimer in the
|
|
documentation and/or other materials provided with the distribution.
|
|
|
|
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
|
|
AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
ARE DISCLAIMED. IN NO EVENT SHALL <COPYRIGHT HOLDER> BE LIABLE FOR ANY
|
|
DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
|
|
(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
|
LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
|
|
ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
|
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
|
|
THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
import _Spec from 'shift-spec';
|
|
const Spec = _Spec.default || _Spec; // parcel module resolution fuckup
|
|
// import { version } from '../package.json'
|
|
|
|
// Loading uncached estraverse for changing estraverse.Syntax.
|
|
import _estraverse from 'estraverse';
|
|
|
|
const estraverse = _estraverse.cloneEnvironment();
|
|
|
|
// Adjust estraverse members.
|
|
|
|
Object.keys(estraverse.Syntax)
|
|
.filter((key) => key !== 'Property')
|
|
.forEach((key) => {
|
|
delete estraverse.Syntax[key];
|
|
delete estraverse.VisitorKeys[key];
|
|
});
|
|
|
|
Object.assign(
|
|
estraverse.Syntax,
|
|
Object.keys(Spec).reduce((result, key) => {
|
|
result[key] = key;
|
|
return result;
|
|
}, {}),
|
|
);
|
|
|
|
Object.assign(
|
|
estraverse.VisitorKeys,
|
|
Object.keys(Spec).reduce((result, key) => {
|
|
result[key] = Spec[key].fields.map((field) => field.name);
|
|
return result;
|
|
}, {}),
|
|
);
|
|
|
|
// estraverse.version = version;
|
|
export default estraverse;
|
|
|
|
/* vim: set sw=4 ts=4 et tw=80 : */
|