set_intersection (public, deprecated)

 set_intersection u v

Defined in packages/acs-tcl/tcl/deprecated-procs.tcl

Deprecated. Invoking this procedure generates a warning.

Returns the intersection of sets $u and $v.

Parameters:
u (required)
v (required)

Testcases:
No testcase defined.
Source code:
ad_log_deprecated proc set_intersection
    set result [list]

    foreach ue $u {
        if { [set_member? $v $ue] } {
            lappend result $ue
        }
    }

    return $result
XQL Not present:
PostgreSQL, Oracle
Generic XQL file:
packages/acs-tcl/tcl/deprecated-procs.xql

[ hide source ] | [ make this the default ]
Show another procedure: