Advertisement
natsfr

get_nodes leak ?

Jan 9th, 2019
79
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
TCL 0.67 KB | None | 0 0
  1. create_project -force -part $::env(XRAY_PART) design design
  2. set_property design_mode PinPlanning [current_fileset]
  3. open_io_design -name io_1
  4.  
  5. set downhill_fp [open downhill_wires.txt w]
  6. set uphill_fp [open uphill_wires.txt w]
  7. set pips_fp [open pips_orig.txt w]
  8. #set_param tcl.collectionResultDisplayLimit 0
  9. set_param messaging.disableStorage 1
  10.  
  11. set pips [get_pips]
  12.  
  13. for { set i 0 } { $i < [llength $pips] } { incr i } {
  14.     set dwn_nodes [get_nodes -downhill -of_object [lindex $pips $i]]
  15.     for { set j 0 } { $j < [llength $dwn_nodes] } { incr j } {
  16.         #puts [lindex $dwn_nodes $j]
  17.     }
  18.     unset dwn_nodes
  19. }
  20.  
  21. close $pips_fp
  22. close $downhill_fp
  23. close $uphill_fp
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement