URL https://opencores.org/ocsvn/an-fpga-implementation-of-low-latency-noc-based-mpsoc/an-fpga-implementation-of-low-latency-noc-based-mpsoc/trunk

Subversion Repositories an-fpga-implementation-of-low-latency-noc-based-mpsoc

[/] [an-fpga-implementation-of-low-latency-noc-based-mpsoc/] [trunk/] [mpsoc/] [perl_gui/] [lib/] [perl/] [ip_gen.pm] - Diff between revs 16 and 17

Rev 16	Rev 17
Line 488...	Line 488...
`}`	`}`
`return $hdr;`	`return $hdr;`

`}`	`}`

`sub ipgen_get_hdl_files_list{`
`my $self=shift;`

	`sub ipgen_get_files_list{`
	`my ($self,$list_name)=@_;`
`my @l;`	`my @l;`
`if ( defined $self->{hdl_files} ){`	`if ( defined $self->{$list_name} ){`
`@l=@{$self->{hdl_files}};`	`@l=@{$self->{$list_name}};`
`}`	`}`

`return @l;`	`return @l;`
`}`	`}`


`sub ipgen_set_hdl_files_list{`	`sub ipgen_set_files_list{`
`my ($self,$ref)=@_;`	`my ($self,$list_name,$ref)=@_;`
`$self->{hdl_files}= $ref;`	`$self->{$list_name}= $ref;`
	`}`


	`sub ipgen_add_unused_intfc_port{`
	`my ($self,$intfc_name,$port)=@_;`
	`push(@{$self->{unused}{$intfc_name}},$port);`
`}`	`}`

	`sub ipgen_get_unused_intfc_ports{`
	`my $self=shift;`
	`return $self->{unused};`

	`}`

	`sub ipgen_remove_unused_intfc_port{`
	`my $self=shift;`
	`$self->{unused}=undef;`
	`}`

`######################################`	`######################################`