Changeset 5c98a25


Ignore:
Timestamp:
Aug 8, 2022, 5:14:55 PM (2 months ago)
Author:
Peter A. Buhr <pabuhr@…>
Branches:
master, pthread-emulation
Children:
091ccdb
Parents:
d78c238
Message:

update test programs with for-control changes

Location:
tests
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • tests/loop_else.cfa

    rd78c238 r5c98a25  
    3030        for ( 1 ) { sout | "A"; } else { sout | "else"; }                                                               sout | nl;
    3131        for ( 10 ) { sout | "A"; } else { sout | "else"; }                                                          sout | nl;
    32         for ( = 10 ) { sout | "A"; } else { sout | "else"; }                                                    sout | nl;
     32        for ( ~= 10 ) { sout | "A"; } else { sout | "else"; }                                                   sout | nl;
    3333        for ( 1 ~= 10 ~ 2 ) { sout | "B"; } else { sout | "else"; }                                             sout | nl;
    3434        for ( 10 -~= 1 ~ 2 ) { sout | "C"; } else { sout | "else"; }                                    sout | nl;
     
    3737
    3838        for ( i; 10 ) { sout | i; } else { sout | "else"; }                                                             sout | nl;
    39         for ( i; = 10 ) { sout | i; } else { sout | "else"; }                                                   sout | nl;
     39        for ( i; ~= 10 ) { sout | i; } else { sout | "else"; }                                                  sout | nl;
    4040        for ( i; 1 ~= 10 ~ 2 ) { sout | i; } else { sout | "else"; }                                    sout | nl;
    4141        for ( i; 10 -~= 1 ~ 2 ) { sout | i; } else { sout | "else"; }                                   sout | nl;
     
    7676        for ( N ) { sout | "N"; } else { sout | "else"; }                                                       sout | nl;
    7777        for ( i; N ) { sout | i; } else { sout | "else"; }                                                      sout | nl;
    78         for ( i; = N ) { sout | i; } else { sout | "else"; }                                            sout | nl;
     78        for ( i; ~= N ) { sout | i; } else { sout | "else"; }                                           sout | nl;
    7979        for ( i; N -~ 0 ) { sout | i; } else { sout | "else"; }                                         sout | nl | nl;
    8080
  • tests/loopctrl.cfa

    rd78c238 r5c98a25  
    1010// Created On       : Wed Aug  8 18:32:59 2018
    1111// Last Modified By : Peter A. Buhr
    12 // Last Modified On : Thu Dec 12 17:55:26 2019
    13 // Update Count     : 108
     12// Last Modified On : Mon Aug  8 16:00:39 2022
     13// Update Count     : 113
    1414//
    1515
     
    4343        for ( 1 ) { sout | "A"; }                                                       sout | nl;
    4444        for ( 10 ) { sout | "A"; }                                                      sout | nl;
    45         for ( = 10 ) { sout | "A"; }                                            sout | nl;
     45        for ( ~= 10 ) { sout | "A"; }                                           sout | nl;
    4646        for ( 1 ~= 10 ~ 2 ) { sout | "B"; }                                     sout | nl;
    4747        for ( 10 -~= 1 ~ 2 ) { sout | "C"; }                            sout | nl;
     
    5050
    5151        for ( i; 10 ) { sout | i; }                                                     sout | nl;
    52         for ( i; = 10 ) { sout | i; }                                           sout | nl;
     52        for ( i; ~= 10 ) { sout | i; }                                          sout | nl;
    5353        for ( i; 1 ~= 10 ~ 2 ) { sout | i; }                            sout | nl;
    5454        for ( i; 10 -~= 1 ~ 2 ) { sout | i; }                           sout | nl;
     
    8989        for ( N ) { sout | "N"; }                                                       sout | nl;
    9090        for ( i; N ) { sout | i; }                                                      sout | nl;
    91         for ( i; = N ) { sout | i; }                                            sout | nl;
     91        for ( i; ~= N ) { sout | i; }                                           sout | nl;
    9292        for ( i; N -~ 0 ) { sout | i; }                                         sout | nl | nl;
    9393
Note: See TracChangeset for help on using the changeset viewer.