Don't replace duplicate results if they are atomic, simpler to just s…

…how them
trealla-prolog · Oct 10, 2023 · dafed74 · dafed74
1 parent ecdafb7
commit dafed74
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/src/toplevel.c b/src/toplevel.c
@@ -289,7 +289,9 @@ static int check_duplicate_result(query *q, int nbr, cell *c, pl_idx c_ctx)
 		ptr = ptr->next;
 	}
 
-	add_result(nbr, c, c_ctx);
+	if (!is_atomic(c))
+		add_result(nbr, c, c_ctx);
+
 	return -1;
 }