# HG changeset patch
# User jwe
# Date 784860090 0
# Node ID 8b0920cc1d641868a3342b75223756a1dfdecaef
# Parent  8eb9bb511f2a2b10cc09d8c38b6ca1ffe84d6e88
[project @ 1994-11-15 00:40:50 by jwe]

diff -r 8eb9bb511f2a -r 8b0920cc1d64 src/lex.l
--- a/src/lex.l	Mon Nov 14 22:42:15 1994 +0000
+++ b/src/lex.l	Tue Nov 15 00:41:30 1994 +0000
@@ -894,6 +894,8 @@
 {
   static char *plot_styles[] = 
     {
+      "boxes"
+      "boxerrorbars",
       "dots",
       "errorbars",
       "impulses",
@@ -1115,13 +1117,13 @@
       promptflag--;
       yylval.tok_val = new token (l, c);
       token_stack.push (yylval.tok_val);
-      return UNWIND_PROTECT;
+      return UNWIND;
     }
   else if (strcmp ("unwind_protect_cleanup", s) == 0)
     {
       yylval.tok_val = new token (l, c);
       token_stack.push (yylval.tok_val);
-      return UNWIND_PROTECT_CLEANUP;
+      return CLEANUP;
     }
   else if (strcmp ("end_unwind_protect", s) == 0)
     {
diff -r 8eb9bb511f2a -r 8b0920cc1d64 src/parse.y
--- a/src/parse.y	Mon Nov 14 22:42:15 1994 +0000
+++ b/src/parse.y	Tue Nov 15 00:41:30 1994 +0000
@@ -223,7 +223,7 @@
 %token <tok_val> PLOT
 %token <tok_val> TEXT STYLE
 %token <tok_val> FOR WHILE IF ELSEIF ELSE BREAK CONTINUE FUNC_RET
-%token <tok_val> UNWIND_PROTECT UNWIND_PROTECT_CLEANUP
+%token <tok_val> UNWIND CLEANUP
 %token <tok_val> GLOBAL
 %token <tok_val> TEXT_ID
 
@@ -604,12 +604,12 @@
 		    $$ = $1;
 		  }
 
-		| UNWIND_PROTECT opt_list UNWIND_PROTECT_CLEANUP opt_list END
+		| UNWIND optsep opt_list CLEANUP optsep opt_list END
 		  {
-		    if (check_end ($5, token::unwind_protect_end))
+		    if (check_end ($7, token::unwind_protect_end))
 		      ABORT_PARSE;
 
-		    $$ = new tree_unwind_protect_command ($2, $4, $1->line (),
+		    $$ = new tree_unwind_protect_command ($3, $6, $1->line (),
 							  $1->column ());
 		  }
 		| WHILE expression optsep opt_list END