source:
src/examples/Rank2.c
@
b21c77a
| Last change on this file since b21c77a was ca26509, checked in by , 8 years ago | |
|---|---|
|
|
| File size: 342 bytes | |
| Rev | Line | |
|---|---|---|
| [a65d92e] | 1 | int ?=?( int *, int ); |
| 2 | forall(dtype DT) DT * ?=?( DT **, DT * ); | |
| [51b7345] | 3 | |
| [a65d92e] | 4 | void a() { |
| [55ba7339] | 5 | forall( otype T ) void f( T ); |
| 6 | void g( forall( otype U ) void p( U ) ); | |
| [a65d92e] | 7 | g( f ); |
| [51b7345] | 8 | } |
| 9 | ||
| [a65d92e] | 10 | void g() { |
| 11 | void h( int *null ); | |
| [55ba7339] | 12 | forall( otype T ) T id( T ); |
| [a65d92e] | 13 | forall( dtype T ) T *0; |
| 14 | int 0; | |
| 15 | h( id( id( id( 0 ) ) ) ); | |
| [51b7345] | 16 | } |
| [a65d92e] | 17 | |
| 18 | // Local Variables: // | |
| 19 | // tab-width: 4 // | |
| 20 | // End: // |
Note: See TracBrowser
for help on using the repository browser.
