Changeset 43385ca for src/libcfa/stdlib.c
- Timestamp:
- Dec 16, 2016, 10:23:20 AM (5 years ago)
- Branches:
- aaron-thesis, arm-eh, cleanup-dtors, deferred_resn, demangler, enum, forall-pointer-decay, jacob/cs343-translation, jenkins-sandbox, master, new-ast, new-ast-unique-expr, new-env, no_list, persistent-indexer, resolv-new, with_gc
- Children:
- 8f60f0b
- Parents:
- 66f8528
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
src/libcfa/stdlib.c
r66f8528 r43385ca 5 5 // file "LICENCE" distributed with Cforall. 6 6 // 7 // algorithm.c -- 7 // algorithm.c -- 8 8 // 9 9 // Author : Peter A. Buhr … … 141 141 if ( sscanf( ptr, "%Lf%Lfi", &re, &im ) == EOF ) {} 142 142 return re + im * _Complex_I; 143 } 143 } 144 144 145 145 int strto( const char * sptr, char ** eptr, int base ) { … … 213 213 //--------------------------------------- 214 214 215 //forall( otype T | { T ?/?( T, T ); T ?%?( T, T ); } )216 //[ T, T ] div( T t1, T t2 ) { return [ t1 / t2, t1 % t2 ]; }215 forall( otype T | { T ?/?( T, T ); T ?%?( T, T ); } ) 216 [ T, T ] div( T t1, T t2 ) { return [ t1 / t2, t1 % t2 ]; } 217 217 218 218 //---------------------------------------
Note: See TracChangeset
for help on using the changeset viewer.