acs_sc::impl::alias::parse_spec (private)

 acs_sc::impl::alias::parse_spec -contract_name contract_name \
    -impl_name impl_name -operation operation -spec spec

Defined in packages/acs-service-contract/tcl/implementation-procs.tcl

Parse the spec for a single alias. The spec can either be just the name of a Tcl procedure, or it can be an array list containing the two keys 'alias' and 'language'.

Switches:
-contract_name (required)
-impl_name (required)
-operation (required)
-spec (required)

Partial Call Graph (max 5 caller/called nodes):
%3 acs_sc::impl::alias::parse_aliases_spec acs_sc::impl::alias::parse_aliases_spec (private) acs_sc::impl::alias::parse_spec acs_sc::impl::alias::parse_spec acs_sc::impl::alias::parse_aliases_spec->acs_sc::impl::alias::parse_spec acs_sc::impl::alias::new acs_sc::impl::alias::new (public) acs_sc::impl::alias::parse_spec->acs_sc::impl::alias::new

Testcases:
No testcase defined.
Source code:
    if { [llength $spec] == 1 } {

        # Single-element spec, which means it's the name of a Tcl procedure
        new  -contract_name $contract_name  -impl_name $impl_name  -operation $operation  -alias $spec
    } else {
        # It's a full spec, expect 'alias' and 'language'
        array set alias $spec

        new  -contract_name $contract_name  -impl_name $impl_name  -operation $operation  -alias $alias(alias)  -language $alias(language)

    }
Generic XQL file:
packages/acs-service-contract/tcl/implementation-procs.xql

PostgreSQL XQL file:
packages/acs-service-contract/tcl/implementation-procs-postgresql.xql

Oracle XQL file:
packages/acs-service-contract/tcl/implementation-procs-oracle.xql

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