@verb #1:"fileread" this none this rxd #55
@program #1:"fileread" this none this
"Copied from Root Class! (#1):fileread by manta (#7165)Apr 24 22:13:09 2000"
{file, ?from = 1, ?to = $maxint} = args
if (this:fileaccess(file) == "" && !caller_perms():controls(this))
  raise(E_PERM)
else
  fh = file_open($file_utils:filespec(this, file), "r-tf")
  try
    t = file_readlines(fh, from, to)
  finally
    file_close(fh)
  endtry
  return t
endif
"Last modified by Dax (#789) on Sun Dec 16 19:49:20 2001 MST."
"This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:04 2002 MDT)."
"Last modified by Dax (#789) on Sat Aug 17 14:50:04 2002 MDT."
.