Ignore:
File:
1 edited

Legend:

Unmodified
Added
Removed
  • src/libcfa/stdlib

    rbbe1a87 r3ce0d440  
    1010// Created On       : Thu Jan 28 17:12:35 2016
    1111// Last Modified By : Peter A. Buhr
    12 // Last Modified On : Tue Jul  3 08:17:28 2018
    13 // Update Count     : 324
     12// Last Modified On : Sat Jun  2 08:46:35 2018
     13// Update Count     : 306
    1414//
    1515
     
    264264//---------------------------------------
    265265
    266 extern "C" {                                                                                    // override C version
    267         void srandom( unsigned int seed );
    268         long int random( void );
    269 } // extern "C"
    270 
    271 static inline {
    272         long int random( long int l, long int u ) { if ( u < l ) [u, l] = [l, u]; return lrand48() % (u - l) + l; } // [l,u)
    273         long int random( long int u ) { if ( u < 0 ) return random( u, 0 ); else return random( 0, u ); } // [0,u)
    274         unsigned long int random( void ) { return lrand48(); }
    275         unsigned long int random( unsigned long int l, unsigned long int u ) { if ( u < l ) [u, l] = [l, u]; return lrand48() % (u - l) + l; } // [l,u)
    276         unsigned long int random( unsigned long int u ) { return lrand48() % u; } // [0,u)
    277 
    278         char random( void ) { return (unsigned long int)random(); }
    279         char random( char u ) { return random( (unsigned long int)u ); } // [0,u)
    280         char random( char l, char u ) { return random( (unsigned long int)l, (unsigned long int)u ); } // [l,u)
    281         int random( void ) { return (long int)random(); }
    282         int random( int u ) { return random( (long int)u ); } // [0,u]
    283         int random( int l, int u ) { return random( (long int)l, (long int)u ); } // [l,u)
    284         unsigned int random( void ) { return (unsigned long int)random(); }
    285         unsigned int random( unsigned int u ) { return random( (unsigned long int)u ); } // [0,u]
    286         unsigned int random( unsigned int l, unsigned int u ) { return random( (unsigned long int)l, (unsigned long int)u ); } // [l,u)
    287 } // distribution
    288 
    289 float random( void );                                                                   // [0.0, 1.0)
    290 double random( void );                                                                  // [0.0, 1.0)
    291 float _Complex random( void );                                                  // [0.0, 1.0)+[0.0, 1.0)i
    292 double _Complex random( void );                                                 // [0.0, 1.0)+[0.0, 1.0)i
    293 long double _Complex random( void );                                    // [0.0, 1.0)+[0.0, 1.0)i
     266extern "C" { void srandom( unsigned int seed ); }               // override C version
     267char random( void );
     268char random( char u );
     269char random( char l, char u );
     270int random( void );
     271int random( int u );
     272int random( int l, int u );
     273unsigned int random( void );
     274unsigned int random( unsigned int u );
     275unsigned int random( unsigned int l, unsigned int u );
     276extern "C" { long int random( void ); }                                 // override C version
     277long int random( long int u );
     278long int random( long int l, long int u );
     279unsigned long int random( void );
     280unsigned long int random( unsigned long int u );
     281unsigned long int random( unsigned long int l, unsigned long int u );
     282float random( void );
     283double random( void );
     284float _Complex random( void );
     285double _Complex random( void );
     286long double _Complex random( void );
    294287
    295288//---------------------------------------
Note: See TracChangeset for help on using the changeset viewer.