@verb #1994:"is_exit" this none this rxdo #6118
@program #1994:"is_exit" this none this
{x, ?include_null = 0} = args
if (!x:isa($exit))
  return 0
elseif (!`x.dest:isa($room) ! E_INVIND => 0' && !include_null)
  return 0
else
  return !!this:accept_for_abode(x)
endif
.