// $Source$
// $Revision$
// $Date$

$func? Var? expr = ;
$func Set-Var e.info t.var = ;
$func? Get-Var t.key e.var = e.val;

$func Vars-Copy-State = t.vars;
$func Vars-Set-State t.vars = ;

$func Init-Vars = ;

//! $func New-Vars e = ;
$func Vars-Print e = e;
$func Vars-Decl s.type e = e;

$func Vars-Reset e.vars = ;

$func Gener-Len-Var e.var = t.len-var;

$func Create-Int-Var (e.prefix) t.var e.expr = t.int-var e.int-assign;

$func Vars e.expr = e.vars;

$func Gener-Vars (e.format) e.prefix = e.Re;

$func Gener-Err-Var = t.var;

$func Gener-Subst-Vars (e.format) e.prefix = e.Re;

$func? Substitutable-Var? e.Re = ;

$func Gener-Var-Assign t.var e.generated-var = ;

$func Gener-Var-Names e.expr-with-unspecified-var-names = e.expr-with-resolved-var-names;

$func Gener-Var-Indices s.num (e.Format) e.prefix = e.Re s.max;