TABLE OF CONTENTS


::pwtk::prerun

SYNOPSIS

proc ::pwtk::prerun {prog args} {

USAGE

   prerun PROG                ... get the prerun script for the PROG program
   prerun PROG { SCRIPT }     ... set the prerun script for the PROG program
   prerun PROG {}       --+   
   prerun PROG clear    --+-- ... clear the prerun script for the PROG program
   prerun PROG append { SCRIPT } ... append SCRIPT to the prerun script for the PROG program

PURPOSE

Get, set, append, or clear a script that is executed just before running the PROG program.

Example:

      prerun pw.x {
         puts "Time before the pw.x execution:  [clock format [clock seconds]]"
      }

ARGUMENTS

RETURN VALUE

The prerun script for the PROG program or empty string if the script does not exist.

SOURCE

    return [::pwtk::xxxrun_ prerun $prog {*}$args]
}