apm_subdirs (private)

 apm_subdirs path

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

Returns a list of subdirectories of path (including path itself)

Parameters:
path

Partial Call Graph (max 5 caller/called nodes):
%3 ad_file ad_file (public) apm_subdirs apm_subdirs apm_subdirs->ad_file

Testcases:
No testcase defined.
Source code:
    set dirs [list]
    lappend dirs $path
    foreach subdir [glob -nocomplain -type d [ad_file join $path *]] {
        lappend dirs {*}[apm_subdirs $subdir]
    }
    return $dirs
Generic XQL file:
packages/acs-tcl/tcl/apm-procs.xql

PostgreSQL XQL file:
packages/acs-tcl/tcl/apm-procs-postgresql.xql

Oracle XQL file:
packages/acs-tcl/tcl/apm-procs-oracle.xql

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