Mercurial > hg > octave-lyh

diff src/error.cc @ 3490:fc5eac74640d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2000-01-28 10:13:25 by jwe]
author jwe
date Fri, 28 Jan 2000 10:13:26 +0000
parents cbee5fbb696d
children 2c7524ffdbf5
line wrap: on
line diff
--- a/src/error.cc
+++ b/src/error.cc
@@ -375,17 +375,22 @@
 void
 bind_global_error_variable (void)
 {
-  *error_message_buffer << ends;
+  if (error_message_buffer)
+    {
+      *error_message_buffer << ends;
 
-  char *error_text = error_message_buffer->str ();
+      char *error_text = error_message_buffer->str ();
 
-  bind_builtin_constant ("__error_text__", error_text, true);
+      bind_builtin_constant ("__error_text__", error_text, true);
 
-  delete [] error_text;
+      delete [] error_text;
+
+      delete error_message_buffer;
 
-  delete error_message_buffer;
-
-  error_message_buffer = 0;
+      error_message_buffer = 0;
+    }
+  else
+    bind_builtin_constant ("__error_text__", "", true);
 }
 
 void