From d52ffb0e923f2191d13170b26d24cc21f3f4d393 Mon Sep 17 00:00:00 2001
From: Mark Thom <markjordanthom@gmail.com>
Date: Tue, 25 Sep 2018 09:50:19 -0300
Subject: [PATCH] add tidy_pstr_trail to neck_cut

---
 src/prolog/machine/machine_state_impl.rs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/prolog/machine/machine_state_impl.rs b/src/prolog/machine/machine_state_impl.rs
index 5e2245f5..6b1015aa 100644
--- a/src/prolog/machine/machine_state_impl.rs
+++ b/src/prolog/machine/machine_state_impl.rs
@@ -2279,6 +2279,7 @@ impl MachineState {
                 if b > b0 {
                     self.b = b0;
                     self.tidy_trail();
+		    self.tidy_pstr_trail();
                     self.or_stack.truncate(self.b);
                 }
 
-- 
2.54.0