From bug-octave-request at bevo dot che dot wisc dot edu  Tue Apr 17 22:06:19 2001
Subject: Unidentified subject!
From: "John W. Eaton" <jwe at bevo dot che dot wisc dot edu>
To: Christoph Spiel <cspiel at hammersmith-consulting dot com>
Cc: bug-octave at bevo dot che dot wisc dot edu, cspiel@hydra.hammersmith-consulting.com
Date: Tue, 17 Apr 2001 22:03:29 -0500

On 17-Apr-2001, Christoph Spiel <cspiel at hammersmith-consulting dot com> wrote:

| To: bug-octave at bevo dot che dot wisc dot edu
| Cc: cspiel
| Subject: __error_text__ keeps value of first error
| 
| Bug report for Octave 2.1.33 configured for %OCTAVE_CANONICAL_HOST_TYPE%
| 
| Description:
| -----------
| 
| __error_text__ only stores the error message of the first error ever
| encountered.  This behavior is independed whether
| 'try-catch-end_try_catch' or 'eval' is used, neither does it depend on
| whether the error has been triggered implicitely, e.g., 'clear a; a'
| or explicitely 'error("snafu")'.

Please try the following patch.

Thanks,

jwe


2001-04-17  John W. Eaton  <jwe at bevo dot che dot wisc dot edu>

	* symtab.cc (define_builtin_const): Don't call replace_all_defs
	here.


Index: symtab.cc
===================================================================
RCS file: /usr/local/cvsroot/octave/src/symtab.cc,v
retrieving revision 1.84
diff -c -r1.84 symtab.cc
*** symtab.cc	2000/02/03 01:17:17	1.84
--- symtab.cc	2001/04/18 03:02:33
***************
*** 239,245 ****
  
    if (! read_only_error ("redefine"))
      {
!       replace_all_defs (new symbol_def (v, symbol_record::BUILTIN_CONSTANT));
  
        retval = true;
      }
--- 239,245 ----
  
    if (! read_only_error ("redefine"))
      {
!       definition->define (v, symbol_record::BUILTIN_CONSTANT);
  
        retval = true;
      }



-------------------------------------------------------------
Octave is freely available under the terms of the GNU GPL.

Octave's home on the web:  http://www.octave.org
How to fund new projects:  http://www.octave.org/funding.html
Subscription information:  http://www.octave.org/archive.html
-------------------------------------------------------------