Is there a shorter syntax for calling a method from a method in the

[dean]

i.e. I'm calling m1 from m2 using the same syntax as calling methods
externally....but just replacing *Obj with This.
No problem if not but....Is there a shorter way e.g. like (: member)
instead of (get This 'member)
(class +Clss)
   (dm T ())
   (dm m1> () (setq Res 4))
   (dm m2> (Arg2) (+ (send 'm1> This) Arg2))

(setq *Obj (new '(+Clss)))
(prinl (format (send 'm2> *Obj 5)))