Changeset 283876d for tests/loopctrl.cfa


Ignore:
Timestamp:
Aug 12, 2022, 9:07:28 AM (2 years ago)
Author:
Peter A. Buhr <pabuhr@…>
Branches:
ADT, ast-experimental, master, pthread-emulation
Children:
082af5b
Parents:
dbedd71
Message:

update loop tests and expected output for corrected @ usage for negative range

File:
1 edited

Legend:

Unmodified
Added
Removed
  • tests/loopctrl.cfa

    rdbedd71 r283876d  
    1010// Created On       : Wed Aug  8 18:32:59 2018
    1111// Last Modified By : Peter A. Buhr
    12 // Last Modified On : Tue Aug  9 20:42:27 2022
    13 // Update Count     : 145
     12// Last Modified On : Thu Aug 11 23:04:35 2022
     13// Update Count     : 160
    1414//
    1515
     
    7070
    7171        for ( j; s ~ @ ) { if ( j == 10 ) break; sout | j; }                            sout | nl;
    72         for ( j; s -~ @ ) { if ( j == -10 ) break; sout | j; }                          sout | nl;
     72        for ( j; @ -~ s ) { if ( j == -10 ) break; sout | j; }                          sout | nl;
    7373        for ( j; s ~ @ ~ i ) { if ( j == 10 ) break; sout | j; }                        sout | nl;
    74         for ( j; s -~ @ ~ i ) { if ( j == -10 ) break; sout | j; }                      sout | nl;
     74        for ( j; @ -~ s ~ i ) { if ( j == -10 ) break; sout | j; }                      sout | nl;
    7575        for ( j; s ~ @ ~ @ ) { if ( j == 10 ) break; sout | j; j += 1; }        sout | nl;
    7676
    7777        for ( int j; s ~ @ ) { if ( j == 10 ) break; sout | j; j += 1; }        sout | nl;
    78         for ( int j; s -~ @ ) { if ( j == -10 ) break; sout | j; j -= 1; }      sout | nl;
     78        for ( int j; @ -~ s ) { if ( j == -10 ) break; sout | j; j -= 1; }      sout | nl;
    7979        for ( int j; s ~ @ ~ i ) { if ( j == 10 ) break; sout | j; }            sout | nl;
    80         for ( int j; s -~ @ ~ i ) { if ( j == -10 ) break; sout | j; }          sout | nl;
     80        for ( int j; @ -~ s ~ i ) { if ( j == -10 ) break; sout | j; }          sout | nl;
    8181        for ( int j; s ~ @ ~ @ ) { if ( j == 10 ) break; sout | j; j += 1; } sout | nl;
    8282
     
    138138                sout | i;
    139139        }                                                                                                       sout | nl;
    140         for ( i; 10 -~ @ ) {
     140        for ( i; @ -~ 10 ) {
    141141          if ( i < 0 ) break;
    142142                sout | i;
     
    151151                i += 1.7;
    152152        }                                                                                                       sout | nl;
    153         for ( i; 10 -~ @ ~ 2 ) {
     153        for ( i; @ -~ 10 ~ 2 ) {
    154154          if ( i < 0 ) break;
    155155                sout | i;
     
    164164        for ( N ) { sout | "N"; }                                                       sout | nl;
    165165        for ( i; N ) { sout | i; }                                                      sout | nl;
    166         for ( i; ~=  N ) { sout | i; }                                          sout | nl;
     166        for ( i; ~= N ) { sout | i; }                                           sout | nl;
    167167        for ( i; -~= N ) { sout | i; }                                          sout | nl | nl;
    168168
     
    171171
    172172        for ( i; 10 : j; -5 ~ @ ) { sout | i | j; } sout | nl;
    173         for ( i; 10 : j; -5 -~ @ ) { sout | i | j; } sout | nl;
     173        for ( i; 10 : j; @ -~ -5 ) { sout | i | j; } sout | nl;
    174174        for ( i; 10 : j; -5 ~ @ ~ 2 ) { sout | i | j; } sout | nl;
    175         for ( i; 10 : j; -5 -~ @ ~ 2 ) { sout | i | j; } sout | nl | nl;
     175        for ( i; 10 : j; @ -~ -5 ~ 2 ) { sout | i | j; } sout | nl | nl;
    176176
    177177        for ( j; -5 ~ @ : i; 10 ) { sout | i | j; } sout | nl;
    178         for ( j; -5 -~ @ : i; 10 ) { sout | i | j; } sout | nl;
     178        for ( j; @ -~ -5 : i; 10 ) { sout | i | j; } sout | nl;
    179179        for ( j; -5 ~ @ ~ 2 : i; 10 ) { sout | i | j; } sout | nl;
    180         for ( j; -5 -~ @ ~ 2 : i; 10 ) { sout | i | j; } sout | nl | nl;
    181 
    182         for ( j; -5 -~ @ ~ 2 : i; 10 : k; 1.5 ~ @ ) { sout | i | j | k; } sout | nl;
    183         for ( j; -5 -~ @ ~ 2 : k; 1.5 ~ @ : i; 10 ) { sout | i | j | k; } sout | nl;
    184         for ( k; 1.5 ~ @ : j; -5 -~ @ ~ 2 : i; 10 ) { sout | i | j | k; } sout | nl;
     180        for ( j; @ -~ -5 ~ 2 : i; 10 ) { sout | i | j; } sout | nl | nl;
     181
     182        for ( j; @ -~ -5 ~ 2 : i; 10 : k; 1.5 ~ @ ) { sout | i | j | k; } sout | nl;
     183        for ( j; @ -~ -5 ~ 2 : k; 1.5 ~ @ : i; 10 ) { sout | i | j | k; } sout | nl;
     184        for ( k; 1.5 ~ @ : j; @ -~ -5 ~ 2 : i; 10 ) { sout | i | j | k; } sout | nl;
    185185
    186186        for ( S s = (S){0}; s < (S){10,10}; s += (S){1} ) { sout | s; } sout | nl;
Note: See TracChangeset for help on using the changeset viewer.