00001 char 00002 _libf77_version_f2c[] = "\n@(#) LIBF77 VERSION (f2c) 20051004\n"; 00003 00004 /* 00005 2.00 11 June 1980. File version.c added to library. 00006 2.01 31 May 1988. s_paus() flushes stderr; names of hl_* fixed 00007 [ d]erf[c ] added 00008 8 Aug. 1989: #ifdefs for f2c -i2 added to s_cat.c 00009 29 Nov. 1989: s_cmp returns long (for f2c) 00010 30 Nov. 1989: arg types from f2c.h 00011 12 Dec. 1989: s_rnge allows long names 00012 19 Dec. 1989: getenv_ allows unsorted environment 00013 28 Mar. 1990: add exit(0) to end of main() 00014 2 Oct. 1990: test signal(...) == SIG_IGN rather than & 01 in main 00015 17 Oct. 1990: abort() calls changed to sig_die(...,1) 00016 22 Oct. 1990: separate sig_die from main 00017 25 Apr. 1991: minor, theoretically invisible tweaks to s_cat, sig_die 00018 31 May 1991: make system_ return status 00019 18 Dec. 1991: change long to ftnlen (for -i2) many places 00020 28 Feb. 1992: repair z_sqrt.c (scribbled on input, gave wrong answer) 00021 18 July 1992: for n < 0, repair handling of 0**n in pow_[dr]i.c 00022 and m**n in pow_hh.c and pow_ii.c; 00023 catch SIGTRAP in main() for error msg before abort 00024 23 July 1992: switch to ANSI prototypes unless KR_headers is #defined 00025 23 Oct. 1992: fix botch in signal_.c (erroneous deref of 2nd arg); 00026 change Cabs to f__cabs. 00027 12 March 1993: various tweaks for C++ 00028 2 June 1994: adjust so abnormal terminations invoke f_exit just once 00029 16 Sept. 1994: s_cmp: treat characters as unsigned in comparisons. 00030 19 Sept. 1994: s_paus: flush after end of PAUSE; add -DMSDOS 00031 12 Jan. 1995: pow_[dhiqrz][hiq]: adjust x**i to work on machines 00032 that sign-extend right shifts when i is the most 00033 negative integer. 00034 26 Jan. 1995: adjust s_cat.c, s_copy.c to permit the left-hand side 00035 of character assignments to appear on the right-hand 00036 side (unless compiled with -DNO_OVERWRITE). 00037 27 Jan. 1995: minor tweak to s_copy.c: copy forward whenever 00038 possible (for better cache behavior). 00039 30 May 1995: added subroutine exit(rc) integer rc. Version not changed. 00040 29 Aug. 1995: add F77_aloc.c; use it in s_cat.c and system_.c. 00041 6 Sept. 1995: fix return type of system_ under -DKR_headers. 00042 19 Dec. 1995: s_cat.c: fix bug when 2nd or later arg overlaps lhs. 00043 19 Mar. 1996: s_cat.c: supply missing break after overlap detection. 00044 13 May 1996: add [lq]bitbits.c and [lq]bitshft.c (f90 bit intrinsics). 00045 19 June 1996: add casts to unsigned in [lq]bitshft.c. 00046 26 Feb. 1997: adjust functions with a complex output argument 00047 to permit aliasing it with input arguments. 00048 (For now, at least, this is just for possible 00049 benefit of g77.) 00050 4 April 1997: [cz]_div.c: tweaks invisible on most systems (that may 00051 affect systems using gratuitous extra precision). 00052 19 Sept. 1997: [de]time_.c (Unix systems only): change return 00053 type to double. 00054 2 May 1999: getenv_.c: omit environ in favor of getenv(). 00055 c_cos.c, c_exp.c, c_sin.c, d_cnjg.c, r_cnjg.c, 00056 z_cos.c, z_exp.c, z_log.c, z_sin.c: cope fully with 00057 overlapping arguments caused by equivalence. 00058 3 May 1999: "invisible" tweaks to omit compiler warnings in 00059 abort_.c, ef1asc_.c, s_rnge.c, s_stop.c. 00060 00061 7 Sept. 1999: [cz]_div.c: arrange for compilation under 00062 -DIEEE_COMPLEX_DIVIDE to make these routines 00063 avoid calling sig_die when the denominator 00064 vanishes; instead, they return pairs of NaNs 00065 or Infinities, depending whether the numerator 00066 also vanishes or not. VERSION not changed. 00067 15 Nov. 1999: s_rnge.c: add casts for the case of 00068 sizeof(ftnint) == sizeof(int) < sizeof(long). 00069 10 March 2000: z_log.c: improve accuracy of Real(log(z)) for, e.g., 00070 z near (+-1,eps) with |eps| small. For the old 00071 evaluation, compile with -DPre20000310 . 00072 20 April 2000: s_cat.c: tweak argument types to accord with 00073 calls by f2c when ftnint and ftnlen are of 00074 different sizes (different numbers of bits). 00075 4 July 2000: adjustments to permit compilation by C++ compilers; 00076 VERSION string remains unchanged. 00077 29 Sept. 2000: dtime_.c, etime_.c: use floating-point divide. 00078 dtime_.d, erf_.c, erfc_.c, etime.c: for use with 00079 "f2c -R", compile with -DREAL=float. 00080 23 June 2001: add uninit.c; [fi]77vers.c: make version strings 00081 visible as extern char _lib[fi]77_version_f2c[]. 00082 5 July 2001: modify uninit.c for __mc68k__ under Linux. 00083 16 Nov. 2001: uninit.c: Linux Power PC logic supplied by Alan Bain. 00084 18 Jan. 2002: fix glitches in qbit_bits(): wrong return type, 00085 missing ~ on y in return value. 00086 14 March 2002: z_log.c: add code to cope with buggy compilers 00087 (e.g., some versions of gcc under -O2 or -O3) 00088 that do floating-point comparisons against values 00089 computed into extended-precision registers on some 00090 systems (such as Intel IA32 systems). Compile with 00091 -DNO_DOUBLE_EXTENDED to omit the new logic. 00092 4 Oct. 2002: uninit.c: on IRIX systems, omit use of shell variables. 00093 10 Oct 2005: uninit.c: on IA32 Linux systems, leave the rounding 00094 precision alone rather than forcing it to 53 bits; 00095 compile with -DUNINIT_F2C_PRECISION_53 to get the 00096 former behavior. 00097 */