#######################################################
#
# Test returnszero()
#
#######################################################

body common control
{
      inputs => { "../../default.sub.cf" };
      bundlesequence  => { default("$(this.promise_filename)") };
      version => "1.0";
}

bundle agent init
{
}

bundle agent test
{
  vars:
    any::
      "cwd" string => dirname("$(this.promise_filename)");
      "cat_4k" string => "$(G.cat) $(cwd)$(const.dirsep)text_xform.cf.txt";
      "result" string => execresult("$(cat_4k)", "useshell");

  classes:
    any::
      "ok" expression => regcmp(".*3456789abcdefghij$", "$(result)");

  reports:
    DEBUG::
      "$(result)";
    ok::
      "$(this.promise_filename) Pass";
    !ok::
      "$(this.promise_filename) FAIL";

}
