%
% acceptance vectors for Storage cloud ops, 'after'
%
page@sel
<
|Stored
 wireop(
">Stored" log)(
 <
 |Initial
  "Stored" *helpface

 |Exec
%%%  false !Cloud.Active
  wired(
"$$$>>> " log)(
  execstr
 > pop

>

*acceptun

%
% stack: found
%