f::bind2nd (public, deprecated)

 f::bind2nd f arg

Defined in packages/acs-tcl/tcl/ad-functional-procs.tcl

Deprecated. Invoking this procedure generates a warning.

binds arg to the 2nd argument of f DEPRECATED: As of tcl8.5, Tcl has native support for 'lambda' provided by means of 'apply' per TIP 194. Tcllib provides a 'lambda' package with procs that make use of it.

Parameters:
f
arg

See Also:

Partial Call Graph (max 5 caller/called nodes):
%3 ad_get_tcl_call_stack ad_get_tcl_call_stack (public) f::cons f::cons (public) f::head f::head (public) f::lambda f::lambda (public, deprecated) f::bind2nd f::bind2nd f::bind2nd->ad_get_tcl_call_stack f::bind2nd->f::cons f::bind2nd->f::head f::bind2nd->f::lambda

Testcases:
No testcase defined.
Source code:
ns_log Notice "Deprecated proc f::bind2nd used:\n[ad_get_tcl_call_stack]"

    set code "set [lindex [info args $f] 1] {$arg}\n"
    append code [info body $f]
    set proc_args [info args $f]
    set num_proc_args [llength $proc_args]
    lambda [cons [head $proc_args] [lrange $proc_args 2 $num_proc_args]] $code
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: