Update handling of equal blank nodes in CDT equality testing.

kasei · Jun 13, 2024 · f454940 · f454940
1 parent 9109a19
commit f454940
Show file tree

Hide file tree

Showing 2 changed files with 12 additions and 4 deletions.
diff --git a/lib/AtteanX/Functions/CompositeLists.pm b/lib/AtteanX/Functions/CompositeLists.pm
@@ -639,8 +639,12 @@ package AtteanX::Functions::CompositeLists::ListLiteral {
 			}
 
 			if ($li->does('Attean::API::Blank') and $ri->does('Attean::API::Blank')) {
-				$seen_error++;
-				next;
+				if ($li->value eq $ri->value) {
+					next;
+				} else {
+					$seen_error++;
+					next;
+				}
 			}
 			return 0 unless ($li->equals($ri));
 		}

diff --git a/lib/AtteanX/Functions/CompositeMaps.pm b/lib/AtteanX/Functions/CompositeMaps.pm
@@ -550,8 +550,12 @@ package AtteanX::Functions::CompositeMaps::MapLiteral {
 			}
 
 			if ($lv->does('Attean::API::Blank') and $rv->does('Attean::API::Blank')) {
-				$seen_error++;
-				next;
+				if ($lv->value eq $rv->value) {
+					next;
+				} else {
+					$seen_error++;
+					next;
+				}
 			}
 
 			return 0 unless ($lv->equals($rv));