# HG changeset patch
# User jwe
# Date 1025746966 0
# Node ID 826092b5665effbfd673aae034a8a89e6f2014c5
# Parent  c21bb69ea26201dfa6821dafaae169a9adf51b94
[project @ 2002-07-04 01:42:46 by jwe]

diff -r c21bb69ea262 -r 826092b5665e src/ChangeLog
--- a/src/ChangeLog	Wed Jul 03 18:58:51 2002 +0000
+++ b/src/ChangeLog	Thu Jul 04 01:42:46 2002 +0000
@@ -1,5 +1,9 @@
 2002-07-03  John W. Eaton  <jwe@bevo.che.wisc.edu>
 
+	* lex.l (EL): Return VARARGIN or VARARGOUT, not ELLIPSIS.
+	* parse.y (param_list): Use VARARGIN instead of ELLIPSIS.
+	(return_list): Use VARARGOUT instead of ELLIPSIS.
+
 	* data.cc (make_diag const octave_value&, const octave_value&):
 	Allow first arg to be 1x0 or 0x1.
 
diff -r c21bb69ea262 -r 826092b5665e src/lex.l
--- a/src/lex.l	Wed Jul 03 18:58:51 2002 +0000
+++ b/src/lex.l	Thu Jul 04 01:42:46 2002 +0000
@@ -480,7 +480,12 @@
 %}
 
 {EL} {
-    return ELLIPSIS;
+    if (lexer_flags.looking_at_parameter_list)
+      return VARARGIN;
+    else if (lexer_flags.looking_at_return_list)
+      return VARARGOUT;
+    else
+      return LEXICAL_ERROR;
   }
 
 %{
diff -r c21bb69ea262 -r 826092b5665e src/parse.y
--- a/src/parse.y	Wed Jul 03 18:58:51 2002 +0000
+++ b/src/parse.y	Thu Jul 04 01:42:46 2002 +0000
@@ -398,7 +398,7 @@
 
 // Other tokens.
 %token END_OF_INPUT LEXICAL_ERROR
-%token FCN ELLIPSIS ALL_VA_ARGS
+%token FCN VARARGIN VARARGOUT ALL_VA_ARGS
 %token USING TITLE WITH AXES COLON OPEN_BRACE CLOSE_BRACE CLEAR
 
 // Nonterminals we construct.
@@ -1103,7 +1103,7 @@
 		    lexer_flags.quote_is_transpose = false;
 		    $$ = 0;
 		  }
-		| param_list_beg ELLIPSIS param_list_end
+		| param_list_beg VARARGIN param_list_end
 		  {
 		    lexer_flags.quote_is_transpose = false;
 		    tree_parameter_list *tmp = new tree_parameter_list ();
@@ -1116,7 +1116,7 @@
 		    $1->mark_as_formal_parameters ();
 		    $$ = $1;
 		  }
-		| param_list1 ',' ELLIPSIS param_list_end
+		| param_list1 ',' VARARGIN param_list_end
 		  {
 		    lexer_flags.quote_is_transpose = false;
 		    $1->mark_as_formal_parameters ();
@@ -1158,7 +1158,7 @@
 		    lexer_flags.looking_at_return_list = false;
 		    $$ = new tree_parameter_list ();
 		  }
-		| return_list_beg ELLIPSIS return_list_end
+		| return_list_beg VARARGOUT return_list_end
 		  {
 		    lexer_flags.looking_at_return_list = false;
 		    tree_parameter_list *tmp = new tree_parameter_list ();
@@ -1170,7 +1170,7 @@
 		    lexer_flags.looking_at_return_list = false;
 		    $$ = $2;
 		  }
-		| return_list_beg return_list1 ',' ELLIPSIS return_list_end
+		| return_list_beg return_list1 ',' VARARGOUT return_list_end
 		  {
 		    lexer_flags.looking_at_return_list = false;
 		    $2->mark_varargs ();