@verb #7508:"check_required_attr" this none this rxdo #8084
@program #7508:"check_required_attr" this none this
{attrs, req} = args
for x in (req)
  if (!listassoc(x, attrs))
    raise(E_ARGS, "attribute " + tostr(x) + " must be specified")
  endif
endfor
"Last modified by Lao-Tzu (#8084) on Mon Dec 31 15:03:44 2001 MST."
.