diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix small bug in attvar handling.

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1498 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2006-01-08 03:12:02 +00:00
parent a4b85e2abd
commit b881f59a71
5 changed files with 15 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
C/cdmgr.c
View File

@@ -11,8 +11,13 @@
* File: cdmgr.c *
* comments: Code manager *
* *
* Last rev: $Date: 2005-12-23 00:20:13 $,$Author: vsc $ *
* Last rev: $Date: 2006-01-08 03:12:00 $,$Author: vsc $ *
* $Log: not supported by cvs2svn $
* Revision 1.174 2005/12/23 00:20:13 vsc
* updates to gprof
* support for __POWER__
* Try to saveregs before longjmp.
*
* Revision 1.173 2005/12/17 03:25:39 vsc
* major changes to support online event-based profiling
* improve error discovery and restart on scanner.
@@ -1047,9 +1052,9 @@ kill_first_log_iblock(LogUpdIndex *c, LogUpdIndex *parent, PredEntry *ap)
LOCK(parent->ClLock);
c->ParentIndex = parent->ParentIndex;
LOCK(parent->u.ParentIndex->ClLock);
LOCK(parent->ParentIndex->ClLock);
parent->ParentIndex->ClRefCount++;
UNLOCK(parent->u.ParentIndex->ClLock);
UNLOCK(parent->ParentIndex->ClLock);
parent->ClRefCount--;
UNLOCK(parent->ClLock);
}
@@ -1154,10 +1159,10 @@ Yap_ErLogUpdIndex(LogUpdIndex *clau, yamop *ipc)
kill_first_log_iblock(clau, NULL, c->ClPred);
} else {
#if defined(THREADS) || defined(YAPOR)
LOCK(clau->u.ParentIndex->ClLock);
LOCK(clau->ParentIndex->ClLock);
/* protect against attempts at erasing */
clau->ClRefCount++;
UNLOCK(clau->u.ParentIndex->ClLock);
UNLOCK(clau->ParentIndex->ClLock);
#endif
kill_first_log_iblock(clau, clau->ParentIndex, clau->ClPred);
#if defined(THREADS) || defined(YAPOR)