From 4a71cbda80198d4d08d023184ef3610bf2c05082 Mon Sep 17 00:00:00 2001
From: vsc <vsc@b08c6af1-5177-4d33-ba66-4b1c6b8b522a>
Date: Thu, 17 Oct 2002 00:48:52 +0000
Subject: [PATCH] fix retry_head to work correctly if the argument is
 dereferenced.

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@638 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
---
 C/absmi.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C/absmi.c b/C/absmi.c
index 871a5fdd5..0f76dab5b 100644
--- a/C/absmi.c
+++ b/C/absmi.c
@@ -6508,8 +6508,8 @@ absmi(int inp)
       d0 = ARG1;
       /* deref it first */
       deref_head(d0,retry_tail_unk);
-      PREG = (yamop *) (PREG->u.ld.d);
     retry_tail_nvar:
+      PREG = (yamop *) (PREG->u.ld.d);
       if (IsPairTerm(d0)) {
 	/* pair */
 	SREG = RepPair(d0)+1;