# HG changeset patch
# User jwe
# Date 780160231 0
# Node ID 43fc5a13be237247048cc833c2b766deb8650db5
# Parent  02814aea28c8f20ad9920d2be594c69316125d77
[project @ 1994-09-21 15:10:31 by jwe]

diff --git a/src/user-prefs.cc b/src/user-prefs.cc
--- a/src/user-prefs.cc
+++ b/src/user-prefs.cc
@@ -37,6 +37,47 @@
 // need to check a preference.
 user_preferences user_pref;
 
+// Initialize global user_pref structure.
+
+int
+init_user_prefs (void)
+{
+  user_pref.automatic_replot = 0;
+  user_pref.commas_in_literal_matrix = 0;
+  user_pref.do_fortran_indexing = 0;
+  user_pref.empty_list_elements_ok = 0;
+  user_pref.ignore_function_time_stamp = 0;
+  user_pref.implicit_str_to_num_ok = 0;
+  user_pref.ok_to_lose_imaginary_part = 0;
+  user_pref.output_max_field_width = 0;
+  user_pref.output_precision = 0;
+  user_pref.page_screen_output = 0;
+  user_pref.prefer_column_vectors = 0;
+  user_pref.prefer_zero_one_indexing = 0;
+  user_pref.print_answer_id_name = 0;
+  user_pref.print_empty_dimensions = 0;
+  user_pref.propagate_empty_matrices = 0;
+  user_pref.resize_on_range_error = 0;
+  user_pref.return_last_computed_value = 0;
+  user_pref.save_precision = 0;
+  user_pref.silent_functions = 0;
+  user_pref.split_long_rows = 0;
+  user_pref.treat_neg_dim_as_zero = 0;
+  user_pref.warn_assign_as_truth_value = 0;
+  user_pref.warn_comma_in_global_decl = 0;
+  user_pref.warn_divide_by_zero = 0;
+
+  user_pref.default_save_format = 0;
+  user_pref.editor = 0;
+  user_pref.gnuplot_binary = 0;
+  user_pref.imagepath = 0;
+  user_pref.info_file = 0;
+  user_pref.loadpath = 0;
+  user_pref.pager_binary = 0;
+  user_pref.ps1 = 0;
+  user_pref.ps2 = 0;
+  user_pref.pwd = 0;
+}
 
 // Check the value of a string variable to see if it it's ok to do
 // something.
diff --git a/src/user-prefs.h b/src/user-prefs.h
--- a/src/user-prefs.h
+++ b/src/user-prefs.h
@@ -65,6 +65,8 @@
 
 extern user_preferences user_pref;
 
+extern int init_user_prefs (void);
+
 extern int automatic_replot (void);
 extern int commas_in_literal_matrix (void);
 extern int do_fortran_indexing (void);