Mercurial > hg > octave-lyh

diff src/variables.cc @ 864:4c3de23d0fb1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-11-01 00:03:49 by jwe]
author jwe
date Tue, 01 Nov 1994 00:03:49 +0000
parents 433ab56e62cd
children b6b78f85743a
line wrap: on
line diff
--- a/src/variables.cc
+++ b/src/variables.cc
@@ -1592,8 +1592,8 @@
 	  gvars = curr_sym_tab->list (gcount, 0, symbol_def::USER_VARIABLE,
 				      SYMTAB_GLOBAL_SCOPE);
 
-	  fcns = curr_sym_tab->list (fcount, 0, symbol_def::USER_FUNCTION,
-				     SYMTAB_ALL_SCOPES);
+	  fcns = global_sym_tab->list (fcount, 0, symbol_def::USER_FUNCTION,
+				       SYMTAB_ALL_SCOPES);
 	}
 
       while (argc > 0)
@@ -1631,8 +1631,7 @@
 		  if ((exclusive && ! match) || (! exclusive && match))
 		    {
 		      count = curr_sym_tab->clear (nm);
-		      if (count > 0)
-			global_sym_tab->clear (nm, clear_user_functions);
+		      global_sym_tab->clear (nm, clear_user_functions);
 		    }
 		}
 	    }