View/Edit #2495:scan

Name(s): scan

1:  {victim, ?tri = caller} = args
2:  {version, mode, results, @rest} = tri:getdata()
3:  version >= 0.1 || raise(E_INVARG)
4:  mode = "results"
5:  tri:setmodule(this)
6:  r = {"*** Begin Scan of " + $su:nn(victim) + " @ " + tri:ctime()}
7:  for o in ($list_utils:reverse(victim:ancestors()))
8:    r = {@r, @`this:("scan_" + tostr(toint(o)))(victim, tri) ! E_VERBNF => {}'}
9:  endfor
10: r = {@r, "*** End Scan"}
11: results = r
12: tri:setdata({version, mode, results, @rest})
13: "Last modified by Dax (#789) on Tue May  3 14:11:57 2005 MDT."

Verb arguments: this none this
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: Maxamillian (#833)

You are not logged in.