-
Notifications
You must be signed in to change notification settings - Fork 2
/
opal-utils.js
79 lines (65 loc) · 1.8 KB
/
opal-utils.js
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
69
70
71
72
73
74
75
76
77
78
79
const debug = require('debug')('asciidoctor.js-pug:opal-utils');
/**
The 'patch' methods allows to dynamically override a method
from an Opal object.
The replaced method is returned.
*/
module.exports.patch = patch;
function patch(klass, name, fn) {
const inherited = klass.$$proto[name];
Opal.defn(klass, name, fn);
return inherited;
}
/**
Subclass an Opal class from JavaScript.
If the superclass class is not provided, defaults to `Opal.Object`.
Supports three signatures:
```
// create a named class
subclass(module, superclass, 'name', { ... })
// Create an anonymous class
subclass(superclass, { ... })
// Create an anonymous class with Object as superclass
subclass({ ... })
```
*/
module.exports.subclass = subclass;
function subclass(base, superclass, id, desc) {
debug(1);
if (arguments.length == 1) {
desc = base;
superclass = Opal.Object;
base = id = undefined;
}
else if (arguments.length == 2) {
desc = superclass;
superclass = base;
base = id = null;
}
const C = (id) ? Opal.klass(base, superclass, id, function() {})
: Opal.Class.$new(superclass);
for(let [key, value] of Object.entries(desc)) {
patch(C, key, value);
}
Opal.defn(C, 'inherited', function(base, name) { return base.$$proto[name].bind(this); });
return C;
}
module.exports.const_get_qualified = const_get_qualified;
function const_get_qualified(base, path) {
if (arguments.length == 1) {
path = base;
base = '::';
}
const parts = path.split('::');
// special case of root anchored module -- ingore base in that case
if (parts[0] === '') {
parts.shift();
base = '::';
}
for(let part of parts) {
base = Opal.const_get_qualified(base, part, 'skip_raise');
if (!base)
break;
}
return base;
}