[deliverable/binutils-gdb.git] / gdb / testsuite / gdb.chill / extstruct.ch

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;
Commit	Line	Data
c906108c SS	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;