singleton
This commit is contained in:
parent
50feadc341
commit
48e398576f
@ -754,7 +754,7 @@ static bool complete_clause_processing(FEnv *fe, TokEntry *tokstart) {
|
|||||||
v_vnames = get_varnames(fe, tokstart);
|
v_vnames = get_varnames(fe, tokstart);
|
||||||
else
|
else
|
||||||
v_vnames = 0L;
|
v_vnames = 0L;
|
||||||
if (fe->t && trueLocalPrologFlag(SINGLE_VAR_WARNINGS_FLAG)) {
|
if (fe->t && trueGlobalPrologFlag(SINGLE_VAR_WARNINGS_FLAG)) {
|
||||||
warn_singletons(fe, tokstart);
|
warn_singletons(fe, tokstart);
|
||||||
}
|
}
|
||||||
if (fe->t && fe->tcomms)
|
if (fe->t && fe->tcomms)
|
||||||
|
Reference in New Issue
Block a user