пользовательский класс: массив

Александр Петросян (PAF) 11.04.2003 17:39 / 11.04.2003 17:40

@CLASS
массив

@создать[]

@дай[name]
@на[name;value]
@наплюс[name;value]
^на[$caller.$name;$value]^caller.$name.inc[]

$мой[^массив::создать[]]
^мой.на[n;yes]
^мой.дай[n]
^мой.наплюс[n]