From bde8a59cecc057cab17e8153cbc2cdf532af54c9 Mon Sep 17 00:00:00 2001 From: vsc Date: Wed, 4 Jan 2006 03:47:49 +0000 Subject: [PATCH] module with all attrs voided is module with no atts. git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1495 b08c6af1-5177-4d33-ba66-4b1c6b8b522a --- C/attvar.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/C/attvar.c b/C/attvar.c index f0f62ab68..213754fd6 100644 --- a/C/attvar.c +++ b/C/attvar.c @@ -765,7 +765,7 @@ p_get_all_atts(void) { static int ActiveAtt(Term tatt, UInt ar) { - CELL *cp = RepAppl(tatt); + CELL *cp = RepAppl(tatt)+1; UInt i; for (i = 1; i < ar; i++) {