Mercurial > hg > octave-lyh

comparison src/user-prefs.cc @ 1086:75fc98220389

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1995-01-31 04:17:15 by jwe]
author jwe
date Tue, 31 Jan 1995 04:17:15 +0000
parents cb4eaa324faf
children 51fd9e40a7f7
comparison
equal deleted inserted replaced
1085:9f51d8b235ab 1086:75fc98220389
26 #endif 26 #endif
27 27
28 #include <string.h> 28 #include <string.h>
29 29
30 #include "user-prefs.h" 30 #include "user-prefs.h"
31 #include "mappers.h"
31 #include "error.h" 32 #include "error.h"
32 #include "variables.h" 33 #include "variables.h"
33 #include "utils.h" 34 #include "utils.h"
34 35
35 // The list of user preferences. Values change when global variables 36 // The list of user preferences. Values change when global variables
481 int status = 0; 482 int status = 0;
482 483
483 static int kludge = 0; 484 static int kludge = 0;
484 485
485 double val; 486 double val;
486 if (builtin_real_scalar_variable ("output_max_field_width", val) == 0) 487 if (builtin_real_scalar_variable ("output_max_field_width", val) == 0
488 && ! xisnan (val))
487 { 489 {
488 int ival = NINT (val); 490 int ival = NINT (val);
489 if (ival > 0 && (double) ival == val) 491 if (ival > 0 && (double) ival == val)
490 { 492 {
491 user_pref.output_max_field_width= ival; 493 user_pref.output_max_field_width= ival;
510 int status = 0; 512 int status = 0;
511 513
512 static int kludge = 0; 514 static int kludge = 0;
513 515
514 double val; 516 double val;
515 if (builtin_real_scalar_variable ("output_precision", val) == 0) 517 if (builtin_real_scalar_variable ("output_precision", val) == 0
518 && ! xisnan (val))
516 { 519 {
517 int ival = NINT (val); 520 int ival = NINT (val);
518 if (ival >= 0 && (double) ival == val) 521 if (ival >= 0 && (double) ival == val)
519 { 522 {
520 user_pref.output_precision = ival; 523 user_pref.output_precision = ival;
539 int status = 0; 542 int status = 0;
540 543
541 static int kludge = 0; 544 static int kludge = 0;
542 545
543 double val; 546 double val;
544 if (builtin_real_scalar_variable ("save_precision", val) == 0) 547 if (builtin_real_scalar_variable ("save_precision", val) == 0
548 && ! xisnan (val))
545 { 549 {
546 int ival = NINT (val); 550 int ival = NINT (val);
547 if (ival >= 0 && (double) ival == val) 551 if (ival >= 0 && (double) ival == val)
548 { 552 {
549 user_pref.save_precision = ival; 553 user_pref.save_precision = ival;