Changeset 8f34661


Ignore:
Timestamp:
Aug 9, 2018, 9:20:15 PM (3 years ago)
Author:
Peter A. Buhr <pabuhr@…>
Branches:
aaron-thesis, arm-eh, cleanup-dtors, deferred_resn, demangler, jacob/cs343-translation, jenkins-sandbox, master, new-ast, new-ast-unique-expr, no_list, persistent-indexer
Children:
b7c5527
Parents:
3b2b37f
Message:

switch to new for control

Location:
src/tests
Files:
2 added
3 edited

Legend:

Unmodified
Added
Removed
  • src/tests/alloc.c

    r3b2b37f r8f34661  
    1010// Created On       : Wed Feb  3 07:56:22 2016
    1111// Last Modified By : Peter A. Buhr
    12 // Last Modified On : Thu Jul 26 20:58:05 2018
    13 // Update Count     : 334
     12// Last Modified On : Thu Aug  9 06:21:35 2018
     13// Update Count     : 337
    1414//
    1515
     
    6262        p = (int *)calloc( dim, sizeof( *p ) );                         // C array calloc, type unsafe
    6363        printf( "C   array calloc, fill 0\n" );
    64         for ( int i = 0; i < dim; i += 1 ) { printf( "%#x ", p[i] ); }
     64        for ( i; dim ) { printf( "%#x ", p[i] ); }
    6565        printf( "\n" );
    6666        free( p );
     
    6868        p = calloc( dim );                                  // CFA array calloc, type safe
    6969        printf( "CFA array calloc, fill 0\n" );
    70         for ( int i = 0; i < dim; i += 1 ) { printf( "%#x ", p[i] ); }
     70        for ( i; dim ) { printf( "%#x ", p[i] ); }
    7171        printf( "\n" );
    7272        free( p );
    7373
    7474        p = alloc( dim );                                   // CFA array alloc, type safe
    75         for ( int i = 0; i < dim; i += 1 ) { p[i] = 0xdeadbeef; }
     75        for ( i; dim ) { p[i] = 0xdeadbeef; }
    7676        printf( "CFA array alloc, no fill\n" );
    77         for ( int i = 0; i < dim; i += 1 ) { printf( "%#x ", p[i] ); }
     77        for ( i; dim ) { printf( "%#x ", p[i] ); }
    7878        printf( "\n" );
    7979        free( p );
     
    8181        p = alloc( 2 * dim, fill );                         // CFA array alloc, fill
    8282        printf( "CFA array alloc, fill %#hhx\n", fill );
    83         for ( int i = 0; i < 2 * dim; i += 1 ) { printf( "%#x ", p[i] ); }
     83        for ( i; 2 * dim ) { printf( "%#x ", p[i] ); }
    8484        printf( "\n" );
    8585        // do not free
     
    9090
    9191        p = (int *)realloc( p, dim * sizeof(*p) );                      // C realloc
    92         for ( int i = 0; i < dim; i += 1 ) { p[i] = 0xdeadbeef; }
     92        for ( i; dim ) { p[i] = 0xdeadbeef; }
    9393        printf( "C   realloc\n" );
    94         for ( int i = 0; i < dim; i += 1 ) { printf( "%#x ", p[i] ); }
     94        for ( i; dim ) { printf( "%#x ", p[i] ); }
    9595        printf( "\n" );
    9696
    9797        p = realloc( p, 2 * dim * sizeof(*p) );             // CFA realloc
    98         for ( int i = dim; i < 2 * dim; i += 1 ) { p[i] = 0x1010101; }
     98        for ( i; dim ~ 2 * dim ) { p[i] = 0x1010101; }
    9999        printf( "CFA realloc\n" );
    100         for ( int i = 0; i < 2 * dim; i += 1 ) { printf( "%#x ", p[i] ); }
     100        for ( i; 2 * dim ) { printf( "%#x ", p[i] ); }
    101101        printf( "\n" );
    102102        // do not free
     
    107107
    108108        p = alloc( p, dim );                                // CFA resize array alloc
    109         for ( int i = 0; i < dim; i += 1 ) { p[i] = 0xdeadbeef; }
     109        for ( i; dim ) { p[i] = 0xdeadbeef; }
    110110        printf( "CFA resize alloc\n" );
    111         for ( int i = 0; i < dim; i += 1 ) { printf( "%#x ", p[i] ); }
     111        for ( i; dim ) { printf( "%#x ", p[i] ); }
    112112        printf( "\n" );
    113113
    114114        p = alloc( p, 2 * dim );                            // CFA resize array alloc
    115         for ( int i = dim; i < 2 * dim; i += 1 ) { p[i] = 0x1010101; }
     115        for ( i; dim ~ 2 * dim ) { p[i] = 0x1010101; }
    116116        printf( "CFA resize array alloc\n" );
    117         for ( int i = 0; i < 2 * dim; i += 1 ) { printf( "%#x ", p[i] ); }
     117        for ( i; 2 * dim ) { printf( "%#x ", p[i] ); }
    118118        printf( "\n" );
    119119
    120120        p = alloc( p, dim );                                // CFA array alloc
    121121        printf( "CFA resize array alloc\n" );
    122         for ( int i = 0; i < dim; i += 1 ) { printf( "%#x ", p[i] ); }
     122        for ( i; dim ) { printf( "%#x ", p[i] ); }
    123123        printf( "\n" );
    124124
     
    128128        p = alloc( p, dim, fill );                          // CFA array alloc, fill
    129129        printf( "CFA resize array alloc, fill\n" );
    130         for ( int i = 0; i < dim; i += 1 ) { printf( "%#x ", p[i] ); }
     130        for ( i; dim ) { printf( "%#x ", p[i] ); }
    131131        printf( "\n" );
    132132
    133133        p = alloc( p, 2 * dim, fill );                      // CFA array alloc, fill
    134134        printf( "CFA resize array alloc, fill\n" );
    135         for ( int i = 0; i < 2 * dim; i += 1 ) { printf( "%#x ", p[i] ); }
     135        for ( i; 2 * dim ) { printf( "%#x ", p[i] ); }
    136136        printf( "\n" );
    137137
    138138        p = alloc( p, dim, fill );                          // CFA array alloc, fill
    139139        printf( "CFA resize array alloc, fill\n" );
    140         for ( int i = 0; i < dim; i += 1 ) { printf( "%#x ", p[i] );; }
     140        for ( i; dim ) { printf( "%#x ", p[i] );; }
    141141        printf( "\n" );
    142142        free( p );
     
    193193        stp = align_alloc( Alignment, dim );                // CFA array memalign
    194194        assert( (uintptr_t)stp % Alignment == 0 );
    195         for ( int i = 0; i < dim; i += 1 ) { stp[i] = (Struct){ 42, 42.5 }; }
     195        for ( i; dim ) { stp[i] = (Struct){ 42, 42.5 }; }
    196196        printf( "CFA array align_alloc\n" );
    197         for ( int i = 0; i < dim; i += 1 ) { printf( "%d %g, ", stp[i].x, stp[i].y ); }
     197        for ( i; dim ) { printf( "%d %g, ", stp[i].x, stp[i].y ); }
    198198        printf( "\n" );
    199199        free( stp );
     
    202202        assert( (uintptr_t)stp % Alignment == 0 );
    203203        printf( "CFA array align_alloc, fill\n" );
    204         for ( int i = 0; i < dim; i += 1 ) { printf( "%#x %a, ", stp[i].x, stp[i].y ); }
     204        for ( i; dim ) { printf( "%#x %a, ", stp[i].x, stp[i].y ); }
    205205        printf( "\n" );
    206206        free( stp );
     
    221221        amemset( sta, fill, dim );                                                      // CFA array memset, type safe
    222222        printf( "CFA array memset\n" );
    223         for ( int i = 0; i < dim; i += 1 ) { printf( "%#x %a, ", sta[i].x, sta[i].y ); }
     223        for ( i; dim ) { printf( "%#x %a, ", sta[i].x, sta[i].y ); }
    224224        printf( "\n" );
    225225
    226226        amemcpy( sta1, sta, dim );                                                      // CFA array memcpy, type safe
    227227        printf( "CFA array memcpy\n" );
    228         for ( int i = 0; i < dim; i += 1 ) { printf( "%#x %a, ", sta1[i].x, sta1[i].y ); }
     228        for ( i; dim ) { printf( "%#x %a, ", sta1[i].x, sta1[i].y ); }
    229229        printf( "\n" );
    230230
     
    241241        stp = anew( dim, 42, 42.5 );
    242242        printf( "CFA array new initialize\n" );
    243         for ( int i = 0; i < dim; i += 1 ) { printf( "%d %g, ", stp[i].x, stp[i].y ); }
     243        for ( i; dim ) { printf( "%d %g, ", stp[i].x, stp[i].y ); }
    244244        printf( "\n" );
    245245        stp1 = anew( dim, 42, 42.5 );
    246         for ( int i = 0; i < dim; i += 1 ) { printf( "%d %g, ", stp1[i].x, stp1[i].y ); }
     246        for ( i; dim ) { printf( "%d %g, ", stp1[i].x, stp1[i].y ); }
    247247        printf( "\n" );
    248248        adelete( dim, stp, dim, stp1 );
  • src/tests/concurrent/examples/matrixSum.c

    r3b2b37f r8f34661  
    1111// Created On       : Mon Oct  9 08:29:28 2017
    1212// Last Modified By : Peter A. Buhr
    13 // Last Modified On : Fri May 25 09:34:27 2018
    14 // Update Count     : 10
     13// Last Modified On : Thu Aug  9 09:17:30 2018
     14// Update Count     : 13
    1515//
    1616
     
    3030void main( Adder & adder ) with( adder ) {                              // thread starts here
    3131        subtotal = 0;
    32         for ( int c = 0; c < cols; c += 1 ) {
     32        for ( c; cols ) {
    3333                subtotal += row[c];
    3434        } // for
     
    3636
    3737int main() {
    38         const int rows = 10, cols = 1000;
     38        /* const */ int rows = 10, cols = 1000;
    3939        int matrix[rows][cols], subtotals[rows], total = 0;
    4040        processor p;                                                                            // add kernel thread
    4141
    42         for ( int r = 0; r < rows; r += 1 ) {
    43                 for ( int c = 0; c < cols; c += 1 ) {
     42        for ( r; rows ) {
     43                for ( c; cols ) {
    4444                        matrix[r][c] = 1;
    4545                } // for
    4646        } // for
    4747        Adder * adders[rows];
    48         for ( int r = 0; r < rows; r += 1 ) {                           // start threads to sum rows
     48        for ( r; rows ) {                                                                       // start threads to sum rows
    4949                adders[r] = &(*malloc()){ matrix[r], cols, subtotals[r] };
    5050//              adders[r] = new( matrix[r], cols, &subtotals[r] );
    5151        } // for
    52         for ( int r = 0; r < rows; r += 1 ) {                           // wait for threads to finish
     52        for ( r; rows ) {                                                                       // wait for threads to finish
    5353                delete( adders[r] );
    5454                total += subtotals[r];                                                  // total subtotals
  • src/tests/searchsort.c

    r3b2b37f r8f34661  
    1010// Created On       : Thu Feb  4 18:17:50 2016
    1111// Last Modified By : Peter A. Buhr
    12 // Last Modified On : Tue Jan  2 08:01:17 2018
    13 // Update Count     : 100
     12// Last Modified On : Thu Aug  9 07:54:57 2018
     13// Update Count     : 101
    1414//
    1515
     
    2424        int iarr[size];
    2525
    26         for ( unsigned int i = 0; i < size; i += 1 ) {
     26        for ( i; 0u ~ size ) {
    2727                iarr[i] = size - i;
    2828                sout | iarr[i] | ", ";
     
    3232        // ascending sort/search by changing < to >
    3333        qsort( iarr, size );
    34         for ( unsigned int i = 0; i < size; i += 1 ) {
     34        for ( i; 0u ~ size ) {
    3535                sout | iarr[i] | ", ";
    3636        } // for
    3737        sout | endl;
    38         for ( unsigned int i = 0; i < size; i += 1 ) {          // C version
     38        for ( i; 0u ~ size ) {          // C version
    3939                int key = size - i;
    4040                int * v = bsearch( &key, iarr, size, sizeof( iarr[0] ), comp );
     
    4343        sout | endl;
    4444
    45         for ( unsigned int i = 0; i < size; i += 1 ) {
     45        for ( i; 0u ~ size ) {
    4646                int * v = bsearch( size - i, iarr, size );
    4747                sout | size - i | ':' | *v | ", ";
    4848        } // for
    4949        sout | endl;
    50         for ( unsigned int i = 0; i < size; i += 1 ) {
     50        for ( i; 0u ~ size ) {
    5151                unsigned int posn = bsearch( size - i, iarr, size );
    5252                sout | size - i | ':' | iarr[posn] | ", ";
     
    5555
    5656        // descending sort/search by changing < to >
    57         for ( unsigned int i = 0; i < size; i += 1 ) {
     57        for ( i; 0u ~ size ) {
    5858                iarr[i] = i + 1;
    5959                sout | iarr[i] | ", ";
     
    6363                int ?<?( int x, int y ) { return x > y; }
    6464                qsort( iarr, size );
    65                 for ( unsigned int i = 0; i < size; i += 1 ) {
     65                for ( i; 0u ~ size ) {
    6666                        sout | iarr[i] | ", ";
    6767                } // for
    6868                sout | endl;
    69                 for ( unsigned int i = 0; i < size; i += 1 ) {
     69                for ( i; 0u ~ size ) {
    7070                        int * v = bsearch( size - i, iarr, size );
    7171                        sout | size - i | ':' | *v | ", ";
    7272                } // for
    7373                sout | endl;
    74                 for ( unsigned int i = 0; i < size; i += 1 ) {
     74                for ( i; 0u ~ size ) {
    7575                        unsigned int posn = bsearch( size - i, iarr, size );
    7676                        sout | size - i | ':' | iarr[posn] | ", ";
     
    8080
    8181        double darr[size];
    82         for ( unsigned int i = 0; i < size; i += 1 ) {
     82        for ( i; 0u ~ size ) {
    8383                darr[i] = size - i + 0.5;
    8484                sout | darr[i] | ", ";
     
    8686        sout | endl;
    8787        qsort( darr, size );
    88         for ( unsigned int i = 0; i < size; i += 1 ) {
     88        for ( i; 0u ~ size ) {
    8989                sout | darr[i] | ", ";
    9090        } // for
    9191        sout | endl;
    92         for ( unsigned int i = 0; i < size; i += 1 ) {
     92        for ( i; 0u ~ size ) {
    9393                double * v = bsearch( size - i + 0.5, darr, size );
    9494                sout | size - i + 0.5 | ':' | *v | ", ";
    9595        } // for
    9696        sout | endl;
    97         for ( unsigned int i = 0; i < size; i += 1 ) {
     97        for ( i; 0u ~ size ) {
    9898                unsigned int posn = bsearch( size - i + 0.5, darr, size );
    9999                sout | size - i + 0.5 | ':' | darr[posn] | ", ";
     
    104104        int ?<?( S t1, S t2 ) { return t1.i < t2.i && t1.j < t2.j; }
    105105        ofstream & ?|?( ofstream & os, S v ) { return os | v.i | ' ' | v.j; }
    106         for ( unsigned int i = 0; i < size; i += 1 ) {
     106        for ( i; 0u ~ size ) {
    107107                sarr[i].i = size - i;
    108108                sarr[i].j = size - i + 1;
     
    111111        sout | endl;
    112112        qsort( sarr, size );
    113         for ( unsigned int i = 0; i < size; i += 1 ) {
     113        for ( i; 0u ~ size ) {
    114114                sout | sarr[i] | ", ";
    115115        } // for
    116116        sout | endl;
    117         for ( unsigned int i = 0; i < size; i += 1 ) {
     117        for ( i; 0u ~ size ) {
    118118                S temp = { size - i, size - i + 1 };
    119119                S * v = bsearch( temp, sarr, size );
     
    121121        } // for
    122122        sout | endl;
    123         for ( unsigned int i = 0; i < size; i += 1 ) {
     123        for ( i; 0u ~ size ) {
    124124                S temp = { size - i, size - i + 1 };
    125125                unsigned int posn = bsearch( temp, sarr, size );
     
    129129        {
    130130                unsigned int getKey( const S & s ) { return s.j; }
    131                 for ( unsigned int i = 0; i < size; i += 1 ) {
     131                for ( i; 0u ~ size ) {
    132132                        sout | sarr[i] | ", ";
    133133                } // for
    134134                sout | endl;
    135                 for ( unsigned int i = 0; i < size; i += 1 ) {
     135                for ( i; 0u ~ size ) {
    136136                        S * v = bsearch( size - i + 1, sarr, size );
    137137                        sout | size - i + 1 | ':' | *v | ", ";
    138138                } // for
    139139                sout | endl;
    140                 for ( unsigned int i = 0; i < size; i += 1 ) {
     140                for ( i; 0u ~ size ) {
    141141                        unsigned int posn = bsearch( size - i + 1, sarr, size );
    142142                        sout | size - i + 1 | ':' | sarr[posn] | ", ";
Note: See TracChangeset for help on using the changeset viewer.