Mercurial > octave-nkf
diff src/symtab.cc @ 5864:e884ab4f29ee
[project @ 2006-06-22 00:57:27 by jwe]
author | jwe |
---|---|
date | Thu, 22 Jun 2006 00:57:28 +0000 |
parents | 2a6cb4ed8f1e |
children | 4036e6fca790 |
line wrap: on
line diff
--- a/src/symtab.cc Tue Jun 20 17:56:59 2006 +0000 +++ b/src/symtab.cc Thu Jun 22 00:57:28 2006 +0000 @@ -87,6 +87,8 @@ retval = "built-in function"; else if (is_dld_function ()) retval = "dynamically-linked function"; + else if (is_mex_function ()) + retval = "dynamically-linked mex function"; return retval; } @@ -148,7 +150,7 @@ { std::string retval; - if (is_user_function () || is_dld_function ()) + if (is_user_function () || is_dld_function () || is_mex_function ()) { octave_function *defn = definition.function_value (); @@ -166,7 +168,7 @@ { os << name; - if (is_user_function () || is_dld_function ()) + if (is_user_function () || is_dld_function () || is_mex_function ()) { octave_function *defn = definition.function_value (); @@ -827,7 +829,9 @@ while (ptr) { - if (ptr->is_user_function () || ptr->is_dld_function ()) + if (ptr->is_user_function () + || ptr->is_dld_function () + || ptr->is_mex_function ()) ptr->clear (); ptr = ptr->next (); @@ -927,7 +931,9 @@ while (ptr) { if (ptr->name () == nm - && (ptr->is_user_function () || ptr->is_dld_function ())) + && (ptr->is_user_function () + || ptr->is_dld_function () + || ptr->is_mex_function ())) { ptr->clear (); return true; @@ -1011,7 +1017,9 @@ while (ptr) { - if (ptr->is_user_function () || ptr->is_dld_function ()) + if (ptr->is_user_function () + || ptr->is_dld_function () + || ptr->is_mex_function ()) { glob_match pattern (pat);