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() {
|
||||
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