id	summary	reporter	owner	description	type	status	priority	milestone	component	version	resolution	keywords	cc
23	acquire_resource incorrectly formats error message (MCR10010)	Eric Swenson	Eric Swenson	"acquire_resource incorrectly formats error message:

r 13:46 0.371 11

aqr disk_vol dskb

acquire_resource: for \000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \c000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000 \000\ \c000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\0
\c00\000\000\000\000\000\000\000\000\000\000\000

bound_rcp_support_:register_resource.pl1

crump_in_struc:
   entry (code, reason);

{{{
      do i = 1 to resource_descriptions.n_items while (resource_descriptions.item (i).status_code = 0);
      end;

      if i <= resource_descriptions.n_items then
         call com_err_ (code, myname, reason);
      else call com_err_ (resource_descriptions.item (i).status_code, myname, ""for ^a ^a"",
                resource_descriptions.item (i).type, resource_descriptions.item (i).name);
}}}

The routine searches the acquired resource list looking for a non-zero status code; if it finds one, it displays information about that resource. If one is not found, it displays information about why the resource was not acquired.

Unfortunately, the logic in the 'if' is reversed; it displays information about the n+1th entry, which is both unitialized and unhelpful, and fails to display ""reason"", which is what is needed.

Demonstration of fixed code (s/<=/>/):

r 13:58 4.600 143

cac$aqr disk_vol dskb

acquire_resource: Entry not found. Cannot acquire resources.
"	defect	closed	major	MR12.6e	Tools	MR12.6d	fixed