@@ -750,6 +750,10 @@ function DataEntriesTestBlock!(fg, v2)
750750 @test issetequal(listVariableBlobentries(fg, :a), [:key1, :key2])
751751 @test listVariableBlobentries(fg, :b) == Symbol[:key2]
752752
753+ @test hasVariableBlobentry(fg, :a, :key1)
754+ @test ! hasVariableBlobentry(fg, :a, :nope)
755+ @test_throws LabelNotFoundError hasVariableBlobentry(fg, :nope, :nope)
756+
753757 # delete
754758 @test deleteBlobentry!(v1, :key1) == 1
755759 @test listVariableBlobentries(fg, getLabel(v1)) == Symbol[:key2]
@@ -771,6 +775,23 @@ function DataEntriesTestBlock!(fg, v2)
771775 @test_throws LabelExistsError addVariableBlobentries!(fg, :a, [de2])
772776 @test deleteVariableBlobentries!(fg, :a, [:key2]) == 1
773777
778+ # Factor blobentries
779+ @test addFactorBlobentry!(fg, :abf1, de1) == de1
780+ @test_throws LabelExistsError addFactorBlobentry!(fg, :abf1, de1)
781+ @test de1 == getFactorBlobentry(fg, :abf1, getLabel(de1))
782+ @test_throws LabelNotFoundError getFactorBlobentry(fg, :abf1, :nope)
783+ @test hasFactorBlobentry(fg, :abf1, getLabel(de1))
784+ @test ! hasFactorBlobentry(fg, :abf1, :nope)
785+ @test mergeFactorBlobentry!(fg, :abf1, de2_update) == 1
786+ @test listFactorBlobentries(fg, :abf1) == [getLabel(de1), getLabel(de2_update)]
787+ @test deleteFactorBlobentry!(fg, :abf1, getLabel(de2_update)) == 1
788+ @test_throws LabelNotFoundError deleteFactorBlobentry!(fg, :abf1, getLabel(de2_update))
789+ @test getFactorBlobentries(fg, :abf1) == [de1]
790+ @test getLabel.(addFactorBlobentries!(fg, :abf1, [de2])) == [getLabel(de2)]
791+ @test mergeFactorBlobentries!(fg, :abf1, [de1, de2_update]) == 2
792+ @test deleteFactorBlobentries!(fg, :abf1, [getLabel(de1), getLabel(de2_update)]) == 2
793+ @test listFactorBlobentries(fg, :abf1) == Symbol[]
794+
774795 # graph blobentries
775796 @test addGraphBlobentry!(fg, de1) == de1
776797 @test_throws LabelExistsError addGraphBlobentry!(fg, de1)
0 commit comments