fix wrong cast for large links
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@239 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
parent
2088cb48b0
commit
bdbcb1e005
@ -92,9 +92,9 @@ static char SccsId[] = "%W% %G%";
|
|||||||
#define OTHER_ERROR_IN_DB 4
|
#define OTHER_ERROR_IN_DB 4
|
||||||
|
|
||||||
#if SIZEOF_INT_P==4
|
#if SIZEOF_INT_P==4
|
||||||
#define ToSmall(V) ((BITS16)(Unsigned(V)>>2))
|
#define ToSmall(V) ((link_entry)(Unsigned(V)>>2))
|
||||||
#else
|
#else
|
||||||
#define ToSmall(V) ((BITS16)(Unsigned(V)>>3))
|
#define ToSmall(V) ((link_entry)(Unsigned(V)>>3))
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
#ifdef KEEP_OLD_ENTRIES_HANGING_ABOUT
|
#ifdef KEEP_OLD_ENTRIES_HANGING_ABOUT
|
||||||
|
Reference in New Issue
Block a user