Last change
on this file since 719fdbc was
5546f50b,
checked in by Peter A. Buhr <pabuhr@…>, 8 months ago
|
more switch to tabs
|
-
Property mode set to
100644
|
File size:
601 bytes
|
Rev | Line | |
---|
[7972603] | 1 | // #include <time.h> |
---|
| 2 | //#include <stdlib.hfa> |
---|
| 3 | |
---|
| 4 | struct tm { int x; }; |
---|
| 5 | forall (T*) T* alloc(); |
---|
| 6 | |
---|
| 7 | int main () { |
---|
| 8 | // // // C, library |
---|
| 9 | // // void * malloc( size_t ); |
---|
| 10 | // // C, user |
---|
| 11 | // struct tm * el1 = (struct tm * ) malloc( sizeof(struct tm) ); |
---|
| 12 | // struct tm * ar1 = (struct tm * ) malloc( 10 * sizeof(struct tm) ); |
---|
| 13 | |
---|
| 14 | // // // CFA, library |
---|
| 15 | // // forall( T * ) T * alloc(); |
---|
| 16 | // // CFA, user |
---|
| 17 | // tm * el2 = alloc(); |
---|
| 18 | // tm (*ar2)[10] = alloc(); |
---|
| 19 | |
---|
| 20 | |
---|
| 21 | |
---|
| 22 | |
---|
| 23 | // ar1[5]; |
---|
| 24 | // (*ar2)[5]; |
---|
| 25 | |
---|
| 26 | |
---|
| 27 | |
---|
| 28 | // tm (&ar3)[10] = *alloc(); |
---|
| 29 | tm (&ar3)[10]; |
---|
| 30 | &ar3 = alloc(); |
---|
| 31 | ar3[5]; |
---|
[5546f50b] | 32 | } |
---|
Note: See
TracBrowser
for help on using the repository browser.