[CM] subobject-->:time

[Rick Taube]

 > Do you advice me any complet documentation?.

its just sugar-coating for slot-value, or slot-ref if you are using 
scheme:

(sv foo time)
=> (slot-value foo 'time)
=> (slot-ref foo 'time)

(sv foo time 1 duration 2)
=> (progn (setf (slot-value foo 'time) 1) (setf (slot-value foo 
'duration) 2))
=> (begin (slot-set! foo 'time 1) (slot-set! foo 'duration 2))

--rick