self-referential recursion in "unknown" for command "::namespace"
    while executing
"::namespace current"
    ("uplevel" body line 1)
    invoked from within
"uplevel 1 {::namespace current}"
    (autoloading "::namespace")
    (procedure "::unknown" line 22)
    invoked from within
"::namespace current"
    ("uplevel" body line 1)
    invoked from within
"uplevel 1 {::namespace current}"
    (autoloading "namespace")
    (procedure "::unknown" line 22)
    invoked from within
"namespace eval ::request $script"
    ("::try" body line 12)
OUTPUT BUFFER:
# no-op.tcl --
#
#	The [no-op] command of the package "control".
#	It accepts any number of arguments and does nothing.
#	It returns an empty string.
#
# RCS: @(#) $Id: no-op.tcl,v 1.2 2004/01/15 06:36:12 andreas_kupries Exp $

namespace eval ::control {

    proc no-op args {}

}