# 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: s.no-op.tcl 1.1 01/08/21 22:54:15-00:00 dgp $

namespace eval ::control {

    proc no-op args {}

}

