Stats

  • Locked Locked
  • Replies 12
  • Subscribers 143
  • Views 5483
  • Members are here 0
This discussion has been locked.
You can no longer post new replies to this discussion. If you have a question you can start a new discussion

How to get back to tcl after exiting in OCEAN and/or SKILL?

Reinice

Hi All,

Good Day. 

I 'am running tcl in compiling/creating OCEAN and/or SKILL files. When I exit in OCEAN and/or SKILL I can't get back to tcl to compile the remaining tcl codes. Is there a way to get back to tcl after exiting in OCEAN and/or SKILL?

Thank you very much in advance.

Regards,

Reinice

Parents

  • Hi Andrew,

    I tried your suggestion adding "global finished" within the main proc. It did not exit in ocean. I checked the processes running with "ps" and it is still running.

    I made some workaround that worked. Here's my script:

    proc main {design_user tool_u analysis_name} {

    proc showOutput {channel} {
      global finished

      gets $channel line

      set finished [string match "*Finished*" $line]

      puts $finished
      if {$finished == 1} {
        close $channel
      } else {
        puts $line
      }
    }
      
    set finished 0

    set my_IO [open "| ocean -restore myScript.ocn"]
    fconfigure $my_IO -buffering line
    fileevent $my_IO readable [list showOutput $my_IO]

    puts $finished
    vwait finished

    puts "NOTE: simulation has now finished"

    main $design_user $tool_u $analysis_name 

    }

    In myScript.ocn there's a line at the end of the file that shows it "Finished" it's execution. This workaround exits in ocean session and returned in main procedure.

    Thanks and Regards,

    Reinice

Reply

  • Hi Andrew,

    I tried your suggestion adding "global finished" within the main proc. It did not exit in ocean. I checked the processes running with "ps" and it is still running.

    I made some workaround that worked. Here's my script:

    proc main {design_user tool_u analysis_name} {

    proc showOutput {channel} {
      global finished

      gets $channel line

      set finished [string match "*Finished*" $line]

      puts $finished
      if {$finished == 1} {
        close $channel
      } else {
        puts $line
      }
    }
      
    set finished 0

    set my_IO [open "| ocean -restore myScript.ocn"]
    fconfigure $my_IO -buffering line
    fileevent $my_IO readable [list showOutput $my_IO]

    puts $finished
    vwait finished

    puts "NOTE: simulation has now finished"

    main $design_user $tool_u $analysis_name 

    }

    In myScript.ocn there's a line at the end of the file that shows it "Finished" it's execution. This workaround exits in ocean session and returned in main procedure.

    Thanks and Regards,

    Reinice

Children
No Data

Community Guidelines

The Cadence Design Communities support Cadence users and technologists interacting to exchange ideas, news, technical information, and best practices to solve problems and get the most from Cadence technology. The community is open to everyone, and to provide the most value, we require participants to follow our Community Guidelines that facilitate a quality exchange of ideas and information. By accessing, contributing, using or downloading any materials from the site, you agree to be bound by the full Community Guidelines.