main module unp
    declare
	A is packed structure
	    B : integer
	endstructure
    enddeclare
endmodule