Ignore:
File:
1 edited

Legend:

Unmodified
Added
Removed
  • tests/io2.cfa

    rac1ae2c6 r200fcb3  
    1010// Created On       : Wed Mar  2 16:56:02 2016
    1111// Last Modified By : Peter A. Buhr
    12 // Last Modified On : Wed Dec 12 16:19:15 2018
    13 // Update Count     : 110
     12// Last Modified On : Tue Dec 11 21:51:52 2018
     13// Update Count     : 109
    1414//
    1515
     
    4444
    4545        sout | "input bacis types";
    46         in       | b;                                                                                   // boolean
    47         in       | c | sc | usc;                                                                // character
    48         in       | si | usi | i | ui | li | uli | lli | ulli;   // integral
    49         in       | f | d | ld;                                                                  // floating point
    50         in       | fc | dc | ldc;                                                               // floating-point complex
    51         in       | cstr( s1 ) | cstr( s2, size );                               // C string, length unchecked and checked
     46        in       | b                                                                                    // boolean
     47                 | c | sc | usc                                                                 // character
     48                 | si | usi | i | ui | li | uli | lli | ulli    // integral
     49                 | f | d | ld                                                                   // floating point
     50                 | fc | dc | ldc                                                                // floating-point complex
     51                 | cstr( s1 ) | cstr( s2, size );                               // C string, length unchecked and checked
    5252        sout | nl;
    5353
    5454        sout | "output basic types";
    55         sout | b;                                                                                       // boolean
    56         sout | c | ' ' | sc | ' ' | usc;                                        // character
    57         sout | si | usi | i | ui | li | uli | lli | ulli;       // integral
    58         sout | f | d | ld;                                                                      // floating point
    59         sout | fc | dc | ldc;                                                           // complex
     55        sout | b | nl                                                                           // boolean
     56                 | c | ' ' | sc | ' ' | usc | nl                                // character
     57                 | si | usi | i | ui | li | uli | lli | ulli | nl // integral
     58                 | f | d | ld | nl                                                              // floating point
     59                | fc | dc | ldc;                                                               // complex
    6060        sout | nl;
    6161
     
    6666
    6767        sout | "toggle separator";
    68         sout | f | "" | d | "" | ld;                                            // floating point without separator
    69         sout | sepDisable | fc | dc | ldc;                                      // complex without separator
    70         sout | fc | sepOn | dc | ldc;                                           // local separator add
    71         sout | sepEnable | fc | dc | ldc;                                       // complex with separator
    72         sout | fc | sepOff | dc | ldc;                                          // local separator removal
    73         sout | s1 | sepOff | s2;                                                        // local separator removal
    74         sout | s1 | "" | s2;                                                            // local separator removal
     68        sout | f | "" | d | "" | ld | nl                                        // floating point without separator
     69                 | sepDisable | fc | dc | ldc | nl                              // complex without separator
     70                 | fc | sepOn | dc | ldc | nl                                   // local separator add
     71                 | sepEnable | fc | dc | ldc | nl                               // complex with separator
     72                 | fc | sepOff | dc | ldc | nl                                  // local separator removal
     73                 | s1 | sepOff | s2 | nl                                                // local separator removal
     74                | s1 | "" | s2;                                                                // local separator removal
    7575        sout | nl;
    7676
     
    7979        sepSet( sout, ", $" );                                                          // change separator, maximum of 15 characters
    8080        sout | " to \"" | sep | "\"";
    81         sout | f | d | ld;
    82         sout | fc | dc | ldc;
    83         sout | s1 | s2;
    84         sout | t1 | t2;                                                                         // print tuple
     81        sout | f | d | ld | nl
     82                 | fc | dc | ldc | nl
     83                 | s1 | s2 | nl
     84                | t1 | t2;                                                                             // print tuple
    8585        sout | nl;
    8686        sout | "from \"" | sep | "\" " | nonl;
    8787        sepSet( sout, " " );                                                            // restore separator
    8888        sout | "to \"" | sep | "\"";
    89         sout | f | d | ld;
    90         sout | fc | dc | ldc;
    91         sout | s1 | s2;
    92         sout | t1 | t2;                                                                         // print tuple
     89        sout | f | d | ld | nl
     90                 | fc | dc | ldc | nl
     91                 | s1 | s2 | nl
     92                | t1 | t2;                                                                             // print tuple
    9393        sout | nl;
    9494
Note: See TracChangeset for help on using the changeset viewer.