enable profiling on amd64
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1401 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
parent
7175b62a27
commit
cf655a6a9b
@ -10,8 +10,11 @@
|
|||||||
* *
|
* *
|
||||||
* File: absmi.c *
|
* File: absmi.c *
|
||||||
* comments: Portable abstract machine interpreter *
|
* comments: Portable abstract machine interpreter *
|
||||||
* Last rev: $Date: 2005-09-09 17:24:37 $,$Author: vsc $ *
|
* Last rev: $Date: 2005-10-15 17:05:23 $,$Author: rslopes $ *
|
||||||
* $Log: not supported by cvs2svn $
|
* $Log: not supported by cvs2svn $
|
||||||
|
* Revision 1.177 2005/09/09 17:24:37 vsc
|
||||||
|
* a new and hopefully much better implementation of atts.
|
||||||
|
*
|
||||||
* Revision 1.176 2005/09/08 22:06:44 rslopes
|
* Revision 1.176 2005/09/08 22:06:44 rslopes
|
||||||
* BEAM for YAP update...
|
* BEAM for YAP update...
|
||||||
*
|
*
|
||||||
@ -330,7 +333,7 @@ void prof_alrm(int signo, siginfo_t *si, ucontext_t *sc);
|
|||||||
|
|
||||||
void prof_alrm(int signo, siginfo_t *si, ucontext_t *sc)
|
void prof_alrm(int signo, siginfo_t *si, ucontext_t *sc)
|
||||||
{
|
{
|
||||||
#if __linux__ && defined(i386)
|
#if __linux__ && (defined(i386) || defined(__amd64__))
|
||||||
void * oldpc=(void *) sc->uc_mcontext.gregs[14]; /* 14= REG_EIP */
|
void * oldpc=(void *) sc->uc_mcontext.gregs[14]; /* 14= REG_EIP */
|
||||||
|
|
||||||
if (Yap_PrologMode & TestMode) {
|
if (Yap_PrologMode & TestMode) {
|
||||||
|
Reference in New Issue
Block a user