lang::util::escape_vars_if_not_null (private)

 lang::util::escape_vars_if_not_null list

Defined in packages/acs-lang/tcl/lang-util-procs.tcl

Processes a list of variables before they are passed into a regexp command.

Parameters:

list - List of variable names

Partial Call Graph (max 5 caller/called nodes):

Testcases:

No testcase defined.

Source code:

    foreach lm $list {
    upvar $lm foreign_var
    if { [info exists foreign_var] && $foreign_var ne "" } {
        set foreign_var "\[$foreign_var\]"
    }
    }

XQL Not present:

PostgreSQL, Oracle

Generic XQL file:

packages/acs-lang/tcl/lang-util-procs.xql