fixed unittests by adding opEquals to PerBaseInfo.Result

bio/bam/baseinfo.d

@@ -99,6 +99,16 @@ struct PerBaseInfo(R, Tags...) {
             return to!string(base);
         }
 
+        bool opEquals(T)(T base) if (is(Unqual!T == Base))
+        {
+            return this.base == base;
+        }
+
+        bool opEquals(T)(T result) if (is(Unqual!T == Result))
+        {
+            return this == result;
+        }
+
         mixin(getResultProperties!Extensions());
     }
 

test/unittests.d

@@ -388,11 +388,11 @@ unittest {
                 bases = basesWith!("FZ", "MD")(r, arg!"flowOrder"(flow_order), 
                                                   arg!"keySequence"(key_sequence));
                 // if reverse strand, bases are also reverse complemented
-                assert(equal(bases.save, map!"a.complement"(retro(r.sequence))));
+                assert(equal(bases, map!"a.complement"(retro(r.sequence))));
             } else {
                 bases = basesWith!("FZ", "MD")(r, arg!"flowOrder"(flow_order), 
                                                   arg!"keySequence"(key_sequence));
-                assert(equal(bases.save, r.sequence));
+                assert(equal(bases, r.sequence));
             }
         }
     }