Changeset ac1ae2c6 for tests/io2.cfa
- Timestamp:
- Dec 12, 2018, 5:22:48 PM (6 years ago)
- Branches:
- ADT, aaron-thesis, arm-eh, ast-experimental, cleanup-dtors, deferred_resn, enum, forall-pointer-decay, jacob/cs343-translation, jenkins-sandbox, master, new-ast, new-ast-unique-expr, no_list, persistent-indexer, pthread-emulation, qualifiedEnum
- Children:
- 7cccc20
- Parents:
- 5ebb1368
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
tests/io2.cfa
r5ebb1368 rac1ae2c6 10 10 // Created On : Wed Mar 2 16:56:02 2016 11 11 // Last Modified By : Peter A. Buhr 12 // Last Modified On : Tue Dec 11 21:51:52201813 // Update Count : 1 0912 // Last Modified On : Wed Dec 12 16:19:15 2018 13 // Update Count : 110 14 14 // 15 15 … … 44 44 45 45 sout | "input bacis types"; 46 in | b // boolean47 | c | sc | usc// character48 | si | usi | i | ui | li | uli | lli | ulli// integral49 | f | d | ld// floating point50 | fc | dc | ldc// floating-point complex51 | cstr( s1 ) | cstr( s2, size ); // C string, length unchecked and checked46 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 52 52 sout | nl; 53 53 54 54 sout | "output basic types"; 55 sout | b | nl// boolean56 | c | ' ' | sc | ' ' | usc | nl// character57 | si | usi | i | ui | li | uli | lli | ulli | nl// integral58 | f | d | ld | nl// floating point59 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 60 60 sout | nl; 61 61 … … 66 66 67 67 sout | "toggle separator"; 68 sout | f | "" | d | "" | ld | nl// floating point without separator69 | sepDisable | fc | dc | ldc | nl// complex without separator70 | fc | sepOn | dc | ldc | nl// local separator add71 | sepEnable | fc | dc | ldc | nl// complex with separator72 | fc | sepOff | dc | ldc | nl// local separator removal73 | s1 | sepOff | s2 | nl// local separator removal74 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 75 75 sout | nl; 76 76 … … 79 79 sepSet( sout, ", $" ); // change separator, maximum of 15 characters 80 80 sout | " to \"" | sep | "\""; 81 sout | f | d | ld | nl82 | fc | dc | ldc | nl83 | s1 | s2 | nl84 81 sout | f | d | ld; 82 sout | fc | dc | ldc; 83 sout | s1 | s2; 84 sout | t1 | t2; // print tuple 85 85 sout | nl; 86 86 sout | "from \"" | sep | "\" " | nonl; 87 87 sepSet( sout, " " ); // restore separator 88 88 sout | "to \"" | sep | "\""; 89 sout | f | d | ld | nl90 | fc | dc | ldc | nl91 | s1 | s2 | nl92 89 sout | f | d | ld; 90 sout | fc | dc | ldc; 91 sout | s1 | s2; 92 sout | t1 | t2; // print tuple 93 93 sout | nl; 94 94
Note: See TracChangeset
for help on using the changeset viewer.