make sure to put TR correctly (fixes copying DB terms with att vars #148)

2009-11-21 00:23:03 +00:00 · 2009-11-21 00:23:03 +00:00 · d637451bd6
parent 58cac4c8eb
commit d637451bd6
1 changed files with 1 additions and 0 deletions
--- a/C/exec.c
+++ b/C/exec.c
@ -1635,6 +1635,7 @@ JumpToEnv(Term t) {
  /* H = B->cp_h; */
  t = clean_trail(t, dbt, B->cp_a1);
  B->cp_a3 = t;
+  B->cp_tr = TR;
  if (first_func != NULL) {
    B = first_func;
  }