
package SysUtils is

	--Blocking shell
   procedure bShell ( Str: in string;  Success: out boolean );

	--unblocking shell
   procedure Shell ( Str: in string;  Success: out boolean );

end SysUtils;
