Profiler update

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1017 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
rslopes
2004-03-04 21:17:40 +00:00
parent 0092e6fd45
commit 69f6496e7e
3 changed files with 19 additions and 8 deletions

View File

@@ -102,7 +102,7 @@ STD_PROTO(static Int p_set_yap_flags, (void));
#ifdef LOW_PROF
#define TIMER_DEFAULT 1000
#define TIMER_DEFAULT 100
#define MORE_INFO_FILE 1
void
@@ -131,14 +131,15 @@ static Int order=0;
#if defined(__linux__)
static void
prof_alrm(int signo)
prof_alrm_OLD(int signo)
{
// printf("%p\n", Yap_regp->P_);
// printf("%p %p\n", Yap_regp->P_,P);
fprintf(FProf,"%p\n", Yap_regp->P_);
// fprintf(FProf,"%p\n", P);
return;
}
extern void prof_alrm(int signo);
static Int start_profilers(int msec)
{
struct itimerval t;