atom term

This commit is contained in:
Vítor Santos Costa 2015-08-18 14:55:58 -05:00
parent c33a345429
commit 80036958a1

View File

@ -2748,7 +2748,7 @@ static Term non_singletons_in_complex_term(register CELL *pt0, register CELL *pt
HR[1] = AbsPair(HR+2); HR[1] = AbsPair(HR+2);
HR += 2; HR += 2;
HR[-2] = (CELL)pt2; HR[-2] = (CELL)pt2;
*pt2 = TermReFoundVar; *pt2 = TermRefoundVar;
} }
continue; continue;
} }