fix write_canonical of $VAR(_).

This commit is contained in:
Vítor Santos Costa
2012-03-15 22:19:48 +00:00
parent f2782cc274
commit 0c1eb1d642
13 changed files with 28 additions and 4 deletions

View File

@@ -4254,7 +4254,7 @@ numbervar(Int id)
{
Term ts[1];
ts[0] = MkIntegerTerm(id);
return Yap_MkApplTerm(FunctorVar, 1, ts);
return Yap_MkApplTerm(LOCAL_FunctorVar, 1, ts);
}
static Term
@@ -4262,7 +4262,7 @@ numbervar_singleton(void)
{
Term ts[1];
ts[0] = MkIntegerTerm(-1);
return Yap_MkApplTerm(FunctorVar, 1, ts);
return Yap_MkApplTerm(LOCAL_FunctorVar, 1, ts);
}
static void