mirror of
https://sourceware.org/git/binutils-gdb.git
synced 2024-12-15 04:31:49 +08:00
d59558827e
* extstruct.ch, extstruct-grt.ch, extstruct.exp: New test case.
17 lines
234 B
Plaintext
17 lines
234 B
Plaintext
pottendo: MODULE
|
|
|
|
<> USE_SEIZE_FILE "extstruct-grt.grt" <>
|
|
SEIZE m_array3;
|
|
SEIZE m_array4;
|
|
|
|
SYNMODE m_x = STRUCT (i long,
|
|
ar m_array3);
|
|
SYNMODE m_y = STRUCT (i long,
|
|
ar m_array4);
|
|
|
|
DCL x LONG;
|
|
|
|
x := 10;
|
|
|
|
END pottendo;
|