Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
33
Task/Inheritance-Single/Comal/inheritance-single.comal
Normal file
33
Task/Inheritance-Single/Comal/inheritance-single.comal
Normal file
|
|
@ -0,0 +1,33 @@
|
|||
STRUC Animal
|
||||
DIM Species$ OF 20
|
||||
ENDSTRUC Animal
|
||||
|
||||
STRUC Dog
|
||||
INHERIT Animal
|
||||
DIM Race$ OF 20
|
||||
FUNC New CONSTRUCTOR
|
||||
Species$="Dog"
|
||||
ENDFUNC New
|
||||
ENDSTRUC Dog
|
||||
|
||||
STRUC Cat
|
||||
INHERIT Animal
|
||||
DIM Race$ OF 20
|
||||
FUNC New CONSTRUCTOR
|
||||
Species$="Cat"
|
||||
ENDFUNC New
|
||||
ENDSTRUC Cat
|
||||
|
||||
STRUC Lab
|
||||
INHERIT Dog
|
||||
FUNC New CONSTRUCTOR
|
||||
Race$:="Lab"
|
||||
ENDFUNC New
|
||||
ENDSTRUC Lab
|
||||
|
||||
STRUC Collie
|
||||
INHERIT Dog
|
||||
FUNC New CONSTRUCTOR
|
||||
Race$:="Collie"
|
||||
ENDFUNC New
|
||||
ENDSTRUC Collie
|
||||
Loading…
Add table
Add a link
Reference in a new issue