Anonymous user
Inheritance/Single: Difference between revisions
→{{header|Oberon}}
Line 1,273:
Lab = object of Dog
Collie = object of Dog</lang>
=={{header|Oberon}}==
Tested with [https://miasap.se/obnc OBNC].
<lang Oberon>MODULE Animals;
TYPE
Animal = RECORD END;
Dog = RECORD (Animal) END;
Cat = RECORD (Animal) END;
Lab = RECORD (Dog) END;
Collie = RECORD (Dog) END;
END Animals.
</lang>
=={{header|Oberon-2}}==
| |||