gnuplot.tcl

::pwtk::gp::checkCmdlineOpts_

::pwtk::gp::checkCmdlineOpts_

SYNOPSIS

proc ::pwtk::gp::checkCmdlineOpts_ {optVar} {

DESCRIPTION

Check the value of the command-line specified "short" options for Gnuplot (used by ::pwtk::gp::plot::cmdlineOpts).

SOURCE

    upvar $optVar opt

    ::pwtk::ifnotempty opt(clw) { uplevel 1 [list ::pwtk::checkOType_ -clw $opt(clw) {number nonnegreal} "non-negative number"] }
    ::pwtk::ifnotempty opt(i)   { uplevel 1 [list ::pwtk::checkOType_ -i   $opt(i)   {numberlist integer} "list of integer numbers"] }

    ::pwtk::ifnotempty opt(xr) { uplevel 1 [list ::pwtk::checkOType_ -xr $opt(xr) gp_range "xmin:xmax range"] }
    ::pwtk::ifnotempty opt(yr) { uplevel 1 [list ::pwtk::checkOType_ -yr $opt(yr) gp_range "ymin:ymax range"] }
    ::pwtk::ifnotempty opt(zr) { uplevel 1 [list ::pwtk::checkOType_ -zr $opt(zr) gp_range "zmin:xmax range"] }
    ::pwtk::ifnotempty opt(cbr) { uplevel 1 [list ::pwtk::checkOType_ -cbr $opt(cbr) gp_range "cbmin:cbmax range"] }
    ::pwtk::ifnotempty opt(x2r) { uplevel 1 [list ::pwtk::checkOType_ -x2r $opt(x2r) gp_range "x2min:x2max range"] }
    ::pwtk::ifnotempty opt(y2r) { uplevel 1 [list ::pwtk::checkOType_ -y2r $opt(y2r) gp_range "y2min:y2max range"] }
    ::pwtk::ifnotempty opt(s)   { uplevel 1 [list ::pwtk::checkOType_ -s   $opt(s)   gp_size  "sx,sy size"] }
}

TABLE OF CONTENTS

::pwtk::gp::checkCmdlineOpts_