source: src/libcfa/stdlib @ 59239b8

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 59239b8 was 59239b8, checked in by Thierry Delisle <tdelisle@…>, 7 years ago

new, delete, malloc, etc. no longer require an otype, only a sized dtype

  • Property mode set to 100644
File size: 4.5 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 : Wed Jul  6 14:28:55 2016
13// Update Count     : 99
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 );
52
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 );
86
87forall( otype T | { int ?<?( T, T ); } )
88void qsort( const T * arr, size_t dimension );
89
90//---------------------------------------
91
92forall( otype T | { T ?/?( T, T ); T ?%?( T, T ); } )
93[ T, T ] div( T t1, T t2 );
94
95//---------------------------------------
96
97char abs( char );
98extern "C" { int abs( int ); }                                                  // use default C routine for int
99long int abs( long int );
100long long int abs( long long int );
101float abs( float );
102double abs( double );
103long double abs( long double );
104float abs( float _Complex );
105double abs( double _Complex );
106long double abs( long double _Complex );
107
108//---------------------------------------
109
110void rand48seed( long int s );
111char rand48();
112int rand48();
113unsigned int rand48();
114long int rand48();
115unsigned long int rand48();
116float rand48();
117double rand48();
118float _Complex rand48();
119double _Complex rand48();
120long double _Complex rand48();
121
122//---------------------------------------
123
124forall( otype T | { int ?<?( T, T ); } )
125T min( T t1, T t2 );
126
127forall( otype T | { int ?>?( T, T ); } )
128T max( T t1, T t2 );
129
130forall( otype T | { T min( T, T ); T max( T, T ); } )
131T clamp( T value, T min_val, T max_val );
132
133forall( otype T )
134void swap( T * t1, T * t2 );
135
136#endif // STDLIB_H
137
138// Local Variables: //
139// mode: c //
140// tab-width: 4 //
141// End: //
Note: See TracBrowser for help on using the repository browser.