fix duplicated goal in meta-call execute0

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@944 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
2003-12-02 18:57:48 +00:00
parent 2fbad3d467
commit 1aa1610e83
2 changed files with 2 additions and 2 deletions
--- a/C/exec.c
+++ b/C/exec.c
@@ -284,7 +284,7 @@ do_execute(Term t, SMALLUNSGN mod)
 	ENV = YENV;
 	ASP -= EnvSizeInCells+3;
 	P = NEXTOP(COMMA_CODE,sla);
-	t = ArgOfTerm(1,t);
+	ARG1 = t = ArgOfTerm(1,t);
 	goto restart_exec;
    } else if (mod != CurrentModule) {
      return(CallMetaCall(mod));