c1
@verb #4000:"caller" this none this rxdo #4000
@program #4000:"caller" this none this
this:notify("----")
for x in (callers(1))
  this:notify(toliteral(x))
endfor
this:notify("----")
.

0