Inheritance/Single: Difference between revisions
Content deleted Content added
m →{{header|Racket}}: line up definitions |
Added Forth (4tH) version |
||
Line 432: | Line 432: | ||
} |
} |
||
</lang> |
</lang> |
||
=={{header|Forth}}== |
|||
{{works with|4tH|3.62.1}} |
|||
There are numerous, mutually incompatible object oriented frameworks for Forth. This one works with the FOOS preprocessor extension of [[4tH]]. |
|||
<lang forth>include 4pp/lib/foos.4pp |
|||
:: Animal class end-class {} ; |
|||
:: Dog extends Animal end-extends {} ; |
|||
:: Cat extends Animal end-extends {} ; |
|||
:: Lab extends Dog end-extends {} ; |
|||
:: Collie extends Dog end-extends {} ;</lang> |
|||
=={{header|Fortran}}== |
=={{header|Fortran}}== |