langs a-z
This commit is contained in:
parent
db842d013d
commit
d066446780
11389 changed files with 98361 additions and 1020 deletions
16
Task/Inheritance-Multiple/Pop11/inheritance-multiple.pop11
Normal file
16
Task/Inheritance-Multiple/Pop11/inheritance-multiple.pop11
Normal file
|
|
@ -0,0 +1,16 @@
|
|||
;;; load object support
|
||||
lib objectclass;
|
||||
|
||||
define :class Camera;
|
||||
;;; slots go here
|
||||
enddefine;
|
||||
|
||||
define :class MobilePhone;
|
||||
;;; slots go here
|
||||
enddefine;
|
||||
|
||||
define :class CameraPhone is Camera, MobilePhone;
|
||||
;;; extra slots go here
|
||||
enddefine;
|
||||
|
||||
;;; methods go here
|
||||
Loading…
Add table
Add a link
Reference in a new issue