
  PROCEDURE [XREF] syp$verify_access
    (    access_type: (syc$readable, syc$writeable);
         cell_pp: ^^cell;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc ost$status
?? POP ??
