Raymond Toy pushed to branch master at cmucl / cmucl
Commits:
-
8ac7e849
by Raymond Toy at 2017-11-04T21:31:06-07:00
-
4abbe215
by Raymond Toy at 2017-11-04T21:33:00-07:00
2 changed files:
Changes:
| ... | ... | @@ -168,7 +168,9 @@ int __kernel_rem_pio2(double *x, double *y, int e0, int nx, int prec, const int |
| 168 | 168 |
|
| 169 | 169 |
/* compute q[0],q[1],...q[jk] */
|
| 170 | 170 |
for (i=0;i<=jk;i++) {
|
| 171 |
- for(j=0,fw=0.0;j<=jx;j++) fw += x[j]*f[jx+i-j]; q[i] = fw;
|
|
| 171 |
+ for(j=0,fw=0.0;j<=jx;j++)
|
|
| 172 |
+ fw += x[j]*f[jx+i-j];
|
|
| 173 |
+ q[i] = fw;
|
|
| 172 | 174 |
}
|
| 173 | 175 |
|
| 174 | 176 |
jz = jk;
|
| ... | ... | @@ -354,7 +354,7 @@ print_struct(lispobj obj) |
| 354 | 354 |
{
|
| 355 | 355 |
struct instance *instance = (struct instance *) PTR(obj);
|
| 356 | 356 |
int i;
|
| 357 |
- char buffer[16];
|
|
| 357 |
+ char buffer[32];
|
|
| 358 | 358 |
|
| 359 | 359 |
print_obj("type: ", ((struct instance *) PTR(obj))->slots[0]);
|
| 360 | 360 |
for (i = 1; i < HeaderValue(instance->header); i++) {
|