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/] [emulator.pl] - Diff between revs 54 and 55

Rev 54	Rev 55
Line 749...	Line 749...
`my $tt=($mode eq "emulate")? " _Generate NoC \nEmulation Model" : " _Generate NoC \nSimulation Model" ;`	`my $tt=($mode eq "emulate")? " _Generate NoC \nEmulation Model" : " _Generate NoC \nSimulation Model" ;`
`$notebook->append_page ($page2,gen_label_with_mnemonic ($tt));`	`$notebook->append_page ($page2,gen_label_with_mnemonic ($tt));`



`my $scrolled_win = add_widget_to_scrolled_win($notebook);`	`my $scrolled_win = add_widget_to_scrolled_win($notebook,gen_scr_win_with_adjst($emulate,"process_sc_win"));`
`$scrolled_win->show_all;`	`$scrolled_win->show_all;`
`my $page_num=$emulate->object_get_attribute ("process_notebook","currentpage");`	`my $page_num=$emulate->object_get_attribute ("process_notebook","currentpage");`
`$notebook->set_current_page ($page_num) if(defined $page_num);`	`$notebook->set_current_page ($page_num) if(defined $page_num);`
`$notebook->signal_connect( 'switch-page'=> sub{`	`$notebook->signal_connect( 'switch-page'=> sub{`
`$emulate->object_add_attribute ("process_notebook","currentpage",$_[2]); #save the new pagenumber`	`$emulate->object_add_attribute ("process_notebook","currentpage",$_[2]); #save the new pagenumber`