Function OPS_GetDoubleInput

SRC/runtime/parsing/InterpreterAPI.cpp:111–123

}

extern "C" int
OPS_GetDoubleInput(int *numData, double *data)
{
  int size = *numData;
  for (int i = 0; i < size; ++i) {
    if ((currentArg >= maxArg) ||
        (Tcl_GetDouble(theInterp, currentArgv[currentArg], &data[i]) != TCL_OK)) {
      return -1;
    } else
      currentArg++;
  }
  return 0;
}

extern "C" const char *
OPS_GetString(void)