d5955882 WM |
1 | pottendo: MODULE |
2 | |
3 | <> USE_SEIZE_FILE "extstruct-grt.grt" <> |
4 | SEIZE m_array3; |
5 | SEIZE m_array4; |
6 | |
7 | SYNMODE m_x = STRUCT (i long, |
8 | ar m_array3); |
9 | SYNMODE m_y = STRUCT (i long, |
10 | ar m_array4); |
11 | |
12 | DCL x LONG; |
13 | |
14 | x := 10; |
15 | |
16 | END pottendo; |