Mercurial > hg > octave-nkf
diff src/defun.cc @ 3015:2e114e914b77
[project @ 1997-06-02 21:03:55 by jwe]
author | jwe |
---|---|
date | Mon, 02 Jun 1997 21:03:55 +0000 |
parents | 38de16594cb4 |
children | 0d640dc625c7 |
line wrap: on
line diff
--- a/src/defun.cc +++ b/src/defun.cc @@ -58,6 +58,14 @@ warning ("no usage message found for `%s'", nm.c_str ()); } +void +check_version (const string& version, const string& fcn) +{ + if (version != OCTAVE_VERSION) + warning ("incompatible version %s found in function `%s'", + version.c_str (), fcn.c_str ()); +} + // Install variables and functions in the symbol tables. void