Mercurial > hg > octave-nkf
changeset 2702:7a820bb7f406
[project @ 1997-02-19 19:22:34 by jwe]
author | jwe |
---|---|
date | Wed, 19 Feb 1997 19:22:39 +0000 |
parents | cd5f72e530e2 |
children | 41d6a1c814c4 |
files | Announce ChangeLog NEWS PROJECTS configure.in kpathsea/ChangeLog kpathsea/Makefile.in kpathsea/configure.in libcruft/ChangeLog liboctave/ChangeLog liboctave/lo-ieee.cc readline/ChangeLog readline/configure.in scripts/ChangeLog src/ChangeLog src/lex.l test/ChangeLog |
diffstat | 17 files changed, 113 insertions(+), 31 deletions(-) [+] |
line wrap: on
line diff
--- a/Announce +++ b/Announce @@ -4,12 +4,16 @@ in the directory /pub/octave. Diffs from the previous release are also available in the same directory. + -rw-r--r-- 1 jwe 3312470 Feb 18 13:08 octave-2.0.3.tar.gz + -rw-r--r-- 1 jwe 217812 Feb 18 13:43 octave-2.0.2-2.0.3.patch. + In addition to the source distributions, there are binary -distributions available for Linux running on Intel systems and OSF/1 -running on Alpha systems. Binary distributions for other platforms -will be available from ftp.che.wisc.edu when they are contributed by -volunteers. If you would like to help to make a binary distribution -available, please contact bug-octave@bevo.che.wisc.edu. +distributions available for Linux running on Intel systems, OSF/1 +running on Alpha systems, and HA-UX 9.x running on HPPA systems. +Binary distributions for other platforms will be available from +ftp.che.wisc.edu when they are contributed by volunteers. If you +would like to help to make a binary distribution available, please +contact bug-octave@bevo.che.wisc.edu. Version 2.0.3 is primarily a bug-fixing release. Most bugs reported since the release of version 2.0.2 have been fixed. There are also a
--- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,13 @@ +Wed Feb 19 10:30:14 1997 John W. Eaton <jwe@bevo.che.wisc.edu> + + * Version 2.0.4 released. + Tue Feb 18 09:22:04 1997 John W. Eaton <jwe@bevo.che.wisc.edu> + * configure.in (SH_LDFLAGS): Fix typo in last change. + (RLD_FLAG): Don't forget to put -shared in SH_LDFLAGS for alpha + systems. + * Version 2.0.3 released. Tue Feb 18 00:33:36 1997 John W. Eaton <jwe@bevo.che.wisc.edu>
--- a/NEWS +++ b/NEWS @@ -1,3 +1,12 @@ +Summary of changes for version 2.0.4: +------------------------------------ + + * It is now possible to use commands like ls, save, and cd as simple + variable names. They still cannot be used as formal parameters + for functions, or as the names of structure variables. Failed + assignments leave them undefined (you can recover the orginal + definition as a function using clear). + Summary of changes for version 2.0.3: ------------------------------------
--- a/PROJECTS +++ b/PROJECTS @@ -259,9 +259,6 @@ * Make it possible to get the names of the arguments that are passed to functions, at least if simple variables are passed. - * Fix name of text-style functions (or at least explain it in the - manual). - * Consider allowing an arbitrary property list to be attached to any variable. This could be a more general way to handle the help string that can currently be added with `document'. @@ -404,8 +401,6 @@ This is pretty ugly and introduces some conflicts. - * Make it possible to use text-style function names as variables. - * Add a command that works like bash's `builtin' command. * Handle comments in parse trees for use with the type command.
--- a/configure.in +++ b/configure.in @@ -21,7 +21,7 @@ ### Software Foundation, 59 Temple Place - Suite 330, Boston, MA ### 02111-1307, USA. -AC_REVISION($Revision: 1.255 $) +AC_REVISION($Revision: 1.256 $) AC_PREREQ(2.9) AC_INIT(src/octave.cc) AC_CONFIG_HEADER(config.h) @@ -397,7 +397,7 @@ CPICFLAG= CXXPICFLAG= FPICFLAG= - SH_LDFLAGS="-Xlinker -exepct_unresolved -Xlinker '*'" + SH_LDFLAGS="-shared -Xlinker -expect_unresolved -Xlinker '*'" RLD_FLAG='-Xlinker -rpath -Xlinker $(libdir)' ;; changequote(,)dnl
--- a/kpathsea/ChangeLog +++ b/kpathsea/ChangeLog @@ -1,3 +1,9 @@ +Tue Feb 18 17:36:03 1997 John W. Eaton <jwe@bevo.che.wisc.edu> + + * Makefile.in (pic/tex-file.o): Delete extra pic/ in commands. + + * configure.in (SH_LDFLAGS): Fix typo in last change. + Thu Feb 13 17:35:20 1997 John W. Eaton <jwe@bevo.che.wisc.edu> * configure.in: Update config for shared libraries.
--- a/kpathsea/Makefile.in +++ b/kpathsea/Makefile.in @@ -145,7 +145,7 @@ pic/tex-file.o: $(CC) $(CPPFLAGS) $(CPICFLAG) $(CFLAGS) \ -DDEFAULT_FONT_SIZES='"$(default_texsizes)"'\ - -c $(srcdir)/tex-file.c -o pic/$@ + -c $(srcdir)/tex-file.c -o $@ # Need the -DHAVE_CONFIG_H. gmalloc.o:
--- a/kpathsea/configure.in +++ b/kpathsea/configure.in @@ -28,7 +28,7 @@ ;; alpha-dec-osf*) CPICFLAG= - SH_LDFLAGS="-Xlinker -exepct_unresolved -Xlinker '*'" + SH_LDFLAGS="-Xlinker -expect_unresolved -Xlinker '*'" ;; rs6000-ibm-aix* | powerpc-ibm-aix*) CPICFLAG=
--- a/libcruft/ChangeLog +++ b/libcruft/ChangeLog @@ -1,3 +1,7 @@ +Wed Feb 19 10:30:14 1997 John W. Eaton <jwe@bevo.che.wisc.edu> + + * Version 2.0.4 released. + Tue Feb 18 09:22:04 1997 John W. Eaton <jwe@bevo.che.wisc.edu> * Version 2.0.3 released.
--- a/liboctave/ChangeLog +++ b/liboctave/ChangeLog @@ -1,3 +1,11 @@ +Wed Feb 19 10:30:14 1997 John W. Eaton <jwe@bevo.che.wisc.edu> + + * Version 2.0.4 released. + +Wed Feb 19 09:42:30 1997 John W. Eaton <jwe@bevo.che.wisc.edu> + + * lo-ieee.cc: D'oh, it's `extern "C"', not `#extern "C"'. + Tue Feb 18 09:22:04 1997 John W. Eaton <jwe@bevo.che.wisc.edu> * Version 2.0.3 released.
--- a/liboctave/lo-ieee.cc +++ b/liboctave/lo-ieee.cc @@ -42,11 +42,11 @@ #endif #if defined (HAVE_INFINITY) -#extern "C" double infinity (); +extern "C" double infinity (); #endif #if defined (HAVE_QUIET_NAN) -#extern "C" double quiet_nan (long); +extern "C" double quiet_nan (long); #endif #include "lo-ieee.h"
--- a/readline/ChangeLog +++ b/readline/ChangeLog @@ -1,3 +1,7 @@ +Tue Feb 18 17:35:05 1997 John W. Eaton <jwe@bevo.che.wisc.edu> + + * configure.in (SH_LDFLAGS): Fix typo in last change. + Fri Feb 14 16:22:28 1997 John W. Eaton <jwe@bevo.che.wisc.edu> * Makefile.in (bin-dist): Don't write empty strings to LIBRARIES.
--- a/readline/configure.in +++ b/readline/configure.in @@ -40,7 +40,7 @@ ;; alpha-dec-osf*) CPICFLAG= - SH_LDFLAGS="-Xlinker -exepct_unresolved -Xlinker '*'" + SH_LDFLAGS="-Xlinker -expect_unresolved -Xlinker '*'" ;; rs6000-ibm-aix* | powerpc-ibm-aix*) CPICFLAG=
--- a/scripts/ChangeLog +++ b/scripts/ChangeLog @@ -1,3 +1,9 @@ +Wed Feb 19 10:30:14 1997 John W. Eaton <jwe@bevo.che.wisc.edu> + + * Version 2.0.4 released. + + * miscellaneous/paren.m: New file. + Tue Feb 18 09:22:04 1997 John W. Eaton <jwe@bevo.che.wisc.edu> * Version 2.0.3 released.
--- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,5 +1,15 @@ +Wed Feb 19 10:30:14 1997 John W. Eaton <jwe@bevo.che.wisc.edu> + + * Version 2.0.4 released. + + * lex.l (handle_identifier): Allow commands like ls, save, etc. to + also be used as simple variable names. Also make it possible to + use the normal function call syntax to invoke them. + Tue Feb 18 09:22:04 1997 John W. Eaton <jwe@bevo.che.wisc.edu> + * Makefile.in (%.oct:%.o, %.oct:pic/%.o): Use $(SH_LDFLAGS) here. + * Version 2.0.3 released. Tue Feb 18 00:27:49 1997 John W. Eaton <jwe@bevo.che.wisc.edu>
--- a/src/lex.l +++ b/src/lex.l @@ -1072,6 +1072,23 @@ return curr_sym_tab->lookup (name, 1, 0); } +static bool +is_variable (const string& name) +{ + symbol_record *sr = curr_sym_tab->lookup (name, 0, 0); + + return sr && sr->is_variable (); +} + +static void +force_local_variable (const string& name) +{ + symbol_record *sr = curr_sym_tab->lookup (name, 1, 0); + + if (sr) + sr->define (octave_value ()); +} + // Grab the help text from an function file. Always overwrites the // current contents of help_buf. @@ -1721,22 +1738,10 @@ TOK_RETURN (plot_option_kw); } - // If we are looking at a text style function, set up to gobble its - // arguments. These are also reserved words, but only because it - // would be very difficult to do anything intelligent with them if - // they were not reserved. - - if (is_text_function_name (tok)) - { - BEGIN TEXT_FCN; - - if (tok == "gset") - lexer_flags.doing_set = 1; - } - int c = yyinput (); yyunput (c, yytext); - int next_tok_is_eq = (c == '='); + bool next_tok_is_eq = (c == '='); + bool next_tok_is_paren = (c == '('); // Make sure we put the return values of a function in the symbol // table that is local to the function. @@ -1745,6 +1750,25 @@ && lexer_flags.defining_func && lexer_flags.maybe_screwed) curr_sym_tab = tmp_local_sym_tab; + // Kluge alert. + // + // If we are looking at a text style function, set up to gobble its + // arguments. If the following token is `=', force the symbol to be + // inserted as a variable in the current symbol table. + + if (is_text_function_name (tok) && ! is_variable (tok)) + { + if (next_tok_is_eq) + force_local_variable (tok); + else if (! next_tok_is_paren) + { + if (tok == "gset") + lexer_flags.doing_set = 1; + + BEGIN TEXT_FCN; + } + } + // Find the token in the symbol table. yylval.tok_val = new token (lookup_identifier (tok),