no-op.tcl

Go to the documentation of this file.

00001 /*  no-op.tcl --*/
00002 /* */
00003 /*  The [no-op] command of the package "control".*/
00004 /*  It accepts any number of arguments and does nothing.*/
00005 /*  It returns an empty string.*/
00006 /* */
00007 /*  RCS: @(#) $Id: no-op.tcl,v 1.2 2004/01/15 06:36:12 andreas_kupries Exp $*/
00008 
00009 namespace ::control {
00010 
00011     ret  no-op args ()
00012 
00013 }
00014 
00015