xo::api proc object_from_proc_index (public)

 xo::api[i] object_from_proc_index proc_index

Defined in packages/xotcl-core/tcl/01-debug-procs.tcl

Parse the proc_index and return the scope from it.

Parameters:
proc_index (required)

Testcases:
No testcase defined.
Source code:
#
# Parse the proc_index and return the scope from it.
#
set object ""
if {[regexp { *([^ ].+) (inst)?proc (.+)$} $proc_index . object]
    || [regexp { (Class|Object) (.+)$} $proc_index . what object]
  } {
}
return $object
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: