From 780a5ba83eb6aeda2eced07ff74ce0fed53411ae Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?V=C3=ADtor=20Santos=20Costa?= <vsc@dcc.fc.up.pt>
Date: Thu, 3 Nov 2011 07:51:13 +0900
Subject: [PATCH] use numbervars.

---
 C/pl-yap.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C/pl-yap.c b/C/pl-yap.c
index fbf1f5a96..378b685c2 100644
--- a/C/pl-yap.c
+++ b/C/pl-yap.c
@@ -619,7 +619,7 @@ currentOperator(Module m, atom_t name, int kind, int *type, int *priority)
 
 int
 numberVars(term_t t, nv_options *opts, int n ARG_LD) {
-  return 0;
+  return Yap_NumberVars(YAP_GetFromSlot(t), n);
 }
 
 		 /*******************************