expand_call_goals/3 should expand meta-predicate subgoals (#2361)
This commit is contained in:
3
tests-pl/issue2361-call-qualified.pl
Normal file
3
tests-pl/issue2361-call-qualified.pl
Normal file
@@ -0,0 +1,3 @@
|
||||
:- use_module(issue2361_m).
|
||||
|
||||
:- initialization(gs([(length("a",_),length("ab",_))])).
|
||||
8
tests-pl/issue2361_m.pl
Normal file
8
tests-pl/issue2361_m.pl
Normal file
@@ -0,0 +1,8 @@
|
||||
:- module(m, [gs/1]).
|
||||
|
||||
:- use_module(library(lists)).
|
||||
|
||||
gs([]).
|
||||
gs([G|Gs]) :-
|
||||
G,
|
||||
gs(Gs).
|
||||
Reference in New Issue
Block a user