#endif
/* This may actually crash... we do it last */
- if (interp && interp->cookie_stderr){
+ if (interp && interp->cookie_stderr) {
Jim_fprintf(interp, interp->cookie_stderr, JIM_NL "JIM INTERPRETER PANIC: ");
Jim_vfprintf(interp, interp->cookie_stderr, fmt, ap);
Jim_fprintf(interp, interp->cookie_stderr, JIM_NL JIM_NL);
buf = jim_vasprintf(fmt, ap);
va_end(ap);
- if (buf){
+ if (buf) {
Jim_AppendString(interp, objPtr, buf, -1);
jim_vasprintf_done(buf);
}
haveprec = 0;
prec = -1; /* not found yet */
next_fmt:
- if (fmtLen <= 0){
+ if (fmtLen <= 0) {
break;
}
- switch (*fmt){
+ switch (*fmt) {
/* terminals */
case 'b': /* binary - not all printfs() do this */
case 's': /* string */
case '8':
case '9':
accum = 0;
- while (isdigit(*fmt) && (fmtLen > 0)){
+ while (isdigit(*fmt) && (fmtLen > 0)) {
accum = (accum * 10) + (*fmt - '0');
fmt++; fmtLen--;
}
- if (inprec){
+ if (inprec) {
haveprec = 1;
prec = accum;
} else {
/* suck up the next item as an integer */
fmt++; fmtLen--;
objc--;
- if (objc <= 0){
+ if (objc <= 0) {
goto not_enough_args;
}
- if (Jim_GetWide(interp,objv[0],&wideValue)== JIM_ERR){
+ if (Jim_GetWide(interp,objv[0],&wideValue)== JIM_ERR) {
Jim_FreeNewObj(interp, resObjPtr);
return NULL;
}
- if (inprec){
+ if (inprec) {
haveprec = 1;
prec = wideValue;
- if (prec < 0){
+ if (prec < 0) {
/* man 3 printf says */
/* if prec is negative, it is zero */
prec = 0;
}
} else {
width = wideValue;
- if (width < 0){
+ if (width < 0) {
ljust = 1;
width = -width;
}
*/
cp = fmt_str;
*cp++ = '%';
- if (altfm){
+ if (altfm) {
*cp++ = '#';
}
- if (forceplus){
+ if (forceplus) {
*cp++ = '+';
- } else if (spad){
+ } else if (spad) {
/* PLUS overrides */
*cp++ = ' ';
}
- if (ljust){
+ if (ljust) {
*cp++ = '-';
}
- if (zpad){
+ if (zpad) {
*cp++ = '0';
}
- if (width > 0){
+ if (width > 0) {
sprintf(cp, "%d", width);
/* skip ahead */
cp = strchr(cp,0);
}
/* did we find a period? */
- if (inprec){
+ if (inprec) {
/* then add it */
*cp++ = '.';
/* did something occur after the period? */
- if (haveprec){
+ if (haveprec) {
sprintf(cp, "%d", prec);
}
cp = strchr(cp,0);
case 'E':
*cp++ = *fmt;
*cp = 0;
- if (Jim_GetDouble(interp, objv[0], &doubleValue) == JIM_ERR){
+ if (Jim_GetDouble(interp, objv[0], &doubleValue) == JIM_ERR) {
Jim_FreeNewObj(interp, resObjPtr);
return NULL;
}
case 'x':
case 'X':
/* jim widevaluse are 64bit */
- if (sizeof(jim_wide) == sizeof(long long)){
+ if (sizeof(jim_wide) == sizeof(long long)) {
*cp++ = 'l';
*cp++ = 'l';
} else {
int e;
e = Jim_Nvp_name2value_obj(interp, nvp_table, objPtr, &n);
- if (e == JIM_ERR){
+ if (e == JIM_ERR) {
return e;
}
/* Success? found? */
- if (n->name){
+ if (n->name) {
/* remove const */
*result = (Jim_Nvp *)n;
return JIM_OK;
Jim_IncrRefCount(scriptObjPtr);
- if (filename){
+ if (filename) {
JimSetSourceInfo(interp, scriptObjPtr, filename, lineno);
}
int Jim_vfprintf(Jim_Interp *interp, void *cookie, const char *fmt, va_list ap)
{
- if ((interp == NULL) || (interp->cb_vfprintf == NULL)){
+ if ((interp == NULL) || (interp->cb_vfprintf == NULL)) {
errno = ENOTSUP;
return -1;
}
size_t Jim_fwrite(Jim_Interp *interp, const void *ptr, size_t size, size_t n, void *cookie)
{
- if ((interp == NULL) || (interp->cb_fwrite == NULL)){
+ if ((interp == NULL) || (interp->cb_fwrite == NULL)) {
errno = ENOTSUP;
return 0;
}
size_t Jim_fread(Jim_Interp *interp, void *ptr, size_t size, size_t n, void *cookie)
{
- if ((interp == NULL) || (interp->cb_fread == NULL)){
+ if ((interp == NULL) || (interp->cb_fread == NULL)) {
errno = ENOTSUP;
return 0;
}
int Jim_fflush(Jim_Interp *interp, void *cookie)
{
- if ((interp == NULL) || (interp->cb_fflush == NULL)){
+ if ((interp == NULL) || (interp->cb_fflush == NULL)) {
/* pretend all is well */
return 0;
}
char* Jim_fgets(Jim_Interp *interp, char *s, int size, void *cookie)
{
- if ((interp == NULL) || (interp->cb_fgets == NULL)){
+ if ((interp == NULL) || (interp->cb_fgets == NULL)) {
errno = ENOTSUP;
return NULL;
}
Jim_Nvp *
Jim_Nvp_name2value_simple(const Jim_Nvp *p, const char *name)
{
- while (p->name){
- if (0 == strcmp(name, p->name)){
+ while (p->name) {
+ if (0 == strcmp(name, p->name)) {
break;
}
p++;
Jim_Nvp *
Jim_Nvp_name2value_nocase_simple(const Jim_Nvp *p, const char *name)
{
- while (p->name){
- if (0 == strcasecmp(name, p->name)){
+ while (p->name) {
+ if (0 == strcasecmp(name, p->name)) {
break;
}
p++;
p = Jim_Nvp_name2value_simple(_p, name);
/* result */
- if (result){
+ if (result) {
*result = (Jim_Nvp *)(p);
}
/* found? */
- if (p->name){
+ if (p->name) {
return JIM_OK;
} else {
return JIM_ERR;
p = Jim_Nvp_name2value_nocase_simple(_p, name);
- if (puthere){
+ if (puthere) {
*puthere = (Jim_Nvp *)(p);
}
/* found */
- if (p->name){
+ if (p->name) {
return JIM_OK;
} else {
return JIM_ERR;
jim_wide w;
e = Jim_GetWide(interp, o, &w);
- if (e != JIM_OK){
+ if (e != JIM_OK) {
return e;
}
Jim_Nvp *
Jim_Nvp_value2name_simple(const Jim_Nvp *p, int value)
{
- while (p->name){
- if (value == p->value){
+ while (p->name) {
+ if (value == p->value) {
break;
}
p++;
p = Jim_Nvp_value2name_simple(_p, value);
- if (result){
+ if (result) {
*result = (Jim_Nvp *)(p);
}
- if (p->name){
+ if (p->name) {
return JIM_OK;
} else {
return JIM_ERR;
int x;
Jim_fprintf(p->interp, p->interp->cookie_stderr, "---args---\n");
- for (x = 0 ; x < p->argc ; x++){
+ for (x = 0 ; x < p->argc ; x++) {
Jim_fprintf(p->interp, p->interp->cookie_stderr,
"%2d) %s\n",
x,
Jim_Obj *o;
o = NULL; // failure
- if (goi->argc){
+ if (goi->argc) {
// success
o = goi->argv[0];
goi->argc -= 1;
goi->argv += 1;
}
- if (puthere){
+ if (puthere) {
*puthere = o;
}
- if (o != NULL){
+ if (o != NULL) {
return JIM_OK;
} else {
return JIM_ERR;
r = Jim_GetOpt_Obj(goi, &o);
- if (r == JIM_OK){
+ if (r == JIM_OK) {
cp = Jim_GetString(o, len);
- if (puthere){
+ if (puthere) {
/* remove const */
*puthere = (char *)(cp);
}
Jim_Obj *o;
double _safe;
- if (puthere == NULL){
+ if (puthere == NULL) {
puthere = &_safe;
}
r = Jim_GetOpt_Obj(goi, &o);
- if (r == JIM_OK){
+ if (r == JIM_OK) {
r = Jim_GetDouble(goi->interp, o, puthere);
- if (r != JIM_OK){
+ if (r != JIM_OK) {
Jim_SetResult_sprintf(goi->interp,
"not a number: %s",
Jim_GetString(o, NULL));
Jim_Obj *o;
jim_wide _safe;
- if (puthere == NULL){
+ if (puthere == NULL) {
puthere = &_safe;
}
r = Jim_GetOpt_Obj(goi, &o);
- if (r == JIM_OK){
+ if (r == JIM_OK) {
r = Jim_GetWide(goi->interp, o, puthere);
}
return r;
Jim_Obj *o;
int e;
- if (puthere == NULL){
+ if (puthere == NULL) {
puthere = &_safe;
}
e = Jim_GetOpt_Obj(goi, &o);
- if (e == JIM_OK){
+ if (e == JIM_OK) {
e = Jim_Nvp_name2value_obj(goi->interp,
nvp,
o,
const Jim_Nvp *nvptable,
int hadprefix)
{
- if (hadprefix){
+ if (hadprefix) {
Jim_SetResult_NvpUnknown(goi->interp,
goi->argv[-2],
goi->argv[-1],
Jim_Obj *o;
int e;
- if (puthere == NULL){
+ if (puthere == NULL) {
puthere = &_safe;
}
e = Jim_GetOpt_Obj(goi, &o);
- if (e == JIM_OK){
+ if (e == JIM_OK) {
e = Jim_GetEnum(goi->interp,
o,
lookup,
va_start(ap,fmt);
buf = jim_vasprintf(fmt, ap);
va_end(ap);
- if (buf){
+ if (buf) {
Jim_SetResultString(interp, buf, -1);
jim_vasprintf_done(buf);
}
Jim_Obj *param_value,
const Jim_Nvp *nvp)
{
- if (param_name){
+ if (param_name) {
Jim_SetResult_sprintf(interp,
"%s: Unknown: %s, try one of: ",
Jim_GetString(param_name, NULL),
"Unknown param: %s, try one of: ",
Jim_GetString(param_value, NULL));
}
- while (nvp->name){
+ while (nvp->name) {
const char *a;
const char *b;
- if ((nvp + 1)->name){
+ if ((nvp + 1)->name) {
a = nvp->name;
b = ", ";
} else {
{
int x;
- if (debug_string_obj){
+ if (debug_string_obj) {
Jim_FreeObj(interp, debug_string_obj);
}
debug_string_obj = Jim_NewEmptyStringObj(interp);
- for (x = 0 ; x < argc ; x++){
+ for (x = 0 ; x < argc ; x++) {
Jim_AppendStrings(interp,
debug_string_obj,
Jim_GetString(argv[x], NULL),