compile under sun's cc.
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@165 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
@@ -53,9 +53,9 @@
|
||||
#define LOAD_DL 1
|
||||
#endif
|
||||
|
||||
#ifdef sparc
|
||||
#if defined(sparc) || defined(__sparc)
|
||||
#undef NO_DYN
|
||||
#ifndef __svr4__
|
||||
#if (!defined(__svr4__) && !defined(__SVR4))
|
||||
#define A_OUT 1
|
||||
#else
|
||||
#ifdef SIMICS
|
||||
@@ -66,7 +66,7 @@
|
||||
#endif
|
||||
#endif
|
||||
|
||||
#ifdef __svr4__
|
||||
#if (defined(__svr4__) || defined(__SVR4))
|
||||
#ifndef SIMICS
|
||||
#ifdef NO_DYN
|
||||
#undef NO_DYN
|
||||
|
4
H/Regs.h
4
H/Regs.h
@@ -10,7 +10,7 @@
|
||||
* File: Regs.h *
|
||||
* mods: *
|
||||
* comments: YAP abstract machine registers *
|
||||
* version: $Id: Regs.h,v 1.4 2001-06-27 15:46:26 vsc Exp $ *
|
||||
* version: $Id: Regs.h,v 1.5 2001-09-24 18:07:16 vsc Exp $ *
|
||||
*************************************************************************/
|
||||
|
||||
|
||||
@@ -25,7 +25,7 @@
|
||||
#endif
|
||||
#endif
|
||||
|
||||
#ifdef sparc
|
||||
#if defined(sparc) || defined(__sparc)
|
||||
#undef PUSH_REGS
|
||||
#undef PUSH_X
|
||||
#endif
|
||||
|
@@ -28,7 +28,7 @@ static char SccsId[] = "%W% %G%";
|
||||
*/
|
||||
#ifdef __GNUC__
|
||||
|
||||
#ifdef sparc
|
||||
#if defined(sparc) || defined(__sparc)
|
||||
#define SHADOW_P 1
|
||||
#define SHADOW_Y 1
|
||||
#define SHADOW_S 1
|
||||
|
@@ -102,7 +102,7 @@ void STD_PROTO(YAP_InitHeap, (void *));
|
||||
|
||||
#elif USE_SBRK
|
||||
|
||||
#ifdef __svr4__
|
||||
#if (defined(__svr4__) || defined(__SVR4))
|
||||
#include <unistd.h>
|
||||
#elif sun
|
||||
#include <sys/types.h>
|
||||
|
@@ -371,7 +371,9 @@ Int unify(Term t0, Term t1)
|
||||
return(TRUE);
|
||||
} else {
|
||||
while(TR != TR0) {
|
||||
CELL *p = (CELL *)TrailTerm(--TR);
|
||||
CELL *p;
|
||||
--TR;
|
||||
p = (CELL *)TrailTerm(TR);
|
||||
RESET_VARIABLE(p);
|
||||
}
|
||||
return(FALSE);
|
||||
|
Reference in New Issue
Block a user