Revision 218
Added by markw almost 11 years ago
chameleon/makeqsf | ||
---|---|---|
|
||
open (QSF_OUT,">$qsf_out") or die "Failed to open $qsf_out";
|
||
print QSF_OUT @qsf_base;
|
||
print QSF_OUT "\n";
|
||
|
||
foreach (@ARGV)
|
||
{
|
de1/makeqsf | ||
---|---|---|
|
||
open (QSF_OUT,">$qsf_out") or die "Failed to open $qsf_out";
|
||
print QSF_OUT @qsf_base;
|
||
print QSF_OUT "\n";
|
||
|
||
foreach (@ARGV)
|
||
{
|
||
my @vhdl = glob ("$_/*.vhd");
|
||
push @vhdl, glob ("$_/*.vhdl");
|
||
my @verilog = glob ("$_/*.v");
|
||
my @qip = glob ("$_/*.qip");
|
||
|
||
foreach (@verilog)
|
||
{
|
||
... | ... | |
{
|
||
print QSF_OUT "set_global_assignment -name VHDL_FILE $_\n";
|
||
}
|
||
|
||
foreach (@qip)
|
||
{
|
||
print QSF_OUT "set_global_assignment -name QIP_FILE $_\n";
|
||
}
|
||
}
|
||
|
||
close (QSF_OUT);
|
de1_5200/makeqsf | ||
---|---|---|
|
||
open (QSF_OUT,">$qsf_out") or die "Failed to open $qsf_out";
|
||
print QSF_OUT @qsf_base;
|
||
print QSF_OUT "\n";
|
||
|
||
foreach (@ARGV)
|
||
{
|
||
my @vhdl = glob ("$_/*.vhd");
|
||
push @vhdl, glob ("$_/*.vhdl");
|
||
my @verilog = glob ("$_/*.v");
|
||
my @qip = glob ("$_/*.qip");
|
||
|
||
foreach (@verilog)
|
||
{
|
||
... | ... | |
{
|
||
print QSF_OUT "set_global_assignment -name VHDL_FILE $_\n";
|
||
}
|
||
|
||
foreach (@qip)
|
||
{
|
||
print QSF_OUT "set_global_assignment -name QIP_FILE $_\n";
|
||
}
|
||
}
|
||
|
||
close (QSF_OUT);
|
mcc216/makeqsf | ||
---|---|---|
|
||
open (QSF_OUT,">$qsf_out") or die "Failed to open $qsf_out";
|
||
print QSF_OUT @qsf_base;
|
||
print QSF_OUT "\n";
|
||
|
||
foreach (@ARGV)
|
||
{
|
mcctv/makeqsf | ||
---|---|---|
|
||
open (QSF_OUT,">$qsf_out") or die "Failed to open $qsf_out";
|
||
print QSF_OUT @qsf_base;
|
||
print QSF_OUT "\n";
|
||
|
||
foreach (@ARGV)
|
||
{
|
mist/makeqsf | ||
---|---|---|
|
||
open (QSF_OUT,">$qsf_out") or die "Failed to open $qsf_out";
|
||
print QSF_OUT @qsf_base;
|
||
print QSF_OUT "\n";
|
||
|
||
foreach (@ARGV)
|
||
{
|
mist_5200/makeqsf | ||
---|---|---|
|
||
open (QSF_OUT,">$qsf_out") or die "Failed to open $qsf_out";
|
||
print QSF_OUT @qsf_base;
|
||
print QSF_OUT "\n";
|
||
|
||
foreach (@ARGV)
|
||
{
|
Also available in: Unified diff
Add a newline, in case there is not a newline at the end of the file