diff options
Diffstat (limited to 'contrib/libf2c/libF77/qbitshft.c')
| -rw-r--r-- | contrib/libf2c/libF77/qbitshft.c | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/contrib/libf2c/libF77/qbitshft.c b/contrib/libf2c/libF77/qbitshft.c deleted file mode 100644 index 87fffb91ff8e..000000000000 --- a/contrib/libf2c/libF77/qbitshft.c +++ /dev/null @@ -1,11 +0,0 @@ -#include "f2c.h" - - longint -#ifdef KR_headers -qbit_shift(a, b) longint a; integer b; -#else -qbit_shift(longint a, integer b) -#endif -{ - return b >= 0 ? a << b : (longint)((ulongint)a >> -b); - } |