163
@verb #8705:"getrobjs" this none this rxdo #8705
@program #8705:"getrobjs" this none this
ob = {}
for i in [1..toint(max_object())]
  th = toobj(i)
  if (th.r && !$object_utils:isa(th, $garbage))
    ob = {@ob, th}
  endif
  $command_utils:suspend_if_needed()
endfor
return ob
"Last modified by Dax (#789) on Tue May  3 14:14:15 2005 MDT."
.

0