source: tests/io/manipulatorsInput.cfa@ 4f89e7b

ADT ast-experimental enum forall-pointer-decay jacob/cs343-translation new-ast-unique-expr pthread-emulation qualifiedEnum
Last change on this file since 4f89e7b was c8e37e0, checked in by Peter A. Buhr <pabuhr@…>, 5 years ago

more test restructure under directories
  • Property mode set to 100644
File size: 4.9 KB
Line 
1//
2// Cforall Version 1.0.0 Copyright (C) 2019 University of Waterloo
3//
4// manipulatorsInput.cfa --
5//
6// Author : Peter A. Buhr
7// Created On : Sat Jun 8 17:58:54 2019
8// Last Modified By : Peter A. Buhr
9// Last Modified On : Wed Jul 15 15:56:03 2020
10// Update Count : 47
11//
12
13#include <fstream.hfa>
14#include <stdio.h> // scanf
15
16int main() {
17 {
18 char s[] = "yyyyyyyyyyyyyyyyyyyy";
19 const char sk[] = "abc";
20 scanf( "abc " ); scanf( sk ); for ( 5 ) scanf( "%*c" ); printf( "1 %s\n", s );
21 scanf( "%s", s ); printf( "2 %s\n", s );
22 scanf( "%*s" ); printf( "3 %s\n", s );
23 scanf( "%8s", s ); printf( "4 %s\n", s );
24 scanf( "%*8s" ); printf( "5 %s\n", s );
25
26 scanf( "%[abc]", s ); printf( "6 %s\n", s );
27 scanf( "%[^abc]", s ); printf( "7 %s\n", s );
28 scanf( "%*[abc]" ); printf( "8 %s\n", s );
29 scanf( "%*[^abc]" ); printf( "9 %s\n", s );
30 scanf( "%8[abc]", s ); printf( "10 %s\n", s );
31 scanf( "%8[^abc]", s ); printf( "11 %s\n", s );
32 scanf( "%*8[abc]" ); printf( "12 %s\n", s );
33 scanf( "%*8[^abc]" ); printf( "13 %s\n", s );
34 }
35 {
36 char s[] = "yyyyyyyyyyyyyyyyyyyy";
37 char sk[] = "abc";
38 sin /*| "abc "*/ | skip( sk ) | skip( 5 ); sout | "1" | s;
39 sin | s; sout | "2" | s;
40 sin | ignore( s ); sout | "3" | s;
41 sin | wdi( 8, s ); sout | "4" | s;
42 sin | ignore( wdi( 8, s ) ); sout | "5" | s;
43
44 sin | incl( "abc", s ); sout | "6" | s;
45 sin | excl( "abc", s ); sout | "7" | s;
46 sin | ignore( incl( "abc", s ) ); sout | "8" | s;
47 sin | ignore( excl( "abc", s ) ); sout | "9" | s;
48 sin | wdi( 8, incl( "abc", s ) ); sout | "10" | s;
49 sin | wdi( 8, excl( "abc", s ) ); sout | "11" | s;
50 sin | ignore( wdi( 8, incl( "abc", s ) ) ); sout | "12" | s;
51 sin | ignore( wdi( 8, excl( "abc", s ) ) ); sout | "13" | s;
52 }
53 {
54 char c;
55 sin | c; sout | c;
56 sin | ignore( c ); sout | c;
57
58 signed char sc;
59 sin | sc; sout | sc;
60 sin | wdi( 3, sc ); sout | sc;
61 sin | ignore( sc ); sout | sc;
62 sin | ignore( wdi( 3, sc ) ); sout | sc;
63
64 unsigned char usc;
65 sin | usc; sout | usc;
66 sin | wdi( 3, usc ); sout | usc;
67 sin | ignore( usc ); sout | usc;
68 sin | ignore( wdi( 3, usc ) ); sout | usc;
69
70 signed short int ssi;
71 sin | ssi; sout | ssi;
72 sin | wdi( 3, ssi ); sout | ssi;
73 sin | ignore( ssi ); sout | ssi;
74 sin | ignore( wdi( 3, ssi ) ); sout | ssi;
75
76 unsigned short int usi;
77 sin | usi; sout | usi;
78 sin | wdi( 3, usi ); sout | usi;
79 sin | ignore( usi ); sout | usi;
80 sin | ignore( wdi( 3, usi ) ); sout | usi;
81
82 signed int si;
83 sin | si; sout | si;
84 sin | wdi( 3, si ); sout | si;
85 sin | ignore( si ); sout | si;
86 sin | ignore( wdi( 3, si ) ); sout | si;
87
88 unsigned int ui;
89 sin | ui; sout | ui;
90 sin | wdi( 3, ui ); sout | ui;
91 sin | ignore( ui ); sout | ui;
92 sin | ignore( wdi( 3, ui ) ); sout | ui;
93
94 signed long int sli;
95 sin | sli; sout | sli;
96 sin | wdi( 3, sli ); sout | sli;
97 sin | ignore( sli ); sout | sli;
98 sin | ignore( wdi( 3, sli ) ); sout | sli;
99
100 unsigned long int uli;
101 sin | uli; sout | uli;
102 sin | wdi( 3, uli ); sout | uli;
103 sin | ignore( uli ); sout | uli;
104 sin | ignore( wdi( 3, uli ) ); sout | uli;
105
106 signed long long int slli;
107 sin | slli; sout | slli;
108 sin | wdi( 3, slli ); sout | slli;
109 sin | ignore( slli ); sout | slli;
110 sin | ignore( wdi( 3, slli ) ); sout | slli;
111
112 unsigned long long int ulli;
113 sin | ulli; sout | ulli;
114 sin | wdi( 3, ulli ); sout | ulli;
115 sin | ignore( ulli ); sout | ulli;
116 sin | ignore( wdi( 3, ulli ) ); sout | ulli;
117
118 float f;
119 sin | f; sout | f;
120 sin | wdi( 8, f ); sout | f;
121 sin | ignore( f ); sout | f;
122 sin | ignore( wdi( 8, f ) ); sout | f;
123
124 double d;
125 sin | d; sout | d;
126 sin | wdi( 8, d ); sout | d;
127 sin | ignore( d ); sout | d;
128 sin | ignore( wdi( 8, d ) ); sout | d;
129
130 long double ld;
131 sin | ld; sout | ld;
132 sin | wdi( 8, ld ); sout | ld;
133 sin | ignore( ld ); sout | ld;
134 sin | ignore( wdi( 8, ld ) ); sout | ld;
135
136 float _Complex fc;
137 sin | fc; sout | fc;
138 sin | wdi( 8, fc ); sout | fc;
139 sin | ignore( fc ); sout | fc;
140 sin | ignore( wdi( 8, fc ) ); sout | fc;
141
142 double _Complex dc;
143 sin | dc; sout | dc;
144 sin | wdi( 8, dc ); sout | dc;
145 sin | ignore( dc ); sout | dc;
146 sin | ignore( wdi( 8, dc ) ); sout | dc;
147
148 long double _Complex ldc;
149 sin | ldc; sout | ldc;
150 sin | wdi( 8, ldc ); sout | ldc;
151 sin | ignore( ldc ); sout | ldc;
152 sin | ignore( wdi( 8, ldc ) ); sout | ldc;
153 }
154#if defined( __SIZEOF_INT128__ )
155 {
156 int128 val;
157 for ( 15 ) {
158 sin | val;
159 sout | val;
160 }
161 }
162#endif // __SIZEOF_INT128__
163} // main
164
165// Local Variables: //
166// tab-width: 4 //
167// compile-command: "cfa -Wall -Wextra manipulatorsInput.cfa" //
168// End: //
Note: See TracBrowser for help on using the repository browser.