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

Profiler Update

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1005 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
rslopes 2004-02-25 19:33:08 +00:00
parent 6198cdb4bc
commit 58e306b815
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
C/index.c
View File

@ -4240,9 +4240,11 @@ ExpandIndex(PredEntry *ap) {
/* single case */ /* single case */
return *labp; return *labp;
} }
#ifdef LOW_PROF
if (ProfilerOn) { if (ProfilerOn) {
Yap_inform_profiler_of_clause(indx_out, ProfEnd, ap); Yap_inform_profiler_of_clause(indx_out, ProfEnd, ap,-1);
} }
#endif /* LOW_PROF */
if (indx_out == NULL) { if (indx_out == NULL) {
return FAILCODE; return FAILCODE;
} }