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;
@