Mercurial > hg > octave-nkf
changeset 489:89ed09321d16
[project @ 1994-07-06 14:34:51 by jwe]
author | jwe |
---|---|
date | Wed, 06 Jul 1994 14:35:12 +0000 |
parents | 4481fdfb01b4 |
children | 101e1d4f2395 |
files | src/symtab.cc src/symtab.h |
diffstat | 2 files changed, 9 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/src/symtab.cc +++ b/src/symtab.cc @@ -75,7 +75,7 @@ read_only = 0; help_string = (char *) NULL; - definition = NULL_TREE; + definition = (tree_fvc *) NULL; next_elem = (symbol_def *) NULL; count = 0; } @@ -163,7 +163,7 @@ eternal = 1; } -tree * +tree_fvc * symbol_def::def (void) const { return definition; @@ -259,13 +259,13 @@ nm = strsave (n); } -tree * +tree_fvc * symbol_record::def (void) const { if (definition != (symbol_def *) NULL) return definition->def (); else - return NULL_TREE; + return (tree_fvc *) NULL; } int @@ -401,7 +401,7 @@ if (is_variable () && read_only_error ()) return 0; - tree *saved_def = NULL_TREE; + tree_fvc *saved_def = (tree_fvc *) NULL; if (definition == (symbol_def *) NULL) { definition = new symbol_def ();
--- a/src/symtab.h +++ b/src/symtab.h @@ -46,6 +46,7 @@ #define HASH_MASK (HASH_TABLE_SIZE - 1) class tree; +class tree_fvc; class tree_builtin; class tree_constant; class tree_function; @@ -87,7 +88,7 @@ void unprotect (void); void make_eternal (void); - tree *def (void) const; + tree_fvc *def (void) const; char *help (void) const; void document (const char *h); @@ -111,7 +112,7 @@ unsigned read_only : 1; char *help_string; - tree *definition; + tree_fvc *definition; symbol_def *next_elem; int count; @@ -137,7 +138,7 @@ char *name (void) const; char *help (void) const; - tree *def (void) const; + tree_fvc *def (void) const; void rename (const char *n);