From 49a4345235ed418d2fcbffbde813532f1b94ddc9 Mon Sep 17 00:00:00 2001
From: David Griffith <dave@661.org>
Date: Wed, 13 May 2015 22:23:14 -0700
Subject: [PATCH] Improper writing of variables and eval stack led to corrupt
 saves.

---
 src/common/quetzal.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/common/quetzal.c b/src/common/quetzal.c
index ce78b36..c2e9f1e 100644
--- a/src/common/quetzal.c
+++ b/src/common/quetzal.c
@@ -539,7 +539,7 @@ zword save_quetzal (FILE *svf, FILE *stf)
 	    || !write_word (svf, nstk))			return 0;
 
 	/* Write the variables and eval stack. */
-	for (j=0, ++p; j<nvars+nstk; ++j, --p)
+	for (j=0, --p; j<nvars+nstk; ++j, --p)
 	    if (!write_word (svf, *p))			return 0;
 
 	/* Calculate length written thus far. */
-- 
2.34.1