scilab/contrib/toolbox_skeleton/sci_gateway/c/sci_cerror.c

   1 /* ==================================================================== */
   2 /* Template toolbox_skeleton */
   3 /* This file is released under the 3-clause BSD license. See COPYING-BSD. */
   4 /* ==================================================================== */
   5 #include "api_scilab.h"
   6 #include "Scierror.h"
   7 #include "sci_malloc.h"
   8 #include <localization.h>
   9
  10 /* ==================================================================== */
  11 int sci_cerror(char *fname, void* pvApiCtx)
  12 {
  13     int iRhs = nbInputArgument(pvApiCtx);
  14
  15     if (iRhs != 1)
  16     {
  17         Scierror(999, _("toolbox_skeleton", "%s: I'm waiting for only one argument.\n"), fname);
  18         return 0;
  19     }
  20     else
  21     {
  22         Scierror(999, _("toolbox_skeleton", "%s: Yeah! %d is a good number of arguments but I prefer fail, sorry.\n"), fname, 1);
  23         return 0;
  24     }
  25 }
  26 /* ==================================================================== */