diogo
/
yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

bad inline expansion of exclude (obs from Paolo Frasconi)

This commit is contained in:
Vítor Santos Costa 2010-05-19 17:15:11 +01:00
parent 439fbda8f7
commit 2639e6c868
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
library/maplist.yap
View File

@ -431,7 +431,7 @@ goal_expansion(exclude(Meta, ListIn, ListOut), Mod:Goal) :-
compile_aux([
Base,
(RecursionHead :-
(Apply -> Outs = [In|NOuts]; Outs = NOuts),
(Apply -> Outs = NOuts; Outs = [In|NOuts]),
RecursiveCall)
], Mod).