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.pm] - Diff between revs 16 and 17

Go to most recent revision | Show entire file | Details | Blame | View Log

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


`sub ip_get_hdl_files{`	`sub ip_get_files{`
`my ($self, $category,$module)=@_;`	`my ($self, $category,$module,$list_name)=@_;`
`my @l;`	`my @l;`
`@l=@{$self->{categories}{$category}{names}{$module}{hdl}} if(defined $self->{categories}{$category}{names}{$module}{hdl});`	`@l=@{$self->{categories}{$category}{names}{$module}{$list_name}} if(defined $self->{categories}{$category}{names}{$module}{$list_name});`
`return @l;`	`return @l;`
`}`	`}`


	`sub ip_get_unsuded_intfc_ports{`
	`my ($self, $category,$module)=@_;`
	`return $self->{categories}{$category}{names}{$module}{"unused"};`

	`}`

`sub add_ip{`	`sub add_ip{`

`my ($self,$ipgen) =@_;`	`my ($self,$ipgen) =@_;`
`my $module;`	`my $module;`
`$module = $ipgen->ipgen_get_ip_name();`	`$module = $ipgen->ipgen_get_ip_name();`
Line 450...	Line 457...
`ip_add_port($self,$category,$module,$port,$type,$range,$intfc_name,$intfc_port);`	`ip_add_port($self,$category,$module,$port,$type,$range,$intfc_name,$intfc_port);`
`}`	`}`
`my $hdr= $ipgen->ipgen_get_hdr();`	`my $hdr= $ipgen->ipgen_get_hdr();`
`$self->{categories}{$category}{names}{$module}{header}=$hdr;`	`$self->{categories}{$category}{names}{$module}{header}=$hdr;`

`my @hdl_files= $ipgen->ipgen_get_hdl_files_list();`	`my @hdl_files= $ipgen->ipgen_get_files_list("hdl_files");`
`$self->{categories}{$category}{names}{$module}{hdl}=\@hdl_files;`	`$self->{categories}{$category}{names}{$module}{"hdl_files"}=\@hdl_files;`

	`my @sw_files= $ipgen->ipgen_get_files_list("sw_files");`
	`$self->{categories}{$category}{names}{$module}{"sw_files"}=\@sw_files;`
	`$self->{categories}{$category}{names}{$module}{"unused"}=$ipgen->ipgen_get_unused_intfc_ports();`



`}`	`}`

Browse

Tools

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.pm] - Diff between revs 16 and 17