Subversion Repositories vhdl_cpu_emulator

--Mango DSP Ltd. Copyright (C) 2006

--Creator: Nachum Kanovsky

library ieee;

use ieee.std_logic_1164.all;

use std.textio.all;

package design_top_constants is

  subtype filename is string(1 to 256);

  type    array2xfilename is array (1 downto 0) of filename;

  function mk_filename(inp : string) return filename;

end design_top_constants;

package body design_top_constants is

  function mk_filename(inp : string) return filename is

    variable res        : filename := (others => NUL);

    variable inp_length : integer  := 0;

  begin

    if inp'length > filename'high then

      inp_length := filename'high;

    else

      inp_length := inp'length;

    end if;

    res(1 to inp_length) := inp(1 to inp_length);

    return res;

  end;

end design_top_constants;