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
- from Rev 19 to Rev 20
- ↔ Reverse comparison
Rev 19 → Rev 20
/trunk/ttb_gen/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} |