source: src/tests/Scope.c @ 738cf8f

ADTaaron-thesisarm-ehast-experimentalcleanup-dtorsctordeferred_resndemanglerenumforall-pointer-decaygc_noraiijacob/cs343-translationjenkins-sandboxmemorynew-astnew-ast-unique-exprnew-envno_listpersistent-indexerpthread-emulationqualifiedEnumresolv-newwith_gc
Last change on this file since 738cf8f was e5b96bf, checked in by Thierry Delisle <tdelisle@…>, 8 years ago

fixed a several errors in tests

  • Property mode set to 100644
File size: 698 bytes
RevLine 
[51b7345]1int x;
2typedef double y;
3typedef float t;
4y z;
[55ba7339]5otype u = struct { int a; double b; };
[51b7345]6int f( int y );
7y q;
8
[0b2961f]9y w( y y, u v ) {
[55ba7339]10        otype x | { x t(u); };
[a65d92e]11        u u = y;
12        x z = t(u);
[51b7345]13}
14
15y p;
16
[e5b96bf]17trait has_u( otype z ) {
[a65d92e]18        z u(z);
[51b7345]19};
20
[55ba7339]21forall( otype t | has_u( t ) )
[0b2961f]22y q( t the_t ) {
[a65d92e]23        t y = u( the_t );
[51b7345]24}
25
26t f( y p ) {
[a65d92e]27        int y;
28        typedef char x;
29        {
30                x y;
31                typedef x z;
32                {
33                        z x;
34                        typedef z y;
35                        y z = x;
36                }
37                z x = y;
38        }
39        x q = y;
[51b7345]40}
41
42t g( void ) {
[a65d92e]43        typedef char x;
44        try {
45                some_func();
46        } catch ( x x ) {
47                t y = x;
48        }
49        x z;
[51b7345]50}
51
[0b2961f]52y q( i )                                                                                                /* K&R style */
53        int i;
[51b7345]54{
[a65d92e]55        switch ( i ) {
56                y q = i;
57          case 0:
58                return q;
59          default:
60                return i;
61        }
[51b7345]62}
63
[a65d92e]64// Local Variables: //
65// tab-width: 4 //
66// End: //
Note: See TracBrowser for help on using the repository browser.