fix longmp in trow not to recover trail. This way we do not need to do

copy_term/2 and we avoid losing the attributed variable stack.
This commit is contained in:
Vítor Santos de Costa
2008-10-18 11:03:25 +01:00
parent 87987d0b85
commit 7207c18e65
6 changed files with 9 additions and 9 deletions

View File

@@ -1925,6 +1925,8 @@ JumpToEnv(Term t) {
B->cp_env = (CELL *)env[E_E];
/* cannot recover Heap because of copy term :-( */
B->cp_h = H;
/* nor can I recover terms */
B->cp_tr = TR;
/* I could backtrack here, but it is easier to leave the unwinding
to the emulator */
B->cp_a3 = t;