add tests for issue 3048

2025-08-16 15:29:25 +02:00
parent 93cc4d4898
commit e38ee14580
9 changed files with 160 additions and 0 deletions
--- a/tests/scryer/cli/issues/issue_3048.in/pair_string_key.pl
+++ b/tests/scryer/cli/issues/issue_3048.in/pair_string_key.pl
@@ -0,0 +1,12 @@
+:- use_module(library(assoc)).
+
+test :-
+  empty_assoc(A1),
+  put_assoc(([a]-1), A1, 1, A2),
+  put_assoc(([a]-2), A2, 1, A3),
+  put_assoc(([b]-1), A3, 1, _).
+  
+
+?- test.
+   false, unexpected.
+   true.