Imported gcc-4.4.3

[msp430-gcc.git] / libf2c / libI77 / fmtlib.c

diff --git a/libf2c/libI77/fmtlib.c b/libf2c/libI77/fmtlib.c
deleted file mode 100644 (file)
index 69c0d9b..0000000
--- a/libf2c/libI77/fmtlib.c
+++ /dev/null
@@ -1,46 +0,0 @@
-/*     @(#)fmtlib.c    1.2     */
-#define MAXINTLENGTH 23
-#include "config.h"
-
-#include "f2c.h"
-#ifndef Allow_TYQUAD
-#undef longint
-#define longint long
-#undef ulongint
-#define ulongint unsigned long
-#endif
-
-#ifdef KR_headers
-char *f__icvt(value,ndigit,sign, base) longint value; int *ndigit,*sign;
- register int base;
-#else
-char *f__icvt(longint value, int *ndigit, int *sign, int base)
-#endif
-{
-       static char buf[MAXINTLENGTH+1];
-       register int i;
-       ulongint uvalue;
-
-       if(value > 0) {
-               uvalue = value;
-               *sign = 0;
-               }
-       else if (value < 0) {
-               uvalue = -value;
-               *sign = 1;
-               }
-       else {
-               *sign = 0;
-               *ndigit = 1;
-               buf[MAXINTLENGTH-1] = '0';
-               return &buf[MAXINTLENGTH-1];
-               }
-       i = MAXINTLENGTH;
-       do {
-               buf[--i] = (uvalue%base) + '0';
-               uvalue /= base;
-               }
-               while(uvalue > 0);
-       *ndigit = MAXINTLENGTH - i;
-       return &buf[i];
-       }