aUCBLogo Demos and Tests / tabletest
to tabletest
t=Table 5
setitem "a t 1234
; t'a=1234
show Item "a t ;1234
; setitem "complex t [Hallo World!]
t'b=[Hallo World!]
show t
l=toList t
show l
tbl=Table [[a 1234][b [Hallo World!]]]
tbl'a=4321
show tbl
(gc true)
show tbl
show t
removeItem "a t
show t
t=tbl
removeItem "a tbl
show t
end