Anonymous user
Polymorphic copy: Difference between revisions
→{{header|BBC BASIC}}
(Added BBC BASIC) |
|||
Line 105:
REM Create class S derived from T, known only at run-time:
RunTimeSize% = RND(100)
DIM classS{array#(RunTimeSize%)
PROC_inherit(classS{}, classT{})
DEF classS.retval (n%) = classS.array#(n%) ^ 2 : REM Overridden method
| |||