Aren/NetBSD
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

The last commit changed the behavious wrt sign extension.

Browse Source 
Back it out and replace with LINTED comments.
This commit is contained in:
drochner 1999-09-10 12:53:10 +00:00
parent 3368ec72b5
commit 24ca0bcfa6
1 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
lib/libc/quad/ashrdi3.c
View File

@ -1,4 +1,4 @@
/* $NetBSD: ashrdi3.c,v 1.6 1999/05/03 15:37:48 christos Exp $ */ /* $NetBSD: ashrdi3.c,v 1.7 1999/09/10 12:53:10 drochner Exp $ */
/*- /*-
* Copyright (c) 1992, 1993 * Copyright (c) 1992, 1993
@ -42,7 +42,7 @@
#if 0 #if 0
static char sccsid[] = "@(#)ashrdi3.c 8.1 (Berkeley) 6/4/93"; static char sccsid[] = "@(#)ashrdi3.c 8.1 (Berkeley) 6/4/93";
#else #else
__RCSID("$NetBSD: ashrdi3.c,v 1.6 1999/05/03 15:37:48 christos Exp $"); __RCSID("$NetBSD: ashrdi3.c,v 1.7 1999/09/10 12:53:10 drochner Exp $");
#endif #endif
#endif /* LIBC_SCCS and not lint */ #endif /* LIBC_SCCS and not lint */
@ -71,13 +71,16 @@ __ashrdi3(a, shift)
* LONG_BITS is undefined, so we shift (LONG_BITS-1), * LONG_BITS is undefined, so we shift (LONG_BITS-1),
* then 1 more, to get our answer. * then 1 more, to get our answer.
*/ */
s = ((u_long)aa.sl[H] >> (LONG_BITS - 1)) >> 1; /* LINTED inherits machine dependency */
aa.ul[L] = (u_long)aa.sl[H] >> (shift - LONG_BITS); s = (aa.sl[H] >> (LONG_BITS - 1)) >> 1;
/* LINTED inherits machine dependency*/
aa.ul[L] = aa.sl[H] >> (shift - LONG_BITS);
aa.ul[H] = s; aa.ul[H] = s;
} else { } else {
aa.ul[L] = (aa.ul[L] >> shift) | aa.ul[L] = (aa.ul[L] >> shift) |
(aa.ul[H] << (LONG_BITS - shift)); (aa.ul[H] << (LONG_BITS - shift));
aa.sl[H] = (u_long)aa.sl[H] >> shift; /* LINTED inherits machine dependency */
aa.sl[H] >>= shift;
} }
return (aa.q); return (aa.q);
} }