Mercurial > octave
diff src/parse.y @ 883:ff0bbf26b028
[project @ 1994-11-06 00:22:31 by jwe]
author | jwe |
---|---|
date | Sun, 06 Nov 1994 00:22:31 +0000 |
parents | a2f9d3fd720c |
children | 0f3237aa35b7 |
line wrap: on
line diff
--- a/src/parse.y Sat Nov 05 03:37:23 1994 +0000 +++ b/src/parse.y Sun Nov 06 00:22:31 1994 +0000 @@ -231,7 +231,7 @@ %token FCN SCREW_TWO %token ELLIPSIS %token END_OF_INPUT -%token USING TITLE WITH COLON OPEN_BRACE CLOSE_BRACE +%token USING TITLE WITH COLON OPEN_BRACE CLOSE_BRACE CLEAR // Nonterminals we construct. %type <tree_type> input @@ -405,6 +405,12 @@ { $$ = new tree_statement ($1); } | ans_expression { $$ = new tree_statement ($1); } + | PLOT CLEAR + { + symbol_record *sr = lookup_by_name ("clearplot", 0); + tree_identifier *id = new tree_identifier (sr); + $$ = new tree_statement (id); + } ; plot_command : PLOT plot_command1