# | Line 358 | Line 358 | libfunc( /* execute library function */ | |
---|---|---|
358 | errno = ERANGE; | |
359 | } | |
360 | #endif | |
361 | < | if (errno == EDOM || errno == ERANGE) { |
361 | > | if ((errno == EDOM) | (errno == ERANGE)) { |
362 | wputs(fname); | |
363 | if (errno == EDOM) | |
364 | wputs(": domain error\n"); | |
# | Line 396 | Line 396 | l_select(char *nm) /* return argument #(A1+1) */ | |
396 | double a1 = argument(1); | |
397 | int n = (int)(a1 + .5); | |
398 | ||
399 | < | if (a1 < -.5 || n >= narg) { |
399 | > | if ((a1 < -.5) | (n >= narg)) { |
400 | errno = EDOM; | |
401 | return(0.0); | |
402 | } |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |