luke
/
ngspice
mirror of https://git.code.sf.net/p/ngspice/ngspice
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

ngsconvert.c, swallow type conversion warnings

This commit is contained in:
rlar 2011-06-25 20:04:20 +00:00
parent 828e04c9fd
commit aac6d0802f
2 changed files with 16 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ChangeLog
View File

@ -1,3 +1,10 @@
2011-06-25 Robert Larice
* src/ngsconvert.c :
ngsconvert.c, swallow type conversion warnings
this case
(tp == VF_REAL) && iscomplex(v)
was actually buggy, but couldn't ever happen
2011-06-25 Robert Larice
* src/xspice/ipc/ipc.c ,
* src/xspice/ipc/ipcsockets.c :

21
src/ngsconvert.c
View File

@ -100,7 +100,7 @@ oldread(char *name)
pl = alloc(struct plot);
tfread(buf, 1, 80, fp);
buf[80] = '\0';
for (i = strlen(buf) - 1; (i > 1) && (buf[i] == ' '); i--)
for (i = (int) strlen(buf) - 1; (i > 1) && (buf[i] == ' '); i--)
;
buf[i + 1] = '\0';
pl->pl_title = copy(buf);
@ -285,25 +285,22 @@ oldwrite(char *name, bool app, struct plot *pl)
tfwrite(&v->v_realdata[v->v_length - 1], sizeof (double), 1, fp);
}
} else if ((tp == VF_REAL) && iscomplex(v)) {
if (i < v->v_length)
f1 = realpart(&v->v_compdata[i]);
else
f1 = realpart(&v->v_compdata[v-> v_length - 1]);
tfwrite(&f1, sizeof (double), 1, fp);
fprintf(cp_err, "internal error, everything real, yet complex ...\n");
exit(1);
} else if ((tp == VF_COMPLEX) && isreal(v)) {
if (i < v->v_length)
f1 = v->v_realdata[i];
f1 = (float) v->v_realdata[i];
else
f1 = v->v_realdata[v->v_length - 1];
f1 = (float) v->v_realdata[v->v_length - 1];
tfwrite(&f1, sizeof (float), 1, fp);
tfwrite(&zero, sizeof (float), 1, fp);
} else if ((tp == VF_COMPLEX) && iscomplex(v)) {
if (i < v->v_length) {
f1 = realpart(&v->v_compdata[i]);
f2 = imagpart(&v->v_compdata[i]);
f1 = (float) realpart(&v->v_compdata[i]);
f2 = (float) imagpart(&v->v_compdata[i]);
} else {
f1 = realpart(&v->v_compdata[v-> v_length - 1]);
f2 = imagpart(&v->v_compdata[v-> v_length - 1]);
f1 = (float) realpart(&v->v_compdata[v-> v_length - 1]);
f2 = (float) imagpart(&v->v_compdata[v-> v_length - 1]);
}
tfwrite(&f1, sizeof (float), 1, fp);
tfwrite(&f2, sizeof (float), 1, fp);