Inheritance/Single: Difference between revisions

Content added Content deleted

Inline

@@ Line 317: / Line 317: @@
 =={{header|COBOL}}==
-<syntaxhighlight lang="cobol">       CLASS-ID. Animal.
+<syntaxhighlight lang="cobol">       IDENTIFICATION DIVISION.
+       CLASS-ID. Animal.
            *> ...
        END CLASS Animal.
-       CLASS-ID. Dog INHERITS Animal.
+       IDENTIFICATION DIVISION.
+       CLASS-ID. Dog
+           INHERITS FROM Animal.
        ENVIRONMENT DIVISION.
        CONFIGURATION SECTION.
@@ Line 330: / Line 333: @@
        END CLASS Dog.
-       CLASS-ID. Cat INHERITS Animal.
+       IDENTIFICATION DIVISION.
+       CLASS-ID. Cat
+           INHERITS FROM Animal.
        ENVIRONMENT DIVISION.
        CONFIGURATION SECTION.
@@ Line 339: / Line 344: @@
        END CLASS Cat.
-       CLASS-ID. Lab INHERITS Dog.
+       IDENTIFICATION DIVISION.
+       CLASS-ID. Lab
+           INHERITS FROM Dog.
        ENVIRONMENT DIVISION.
        CONFIGURATION SECTION.
@@ Line 348: / Line 355: @@
        END CLASS Lab.
-       CLASS-ID. Collie INHERITS Dog.
+       IDENTIFICATION DIVISION.
+       CLASS-ID. Collie
+           INHERITS FROM Dog.
        ENVIRONMENT DIVISION.
        CONFIGURATION SECTION.