[Bug libfortran/28452] __gfortran_random_r10 not found

[tkoenig at gcc dot gnu dot org]

------- Comment #9 from tkoenig at gcc dot gnu dot org  2006-08-26 19:17 -------
Subject: Bug 28452

Author: tkoenig
Date: Sat Aug 26 19:17:35 2006
New Revision: 116476

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=116476
Log:
2006-08-26  Thomas Koenig  <[EMAIL PROTECTED]>

        PR libfortran/28542
        * Makefile.am:  Remove normalize.c.
        * aclocal.m4:  Regenerate.
        * Makefile.in:  Regenerate.
        * libgfortran.h:  #include <float.h>.
        Define GFC_REAL_*_DIGITS and GFC_REAL_*_RADIX.
        Remove prototypes for normalize_r4_i4 and normalize_r8_i8.
        * intrinsics/random.c (top level): Add prototypes for
        random_r10, arandom_r10, random_r16 and arandom_r16.
        (rnumber_4):  New static function.
        (rnumber_8):  New static function.
        (rnumber_10): New static function.
        (rnumber_16): New static function.
        (top level):  Set to kiss_size to 12 if we have
        REAL(KIND=16), to 8 otherwise.
        Define KISS_DEFAULT_SEED_1, KISS_DEFAULT_SEED_2 and
        KISS_DEFAULT_SEED_3.
        (kiss_random_kernel):  Take argument to differentiate
        between different random number generators.
        (random_r4):  Add argument to call to kiss_random_kernel,
        use rnumber_*.
        (random_r8):  Likewise.
        (random_r10):  New function.
        (random_r16):  New function.
        (arandom_r4):  Add argument to call to kiss_random_kernel,
        use_rnumber_*.
        (arandom_r8):  Likewise.
        (arandom_r10):  New function.
        (arandom_r16):  New function.
        * intrinsics/rand.c (rand):  Use shift and mask.
        * runtime/normalize.c:  Remove.

2006-08-28  Thomas Koenig  <[EMAIL PROTECTED]>

        PR libfortran/28452
        * gfortran.dg/random_3.f90:  New test.


Added:
    branches/gcc-4_1-branch/gcc/testsuite/gfortran.dg/random_3.f90
Removed:
    branches/gcc-4_1-branch/libgfortran/runtime/normalize.c
Modified:
    branches/gcc-4_1-branch/gcc/testsuite/ChangeLog
    branches/gcc-4_1-branch/libgfortran/ChangeLog
    branches/gcc-4_1-branch/libgfortran/Makefile.am
    branches/gcc-4_1-branch/libgfortran/Makefile.in
    branches/gcc-4_1-branch/libgfortran/intrinsics/rand.c
    branches/gcc-4_1-branch/libgfortran/intrinsics/random.c
    branches/gcc-4_1-branch/libgfortran/libgfortran.h


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=28452