Add tests for PR #2756
This commit is contained in:
1
tests-pl/load-context-unreachable.pl
Normal file
1
tests-pl/load-context-unreachable.pl
Normal file
@@ -0,0 +1 @@
|
|||||||
|
:- initialization((M = user, loader:load_context(M))).
|
||||||
@@ -25,3 +25,11 @@ fn issue2588_load_html() {
|
|||||||
fn call_qualification() {
|
fn call_qualification() {
|
||||||
load_module_test("tests-pl/issue2361-call-qualified.pl", "");
|
load_module_test("tests-pl/issue2361-call-qualified.pl", "");
|
||||||
}
|
}
|
||||||
|
|
||||||
|
// PR #2756: ensures that calling load_context with a bound variable doesn't trigger unreachable!()
|
||||||
|
#[serial]
|
||||||
|
#[test]
|
||||||
|
#[cfg_attr(miri, ignore = "it takes too long to run")]
|
||||||
|
fn load_context_unreachable() {
|
||||||
|
load_module_test("tests-pl/load-context-unreachable.pl", "");
|
||||||
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user