Mercurial > hg > octave-lyh

comparison src/octave.cc @ 2402:690435f72e58

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1996-10-13 16:23:27 by jwe] ChangeLog
author jwe
date Sun, 13 Oct 1996 16:23:27 +0000
parents 7ef24992e290
children 68c5868dbe83
comparison
equal deleted inserted replaced
2401:30cd01f9970c 2402:690435f72e58
43 43
44 #include <pwd.h> 44 #include <pwd.h>
45 45
46 #include "lo-error.h" 46 #include "lo-error.h"
47 #include "str-vec.h" 47 #include "str-vec.h"
48 #include "sun-utils.h"
48 49
49 #include "builtins.h" 50 #include "builtins.h"
50 #include "defaults.h" 51 #include "defaults.h"
51 #include "defun.h" 52 #include "defun.h"
52 #include "dynamic-ld.h" 53 #include "dynamic-ld.h"
368 static void 369 static void
369 maximum_braindamage (void) 370 maximum_braindamage (void)
370 { 371 {
371 bind_builtin_variable ("PS1", ">> "); 372 bind_builtin_variable ("PS1", ">> ");
372 bind_builtin_variable ("PS2", ""); 373 bind_builtin_variable ("PS2", "");
373 bind_builtin_variable ("beep_on_error", "true"); 374 bind_builtin_variable ("beep_on_error", 1.0);
374 bind_builtin_variable ("default_save_format", "mat-binary"); 375 bind_builtin_variable ("default_save_format", "mat-binary");
375 bind_builtin_variable ("define_all_return_values", "true"); 376 bind_builtin_variable ("define_all_return_values", 1.0);
376 bind_builtin_variable ("do_fortran_indexing", "true"); 377 bind_builtin_variable ("do_fortran_indexing", 1.0);
377 bind_builtin_variable ("empty_list_elements_ok", "true"); 378 bind_builtin_variable ("empty_list_elements_ok", 1.0);
378 bind_builtin_variable ("implicit_str_to_num_ok", "true"); 379 bind_builtin_variable ("implicit_str_to_num_ok", 1.0);
379 bind_builtin_variable ("ok_to_lose_imaginary_part", "true"); 380 bind_builtin_variable ("ok_to_lose_imaginary_part", 1.0);
380 bind_builtin_variable ("page_screen_output", "false"); 381 bind_builtin_variable ("page_screen_output", 0.0);
381 bind_builtin_variable ("prefer_column_vectors", "false"); 382 bind_builtin_variable ("prefer_column_vectors", 0.0);
382 bind_builtin_variable ("prefer_zero_one_indexing", "true"); 383 bind_builtin_variable ("prefer_zero_one_indexing", 1.0);
383 bind_builtin_variable ("print_empty_dimensions", "false"); 384 bind_builtin_variable ("print_empty_dimensions", 0.0);
384 bind_builtin_variable ("treat_neg_dim_as_zero", "true"); 385 bind_builtin_variable ("treat_neg_dim_as_zero", 1.0);
385 bind_builtin_variable ("warn_function_name_clash", "false"); 386 bind_builtin_variable ("warn_function_name_clash", 0.0);
386 bind_builtin_variable ("whitespace_in_literal_matrix", "traditional"); 387 bind_builtin_variable ("whitespace_in_literal_matrix", "traditional");
387 } 388 }
388 389
389 // You guessed it. 390 // You guessed it.
390 391