don't optimise sub-args, as it may introduce new variables.
This commit is contained in:
parent
a6cb6f6a25
commit
875546e36a
@ -512,7 +512,9 @@ expand_goal(G, G).
|
||||
'$should_expand'(A,HVars),
|
||||
!,
|
||||
( X ==0 ->
|
||||
'$meta_expansion0'(A,CurMod,M,HM,NA,HVars)
|
||||
'$values'('$c_arith',Old, false),
|
||||
'$meta_expansion0'(A,CurMod,M,HM,NA,HVars),
|
||||
'$values'('$c_arith', _False, Old)
|
||||
;
|
||||
NA = M:A
|
||||
),
|
||||
|
Reference in New Issue
Block a user