Doxygen Source Code Documentation
fmtlib.c File Reference
#include "f2c.h"Go to the source code of this file.
Defines | |
| #define | MAXINTLENGTH 23 |
| #define | longint long |
| #define | ulongint unsigned long |
Functions | |
| char * | f__icvt (longint value, int *ndigit, int *sign, int base) |
Define Documentation
|
|
Definition at line 7 of file fmtlib.c. Referenced by f__icvt(). |
|
|
Definition at line 2 of file fmtlib.c. Referenced by f__icvt(). |
|
|
Definition at line 9 of file fmtlib.c. Referenced by f__icvt(), qbit_bits(), and qbit_cshift(). |
Function Documentation
|
||||||||||||||||||||
|
Definition at line 16 of file fmtlib.c. References base, i, longint, MAXINTLENGTH, and ulongint. Referenced by lwrt_I(), wrt_I(), and wrt_IM().
00018 {
00019 static char buf[MAXINTLENGTH+1];
00020 register int i;
00021 ulongint uvalue;
00022
00023 if(value > 0) {
00024 uvalue = value;
00025 *sign = 0;
00026 }
00027 else if (value < 0) {
00028 uvalue = -value;
00029 *sign = 1;
00030 }
00031 else {
00032 *sign = 0;
00033 *ndigit = 1;
00034 buf[MAXINTLENGTH-1] = '0';
00035 return &buf[MAXINTLENGTH-1];
00036 }
00037 i = MAXINTLENGTH;
00038 do {
00039 buf[--i] = (uvalue%base) + '0';
00040 uvalue /= base;
00041 }
00042 while(uvalue > 0);
00043 *ndigit = MAXINTLENGTH - i;
00044 return &buf[i];
00045 }
|
