| 1 | Proposal to add simple inhieritance to the language.
|
|---|
| 2 |
|
|---|
| 3 | Tagged structures allow for dynamic casting between types in a hierarchy.
|
|---|
| 4 | Children (rather pointers to) can be up-cast to their parents, a safe
|
|---|
| 5 | conversion that may recive language level support or even be implicit.
|
|---|
| 6 | Parents can be down cast to their children, which might fail if the underlying
|
|---|
| 7 | object is not of the child type, or a child of that.
|
|---|
| 8 |
|
|---|
| 9 | This does not however cause dynamic look-up. During function calls the
|
|---|
| 10 | underlying type is ignored, and the pointer type is used to type match the
|
|---|
| 11 | function call.
|
|---|
| 12 |
|
|---|
| 13 | The name tagged structure comes from tagged union, which carries a value to
|
|---|
| 14 | say which of the possible values is currently stored in the union. The idea
|
|---|
| 15 | here is similar, however the possibilities are more open ended.
|
|---|
| 16 |
|
|---|
| 17 |
|
|---|
| 18 | Syntax:
|
|---|
| 19 |
|
|---|
| 20 | "struct" name [ "tagged" [ parent-name ] ] "{" fields "}"
|
|---|
| 21 |
|
|---|
| 22 | The keywords can change (although they currently reflect the concept name
|
|---|
| 23 | closely). More formally, in terms of grammar this adds:
|
|---|
| 24 |
|
|---|
| 25 | struct-or-union-specifier
|
|---|
| 26 | ...
|
|---|
| 27 | struct identifier tagged { struct-declaration-list }
|
|---|
| 28 | struct identifier tagged parent-identifier { struct-declaration-list }
|
|---|
| 29 |
|
|---|
| 30 | "tagged" by itself create a tagged structure that is the root of a new tree.
|
|---|
| 31 | It has no parent tagged structure. If "tagged" is used with a parent than
|
|---|
| 32 | that is the parent of this node.
|
|---|
| 33 |
|
|---|
| 34 | Tagged structures have fields beyond the ones listed. Root tags have a type
|
|---|
| 35 | field added which give the type of the instance. Child tags prepend all of
|
|---|
| 36 | their parent's fields to their field list so they can be upcast.
|
|---|
| 37 |
|
|---|
| 38 |
|
|---|
| 39 | Implemenation:
|
|---|
| 40 |
|
|---|
| 41 | Adding to the field list is a simple matter, should be doable during
|
|---|
| 42 | translation. The type field is just a pointer to a type object. With proper
|
|---|
| 43 | linking we can create a single unique instance of the type object for each
|
|---|
| 44 | declared tagged struct. The instance's address is used as an id for the type.
|
|---|
| 45 | It also holds data about the type, such as its parent's id/a pointer to the
|
|---|
| 46 | parent type object.
|
|---|
| 47 |
|
|---|
| 48 | The type field could be hidden (as best as C can hide it) or it could be
|
|---|
| 49 | visible to the user with easy access to allow the user to examine the type
|
|---|
| 50 | object directly.
|
|---|
| 51 |
|
|---|
| 52 | Direct access is more useful if the data on the type-objects can change, other
|
|---|
| 53 | wise the build in function could handle all cases. Perhaps each root object
|
|---|
| 54 | can specify a type object to use or the type objects are themselves tagged,
|
|---|
| 55 | although there may not be a base case with the latter.
|
|---|
| 56 |
|
|---|
| 57 | In the simplest case the type object is a pointer to the parent type object.
|
|---|
| 58 | Additional data could be added, such as a name, or a function pointer to the
|
|---|
| 59 | destructor.
|
|---|
| 60 |
|
|---|
| 61 |
|
|---|
| 62 | Traits:
|
|---|
| 63 |
|
|---|
| 64 | [is_]tagged[_struct](dtype T)
|
|---|
| 65 | True if the given T is a tagged struct of some kind. This promises that it has
|
|---|
| 66 | a type object, but nothing else.
|
|---|
| 67 |
|
|---|
| 68 | [is_]tagged_under(dtype parent, dtype child)
|
|---|
| 69 | True if child is a child type of parent. Requires that both are tagged structs
|
|---|
| 70 | and that child can upcast to parent.
|
|---|
| 71 |
|
|---|
| 72 |
|
|---|
| 73 | Functions:
|
|---|
| 74 |
|
|---|
| 75 | forall(dtype T | is_tagged(T), dtype U | is_tagged(U))
|
|---|
| 76 | T * dynamic_cast(U * value)
|
|---|
| 77 | The cast function, that safely converts the U* into a T*, returning null if
|
|---|
| 78 | the underlying object value points to is not a child type of T. A shorter name
|
|---|
| 79 | might be perfered. The runtime should be no more than linear with the depth
|
|---|
| 80 | of U in the inhiertance tree.
|
|---|
| 81 |
|
|---|
| 82 | bug#11 might require `bool dynamic_cast(T ** dst, U * src)` instead.
|
|---|
| 83 |
|
|---|
| 84 |
|
|---|
| 85 | Tagging Unions (Extention):
|
|---|
| 86 |
|
|---|
| 87 | Using this system as is does not really work if used on unions directly.
|
|---|
| 88 | No new options to the union can be added, as they must be able to upcast.
|
|---|
| 89 | Similarly, if options are removed, writing to an upcast union is invalid.
|
|---|
| 90 | To allow for growth each option would have to be a structure itself.
|
|---|
| 91 |
|
|---|
| 92 | Which brings us to "tagget struct union", ie. a union of tagged structures
|
|---|
| 93 | as opposed to tagging the union itself. This extention acts as a constraint.
|
|---|
| 94 | If unions are declared tagged instead of creating a new tagged type, all
|
|---|
| 95 | possible values of the union must be of that tagged type or a child type.
|
|---|