1 2-- Copyright (C) 2002 Morgan Kaufmann Publishers, Inc 3 4-- This file is part of VESTs (Vhdl tESTs). 5 6-- VESTs is free software; you can redistribute it and/or modify it 7-- under the terms of the GNU General Public License as published by the 8-- Free Software Foundation; either version 2 of the License, or (at 9-- your option) any later version. 10 11-- VESTs is distributed in the hope that it will be useful, but WITHOUT 12-- ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 13-- FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 14-- for more details. 15 16-- You should have received a copy of the GNU General Public License 17-- along with VESTs; if not, write to the Free Software Foundation, 18-- Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA 19 20entity inline_07 is 21 22end entity inline_07; 23 24 25---------------------------------------------------------------- 26 27 28architecture test of inline_07 is 29 30 component multiplier is 31 end component multiplier; 32 33 type length is range 0 to integer'high 34 units nm; 35 um = 1000 nm; 36 mm = 1000 um; 37 mil = 25400 nm; 38 end units length; 39 40 type coordinate is record 41 x, y : length; 42 end record coordinate; 43 44 type orientation_type is (up, down, left, right); 45 46 attribute cell_allocation : string; 47 attribute cell_position : coordinate; 48 attribute cell_orientation : orientation_type; 49 50 -- code from book: 51 52 attribute cell_allocation of mult : label is "wallace_tree_multiplier"; 53 attribute cell_position of mult : label is ( 1200 um, 4500 um ); 54 attribute cell_orientation of mult : label is down; 55 56 -- end of code from book 57 58begin 59 60 mult : component multiplier; 61 62end architecture test; 63