perm filename RELALL.SAI[LIB,AIL] blob sn#408162 filedate 1979-01-09 generic text, type T, neo UTF8
entry r!e!l!a!l!l;
begin "relall"
internal simple procedure r!e!l!a!l!l;
begin "r!e!l!a!l!l"
   integer i;
   for i ← 0 step 1 until 15 do
      release(i);
end "r!e!l!a!l!l";
end "relall"