callback::get_object_type_impl (public)

 callback::get_object_type_impl -object_type object_type \
    -callback callback

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

Finds the most type specific implementation of callback.

Switches:

-object_type

(required)

-callback

(required)

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

Testcases:

No testcase defined.

Source code:

    if {[callback::impl_exists -callback $callback -impl $object_type]} {
        return $object_type
    } else {
        set supertypes [acs_object_type::supertypes  -subtype $object_type]

        foreach type $supertypes {
            if {[callback::impl_exists -callback $callback -impl $type]} {
                return $type
            }
        }
    }

    return ""

XQL Not present:

Generic, PostgreSQL, Oracle