|
1
|
|
|
import inspect |
|
2
|
|
|
import weakref |
|
3
|
|
|
|
|
4
|
|
|
|
|
5
|
|
|
class ADTConstructor: |
|
6
|
|
|
"""Base class for ADT Constructor classes.""" |
|
7
|
|
|
|
|
8
|
|
|
__slots__ = () |
|
9
|
|
|
|
|
10
|
|
|
def __new__(cls, *args, **kwargs): |
|
11
|
|
|
"""Explicitly forward to base class.""" |
|
12
|
|
|
return super().__new__(cls, *args, **kwargs) |
|
13
|
|
|
|
|
14
|
|
|
def __dir__(self): |
|
15
|
|
|
super_dir = super().__dir__() |
|
16
|
|
|
my_dir = [] |
|
17
|
|
|
for attribute in super_dir: |
|
18
|
|
|
static_attribute = inspect.getattr_static(self, attribute) |
|
19
|
|
|
if attribute in SHADOWED_ATTRIBUTES and static_attribute is None: |
|
20
|
|
|
continue |
|
21
|
|
|
if isinstance(static_attribute, ADTMember): |
|
22
|
|
|
continue |
|
23
|
|
|
my_dir.append(attribute) |
|
24
|
|
|
return my_dir |
|
25
|
|
|
|
|
26
|
|
|
__eq__ = object.__eq__ |
|
27
|
|
|
__ne__ = object.__ne__ |
|
28
|
|
|
__hash__ = object.__hash__ |
|
29
|
|
|
|
|
30
|
|
|
|
|
31
|
|
|
SHADOWED_ATTRIBUTES = { |
|
32
|
|
|
'__add__', |
|
33
|
|
|
'__contains__', |
|
34
|
|
|
'__getitem__', |
|
35
|
|
|
'__iter__', |
|
36
|
|
|
'__len__', |
|
37
|
|
|
'__mul__', |
|
38
|
|
|
'__rmul__', |
|
39
|
|
|
'count', |
|
40
|
|
|
'index', |
|
41
|
|
|
'__lt__', |
|
42
|
|
|
'__le__', |
|
43
|
|
|
'__gt__', |
|
44
|
|
|
'__ge__', |
|
45
|
|
|
} |
|
46
|
|
|
|
|
47
|
|
|
|
|
48
|
|
|
for _attribute in SHADOWED_ATTRIBUTES: |
|
49
|
|
|
setattr(ADTConstructor, _attribute, None) |
|
50
|
|
|
|
|
51
|
|
|
|
|
52
|
|
|
class ADTMember: |
|
53
|
|
|
|
|
54
|
|
|
def __init__(self, subcls): |
|
55
|
|
|
self.subcls = subcls |
|
56
|
|
|
|
|
57
|
|
|
def __get__(self, obj, cls): |
|
58
|
|
|
if cls is ENUM_BASES[self.subcls] and obj is None: |
|
59
|
|
|
return self.subcls |
|
60
|
|
|
raise AttributeError('Can only access adt members through base class.') |
|
61
|
|
|
|
|
62
|
|
|
|
|
63
|
|
|
ENUM_BASES = weakref.WeakKeyDictionary() |
|
64
|
|
|
|
|
65
|
|
|
|
|
66
|
|
|
def make_constructor(_cls, name, args, subclasses, subclass_order): |
|
67
|
|
|
length = len(args) |
|
68
|
|
|
|
|
69
|
|
|
class Constructor(_cls, ADTConstructor, tuple): |
|
70
|
|
|
"""Auto-generated subclass of an ADT.""" |
|
71
|
|
|
__slots__ = () |
|
72
|
|
|
|
|
73
|
|
|
def __new__(cls, *args): |
|
74
|
|
|
if len(args) != length: |
|
75
|
|
|
raise ValueError |
|
76
|
|
|
return super().__new__(cls, args) |
|
77
|
|
|
|
|
78
|
|
|
ENUM_BASES[Constructor] = _cls |
|
79
|
|
|
|
|
80
|
|
|
Constructor.__name__ = name |
|
81
|
|
|
Constructor.__qualname__ = '{qualname}.{name}'.format( |
|
82
|
|
|
qualname=_cls.__qualname__, name=name) |
|
83
|
|
|
|
|
84
|
|
|
subclasses.add(Constructor) |
|
85
|
|
|
setattr(_cls, name, ADTMember(Constructor)) |
|
86
|
|
|
subclass_order.append(Constructor) |
|
87
|
|
|
|
|
88
|
|
|
annotations = {f'_{index}': arg for (index, arg) in enumerate(args)} |
|
89
|
|
|
parameters = [ |
|
90
|
|
|
inspect.Parameter( |
|
91
|
|
|
name, inspect.Parameter.POSITIONAL_ONLY, annotation=arg) |
|
92
|
|
|
for (name, arg) in annotations.items()] |
|
93
|
|
|
annotations['return'] = _cls.__qualname__ |
|
94
|
|
|
|
|
95
|
|
|
Constructor.__new__.__signature__ = inspect.Signature( |
|
96
|
|
|
parameters, return_annotation=_cls.__qualname__) |
|
97
|
|
|
Constructor.__new__.__annotations__ = annotations |
|
98
|
|
|
|
|
99
|
|
|
|
|
100
|
|
|
__all__ = ['ADTConstructor', 'make_constructor'] |
|
101
|
|
|
|