anchor.diff:              # occur, so all machines in the network are valid candidate hosts.
               # This test should succeed.
               
  -            my $result = $machine->mustSucceed("NIX_PATH='nixpkgs=${nixpkgs}' dydisnix-gendist --filter-buildable -s ${tests}/services.nix -i ${tests}/infrastructure.nix");
  +            $result = $machine->mustSucceed("NIX_PATH='nixpkgs=${nixpkgs}' dydisnix-gendist --filter-buildable -s ${tests}/services.nix -i ${tests}/infrastructure.nix");
               my @distribution = split('\n', $machine->mustSucceed("cat $result"));
             
  -            if(@distribution[7] =~ /testtarget1/) {
  -                print "line 7 contains testtarget1!\n";
  -            } else {
  -                die "line 7 should contain testtarget1!\n";
  -            }
  -          
  -            if(@distribution[8] =~ /testtarget2/) {
  +            if($distribution[7] =~ /testtarget1/) {
  +                print "line 7 contains testtarget1!\n";
  +            } else {
  +                die "line 7 should contain testtarget1!\n";
  +            }
  +          
  +            if($distribution[8] =~ /testtarget2/) {
                   print "line 8 contains testtarget2!\n";
               } else {
                   die "line 8 should contain testtarget2!\n";
               }
               
  -            if(@distribution[13] =~ /testtarget1/) {
  +            if($distribution[13] =~ /testtarget1/) {
                   print "line 13 contains testtarget1!\n";
               } else {
                   die "line 13 should contain testtarget1!\n";
               }
             
  -            if(@distribution[14] =~ /testtarget2/) {
  +            if($distribution[14] =~ /testtarget2/) {
                   print "line 14 contains testtarget2!\n";
               } else {
                   die "line 14 should contain testtarget2!\n";
               }
               
  -            if(@distribution[19] =~ /testtarget1/) {
  +            if($distribution[19] =~ /testtarget1/) {
                   print "line 19 contains testtarget1!\n";
               } else {
                   die "line 19 should contain testtarget1!\n";
               }
             
  -            if(@distribution[20] =~ /testtarget2/) {
  +            if($distribution[20] =~ /testtarget2/) {
                   print "line 20 contains testtarget2!\n";
               } else {
                   die "line 20 should contain testtarget2!\n";
  
positive.code:             # testService3 should be assigned to testtarget2. This test should
              # succeed.
              
              my $result = $machine->mustSucceed("NIX_PATH='nixpkgs=${nixpkgs}' dydisnix-gendist -s ${tests}/services.nix -i ${tests}/infrastructure.nix -q ${tests}/qos/qos-mapattronattr.nix");
              my @distribution = split('\n', $machine->mustSucceed("cat $result"));
              
              if(@distribution[7] =~ /testtarget1/) {
                  print "line 7 contains testtarget1!\n";
              } else {
                  die "line 7 should contain testtarget1!\n";
              }
              
              if(@distribution[12] =~ /testtarget1/) {
                  print "line 12 contains testtarget1!\n";
              } else {
                  die "line 12 should contain testtarget1!\n";
              }
              
              if(@distribution[17] =~ /testtarget2/) {
                  print "line 17 contains testtarget2!\n";
              } else {
                  die "line 17 should contain testtarget2!\n";
  
negative.code:             # should be assigned to testtarget2. testService3 should be assigned
              # to testtarget1. This test should succeed.
              
              $result = $machine->mustSucceed("NIX_PATH='nixpkgs=${nixpkgs}' dydisnix-gendist -s ${tests}/services.nix -i ${tests}/infrastructure.nix -q ${tests}/qos/qos-greedy.nix");
              @distribution = split('\n', $machine->mustSucceed("cat $result"));
              
              if($distribution[7] =~ /testtarget1/) {
                  print "line 7 contains testtarget1!\n";
              } else {
                  die "line 7 should contain testtarget1!\n";
              }
              
              if($distribution[12] =~ /testtarget1/) {
                  print "line 12 contains testtarget1!\n";
              } else {
                  die "line 12 should contain testtarget1!\n";
              }
              
              if($distribution[17] =~ /testtarget2/) {
                  print "line 17 contains testtarget2!\n";
              } else {
                  die "line 17 should contain testtarget2!\n";
  