Mercurial > hg > octave-max
changeset 2078:4d43f960f2cc
[project @ 1996-04-24 01:12:59 by jwe]
author | jwe |
---|---|
date | Wed, 24 Apr 1996 01:14:04 +0000 |
parents | 2d03b8eb891d |
children | 6c1effd5dcea |
files | src/gripes.cc src/gripes.h src/syscalls.cc src/toplev.cc |
diffstat | 4 files changed, 9 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/src/gripes.cc +++ b/src/gripes.cc @@ -29,6 +29,12 @@ #include "pt-const.h" void +gripe_not_supported (const char *fcn) +{ + error ("%s: not supported on this system", fcn); +} + +void gripe_string_invalid (void) { error ("string constant used in invalid context");
--- a/src/gripes.h +++ b/src/gripes.h @@ -25,6 +25,7 @@ class tree_constant; +extern void gripe_not_supported (void); extern void gripe_string_invalid (void); extern void gripe_range_invalid (void); extern void gripe_nonconformant (void);
--- a/src/syscalls.cc +++ b/src/syscalls.cc @@ -43,6 +43,7 @@ #include "defun.h" #include "error.h" #include "file-ops.h" +#include "gripes.h" #include "help.h" #include "lo-utils.h" #include "oct-map.h" @@ -81,12 +82,6 @@ return m; } -static void -gripe_not_supported (const char *fcn) -{ - error ("%s: not supported on this system", fcn); -} - DEFUN(dup2, args, , "fid = dup2 (old, new)") {