OpenCores
URL https://opencores.org/ocsvn/vhld_tb/vhld_tb/trunk

Subversion Repositories vhld_tb

Compare Revisions

  • This comparison shows the changes necessary to convert path 
    /vhld_tb/trunk/ttb_gen
    from Rev 19 to Rev 20
    ↔ Reverse comparison
  •

Rev 19 → Rev 20

/ttb_gen_plus_2B.tcl
1,37 → 1,43
#! /usr/bin/env wish
##-------------------------------------------------------------------------------
##-- Copyright 2011 Ken Campbell
##-- Copyright 2014 Ken Campbell
##-- All Rights Reserved
##----------------------------------------------------------------------------
## This file is an application that will generate some starting structure files.
## Output from this program is not covered by this license, you may apply your
## own copyright and license notices to generated files as you see fit.
##
## This program is free software; you can redistribute it and/or modify
## it under the terms of the GNU General Public License as published by
## the Free Software Foundation; either version 2 of the License, or
## (at your option) any later version.
## Redistribution and use in source and binary forms, with or without
## modification, are permitted provided that the following conditions are met:
##
## This program is distributed in the hope that it will be useful,
## but WITHOUT ANY WARRANTY; without even the implied warranty of
## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
## GNU General Public License for more details.
## 1. Redistributions of source code must retain the above copyright notice,
## this list of conditions and the following disclaimer.
##
## You should have received a copy of the GNU General Public License
## along with this program; if not, write to the Free Software
## Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
## 2. Redistributions in binary form must reproduce the above copyright notice,
## this list of conditions and the following disclaimer in the documentation
## and/or other materials provided with the distribution.
##
## THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
## AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
## IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
## ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
## LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
## CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
## SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
## INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
## CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
## ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
## POSSIBILITY OF SUCH DAMAGE.
##-------------------------------------------------------------------------------
##-- $Author: $
##--
##-- $Date: $
##--
##-- $Id: $
##--
##-- $Source: $
##--
##-- Description :
##-- This application takes a text file containing the definition of a VHDL
## entity, parses that entity and generates the VHDL Test Bench starting
## file set. It is a rewrite of the previous ttb_gen_gui to include
## view of the file.
## This version has been updated to handle any entity definition
## as well as generating generics found on the target entity.
##-- This application takes a text file containing the definition of a VHDL
## entity, parses that entity and generates the VHDL Test Bench starting
## file set. It is a rewrite of the previous ttb_gen_gui to include
## view of the file.
## This version has been updated to handle any entity definition
## as well as generating generics found on the target entity.
##--
##------------------------------------------------------------------------------
 
39,9 → 45,9
package require Iwidgets 4.0
 
## set the current version info
set version "Beta 2.10"
set version "V 3.0"
## put up a title on the main window boarder
wm title . "TTB Gen Plus $version"
wm title . "TTB Gen $version"
 
## the location of the template by default
set template "../vhdl/template_tb_bhv.vhd"
116,6 → 122,8
pack $list_win -fill both -expand yes
pack $view_win -fill both -expand yes
 
set aboutb [button .abb1 -text "About" -command show_about]
pack $aboutb -anchor s
## some tags for the view window
##$view_win tag configure highlite -background #a0b7ce
$view_win tag configure highlite -background grey80
1052,6 → 1060,30
}
}
## end ttb_gen
 
## show copy right and liability statement.
proc show_about {} {
global version
dbg_msg "ttb_gen Aplication version $version\n
Copyright 2014 Ken Campbell\n
All Rights Reserved\n
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS\n
AND CONTRIBUTORS \"AS IS\" AND ANY EXPRESS OR IMPLIED\n
WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED\n
WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A\n
PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL\n
THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY\n
DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR\n
CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,\n
PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF\n
USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)\n
HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER\n
IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING\n
NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE\n
USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE\n
POSSIBILITY OF SUCH DAMAGE."
}
 
## enable pop up console for debug
bind . <F12> {catch {console show}}
##catch {console show}

powered by: WebSVN 2.1.0

© copyright 1999-2025 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.