1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
|
'use strict';
var _createClass = function () { function defineProperties(target, props) { for (var i = 0; i < props.length; i++) { var descriptor = props[i]; descriptor.enumerable = descriptor.enumerable || false; descriptor.configurable = true; if ("value" in descriptor) descriptor.writable = true; Object.defineProperty(target, descriptor.key, descriptor); } } return function (Constructor, protoProps, staticProps) { if (protoProps) defineProperties(Constructor.prototype, protoProps); if (staticProps) defineProperties(Constructor, staticProps); return Constructor; }; }();
function _toArray(arr) { return Array.isArray(arr) ? arr : Array.from(arr); }
function _toConsumableArray(arr) { if (Array.isArray(arr)) { for (var i = 0, arr2 = Array(arr.length); i < arr.length; i++) { arr2[i] = arr[i]; } return arr2; } else { return Array.from(arr); } }
function _classCallCheck(instance, Constructor) { if (!(instance instanceof Constructor)) { throw new TypeError("Cannot call a class as a function"); } }
function _possibleConstructorReturn(self, call) { if (!self) { throw new ReferenceError("this hasn't been initialised - super() hasn't been called"); } return call && (typeof call === "object" || typeof call === "function") ? call : self; }
function _inherits(subClass, superClass) { if (typeof superClass !== "function" && superClass !== null) { throw new TypeError("Super expression must either be null or a function, not " + typeof superClass); } subClass.prototype = Object.create(superClass && superClass.prototype, { constructor: { value: subClass, enumerable: false, writable: true, configurable: true } }); if (superClass) Object.setPrototypeOf ? Object.setPrototypeOf(subClass, superClass) : subClass.__proto__ = superClass; }
var path = require('path');
exports.PscError = function (_Error) {
_inherits(PscError, _Error);
function PscError(message, modules) {
_classCallCheck(this, PscError);
var _this = _possibleConstructorReturn(this, (PscError.__proto__ || Object.getPrototypeOf(PscError)).call(this, message));
_this.modules = modules;
_this.isPscError = true;
return _this;
}
_createClass(PscError, null, [{
key: 'name',
get: function get() {
return 'PscError';
}
}]);
return PscError;
}(Error);
var repeat = function repeat(value, times) {
return times <= 0 ? [] : [value].concat(_toConsumableArray(repeat(value, times - 1)));
};
var diffPursModuleNames = function diffPursModuleNames(from, target, parts) {
if (!from.length) return parts.concat(target);
if (!target.length) return parts.concat(repeat('..', from.length));
var _from = _toArray(from),
head_from = _from[0],
tail_from = _from.slice(1);
var _target = _toArray(target),
head_target = _target[0],
tail_target = _target.slice(1);
return head_from === head_target ? diffPursModuleNames(tail_from, tail_target, parts) : parts.concat(repeat('..', from.length), target);
};
exports.resolvePursModule = function (_ref) {
var baseModulePath = _ref.baseModulePath,
baseModuleName = _ref.baseModuleName,
targetModuleName = _ref.targetModuleName;
var parts = diffPursModuleNames(baseModuleName.split('.'), targetModuleName.split('.'), []);
return parts.length ? path.resolve(baseModulePath, path.join.apply(path, _toConsumableArray(parts)) + '.purs') : baseModulePath;
};
exports.resolveForeignModule = function (pursModulePath) {
return path.join(path.dirname(pursModulePath), path.basename(pursModulePath, path.extname(pursModulePath)) + '.js');
};
|
