Anonymous user
Inheritance/Multiple: Difference between revisions
→{{header|COBOL}}: Added sugar; revert if necessary.
Thundergnat (talk | contribs) m (syntax highlighting fixup automation) |
imported>Acediast (→{{header|COBOL}}: Added sugar; revert if necessary.) |
||
Line 117:
=={{header|COBOL}}==
<syntaxhighlight lang="cobol">
CLASS-ID. Camera.
*> ...
END CLASS Camera.
IDENTIFICATION DIVISION.
CLASS-ID. Mobile-Phone.
*> ...
END CLASS Mobile-Phone.
IDENTIFICATION DIVISION.
CLASS-ID. Camera-Phone INHERITS Camera, Mobile-Phone. ▼
CLASS-ID. Camera-Phone
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
|