head 1.1; access; symbols; locks; strict; comment @# @; 1.1 date 2006.06.01.01.12.05; author nachumk; state Exp; branches; next ; commitid 5b5f447e3e8f4567; desc @@ 1.1 log @1st version. View readme.txt to see available features and current limitations. @ text @--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; @