如何在VHDL中将记录写入内存并将其取回？

type MyRecord is record
    field1 : std_logic_vector(7 downto 0);
    field2 : std_logic_vector(15 downto 0);
    -- 添加更多字段
end record;

type MemoryArray is array (natural range <>) of MyRecord;
signal myMemory : MemoryArray(0 to 9); -- 假设我们有10个记录

procedure WriteMemory(signal mem : inout MemoryArray; 
                      index : natural; 
                      data : in MyRecord) is
begin
    mem(index) <= data;
end procedure WriteMemory;

procedure ReadMemory(signal mem : in MemoryArray; 
                     index : natural; 
                     data : out MyRecord) is
begin
    data <= mem(index);
end procedure ReadMemory;

process
    variable myRecord : MyRecord;
    variable readRecord : MyRecord;
begin
    -- 初始化记录
    myRecord.field1 := x"1A";
    myRecord.field2 := x"1234";

    -- 写入内存
    WriteMemory(myMemory, 0, myRecord);

    -- 从内存读取
    ReadMemory(myMemory, 0, readRecord);

    -- 使用读取的记录
    -- ...

    wait; -- 防止进程无限循环
end process;