34 lines
866 B
Tcl
34 lines
866 B
Tcl
set HDL_TOOLTYPE SYNTHESIS
|
|
set HDL_TOOLNAME synopsys
|
|
set HDL_PUTS puts
|
|
set HDL_MSG_FORMAT "\n********** %s **********\n"
|
|
|
|
proc hdl_tool_library {lib_list} {
|
|
foreach l $lib_list {
|
|
set path [get_lib_path]/$l
|
|
sh touch $path
|
|
sh rm -r $path
|
|
sh mkdir $path
|
|
define_design_lib $l -path $path
|
|
}
|
|
}
|
|
|
|
proc hdl_tool_compile {format version incdirs library define files behavioral} {
|
|
global search_path
|
|
if {[llength $define]} {
|
|
error "-define not yet supported"
|
|
}
|
|
# Add include paths
|
|
set search_path [concat $incdirs $search_path]
|
|
# Compile files
|
|
foreach f $files {
|
|
if {[string match $format "vhdl"]} {
|
|
puts "Compiling source file $f"
|
|
}
|
|
analyze -format $format -work $library $f
|
|
puts ""
|
|
}
|
|
# Remove include paths
|
|
set search_path [lrange $search_path [llength $incdirs] end]
|
|
}
|