From 924e6148574d4180241d6ddec68768a2bc600c9a Mon Sep 17 00:00:00 2001
From: Vitor Santos Costa <vsc@dcc.fc.up.pt>
Date: Wed, 12 May 2010 23:54:06 +0100
Subject: [PATCH] fix related instructions.

---
 C/absmi.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/C/absmi.c b/C/absmi.c
index c8cd90f73..d9ca09b56 100755
--- a/C/absmi.c
+++ b/C/absmi.c
@@ -6360,8 +6360,8 @@ Yap_absmi(int inp)
 
       derefa_body(d0, pt0, udbterm_unk, udbterm_nonvar);
       BEGD(d1);
-      d1 = AbsAppl(PREG->u.oi.i);
-      PREG = NEXTOP(PREG, oi);
+      d1 = AbsAppl(PREG->u.oc.i);
+      PREG = NEXTOP(PREG, oc);
       BIND_GLOBAL(pt0, d1, bind_udbterm);
 #ifdef COROUTINING
       DO_TRAIL(pt0, d1);