- Timestamp:
- Sep 24, 2025, 6:23:34 PM (22 hours ago)
- Branches:
- master
- Children:
- 2d743bd
- Parents:
- 2df85ce
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
libcfa/src/stdlib.cfa
r2df85ce r1911f37 10 10 // Created On : Thu Jan 28 17:10:29 2016 11 11 // Last Modified By : Peter A. Buhr 12 // Last Modified On : Wed Sep 24 18: 01:01202513 // Update Count : 7 5912 // Last Modified On : Wed Sep 24 18:14:20 2025 13 // Update Count : 760 14 14 // 15 15 … … 46 46 forall( T & | sized(T) | { void ^?{}( T & ); } ) 47 47 void adelete( T arr[] ) { 48 if ( arr == 0p ) return;// 0p ? special case48 if ( arr == 0p ) return; // 0p ? special case 49 49 size_t dim = sizeof( T ) == 0 ? (size_t)(*(size_t *)arr) : malloc_size( arr ) / sizeof( T ); // compute dimension 50 50 for ( i; 0 -~= dim - 1 ) { // reverse allocation order, must be signed … … 65 65 66 66 bool checkif( const char s[], int (* kind)( int ) ) { 67 for () { 67 for () { // at least 1 character '\0' 68 68 if ( *s == '\0' ) return true; 69 69 if ( ! kind( *s ) ) return false; … … 73 73 74 74 bool checkif( const char s[], int (* kind)( int, locale_t ), locale_t locale ) { 75 for () { 75 for () { // at least 1 character '\0' 76 76 if ( *s == '\0' ) return true; 77 77 if ( ! kind( *s, locale ) ) return false;
Note:
See TracChangeset
for help on using the changeset viewer.