-- internal declarations, part 1

type __ghdl_size_type is unsigned (32);

type __ghdl_index_type is unsigned (32);

public constant size1 : __ghdl_size_type;

constant size1 := __ghdl_size_type'sizeof (__ghdl_index_type);