source: src/libcfa/stdlib @ e464759

ADTaaron-thesisarm-ehast-experimentalcleanup-dtorsdeferred_resndemanglerenumforall-pointer-decayjacob/cs343-translationjenkins-sandboxnew-astnew-ast-unique-exprnew-envno_listpersistent-indexerpthread-emulationqualifiedEnumresolv-newwith_gc
Last change on this file since e464759 was 707446a, checked in by Peter A. Buhr <pabuhr@…>, 8 years ago

add alternate bsearch returning posn of key
  • Property mode set to 100644
File size: 4.7 KB
Line 
1//
2// Cforall Version 1.0.0 Copyright (C) 2016 University of Waterloo
3//
4// The contents of this file are covered under the licence agreement in the
5// file "LICENCE" distributed with Cforall.
6//
7// stdlib --
8//
9// Author           : Peter A. Buhr
10// Created On       : Thu Jan 28 17:12:35 2016
11// Last Modified By : Peter A. Buhr
12// Last Modified On : Sat Apr  1 17:35:24 2017
13// Update Count     : 104
14//
15
16#ifndef STDLIB_H
17#define STDLIB_H
18
19//---------------------------------------
20
21extern "C" {
22#ifndef EXIT_FAILURE
23#define EXIT_FAILURE    1                                                               // failing exit status
24#define EXIT_SUCCESS    0                                                               // successful exit status
25#endif // ! EXIT_FAILURE
26} // extern "C"
27
28//---------------------------------------
29
30extern "C" { void * malloc( size_t ); }                                 // use default C routine for void *
31forall( dtype T | sized(T) ) T * malloc( void );
32forall( dtype T | sized(T) ) T * malloc( char fill );
33forall( dtype T | sized(T) ) T * malloc( T * ptr, size_t size );
34forall( dtype T | sized(T) ) T * malloc( T * ptr, size_t size, unsigned char fill );
35extern "C" { void * calloc( size_t nmemb, size_t size ); } // use default C routine for void *
36forall( dtype T | sized(T) ) T * calloc( size_t nmemb );
37extern "C" { void * realloc( void * ptr, size_t size ); } // use default C routine for void *
38forall( dtype T | sized(T) ) T * realloc( T * ptr, size_t size );
39forall( dtype T | sized(T) ) T * realloc( T * ptr, size_t size, unsigned char fill );
40
41forall( dtype T | sized(T) ) T * aligned_alloc( size_t alignment );
42forall( dtype T | sized(T) ) T * memalign( size_t alignment );          // deprecated
43forall( dtype T | sized(T) ) int posix_memalign( T ** ptr, size_t alignment );
44
45extern "C" {
46void * memset( void * ptr, int fill, size_t size );
47void free( void * ptr );
48} // extern "C"
49
50forall( dtype T, ttype Params | sized(T) | { void ?{}(T *, Params); } ) T * new( Params p );
51forall( dtype T | { void ^?{}(T *); } ) void delete( T * ptr );
52forall( dtype T, ttype Params | { void ^?{}(T *); void delete(Params); } ) void delete( T * ptr, Params rest );
53
54//---------------------------------------
55
56int ato( const char * ptr );
57unsigned int ato( const char * ptr );
58long int ato( const char * ptr );
59unsigned long int ato( const char * ptr );
60long long int ato( const char * ptr );
61unsigned long long int ato( const char * ptr );
62float ato( const char * ptr );
63double ato( const char * ptr );
64long double ato( const char * ptr );
65float _Complex ato( const char * ptr );
66double _Complex ato( const char * ptr );
67long double _Complex ato( const char * ptr );
68
69int strto( const char * sptr, char ** eptr, int base );
70unsigned int strto( const char * sptr, char ** eptr, int base );
71long int strto( const char * sptr, char ** eptr, int base );
72unsigned long int strto( const char * sptr, char ** eptr, int base );
73long long int strto( const char * sptr, char ** eptr, int base );
74unsigned long long int strto( const char * sptr, char ** eptr, int base );
75float strto( const char * sptr, char ** eptr );
76double strto( const char * sptr, char ** eptr );
77long double strto( const char * sptr, char ** eptr );
78float _Complex strto( const char * sptr, char ** eptr );
79double _Complex strto( const char * sptr, char ** eptr );
80long double _Complex strto( const char * sptr, char ** eptr );
81
82//---------------------------------------
83
84forall( otype T | { int ?<?( T, T ); } )
85T * bsearch( T key, const T * arr, size_t dimension );
86forall( otype T | { int ?<?( T, T ); } )
87unsigned int bsearch( T key, const T * arr, size_t dimension );
88
89forall( otype T | { int ?<?( T, T ); } )
90void qsort( const T * arr, size_t dimension );
91
92//---------------------------------------
93
94forall( otype T | { T ?/?( T, T ); T ?%?( T, T ); } )
95[ T, T ] div( T t1, T t2 );
96
97//---------------------------------------
98
99unsigned char abs( signed char );
100extern "C" { int abs( int ); }                                                  // use default C routine for int
101unsigned long int abs( long int );
102unsigned long long int abs( long long int );
103float abs( float );
104double abs( double );
105long double abs( long double );
106float abs( float _Complex );
107double abs( double _Complex );
108long double abs( long double _Complex );
109
110//---------------------------------------
111
112void rand48seed( long int s );
113char rand48();
114int rand48();
115unsigned int rand48();
116long int rand48();
117unsigned long int rand48();
118float rand48();
119double rand48();
120float _Complex rand48();
121double _Complex rand48();
122long double _Complex rand48();
123
124//---------------------------------------
125
126forall( otype T | { int ?<?( T, T ); } )
127T min( T t1, T t2 );
128
129forall( otype T | { int ?>?( T, T ); } )
130T max( T t1, T t2 );
131
132forall( otype T | { T min( T, T ); T max( T, T ); } )
133T clamp( T value, T min_val, T max_val );
134
135forall( otype T )
136void swap( T * t1, T * t2 );
137
138#endif // STDLIB_H
139
140// Local Variables: //
141// mode: c //
142// tab-width: 4 //
143// End: //
Note: See TracBrowser for help on using the repository browser.