Mercurial > hg > octave-nkf

comparison src/lex.l @ 924:8b0920cc1d64

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-11-15 00:40:50 by jwe]
author jwe
date Tue, 15 Nov 1994 00:41:30 +0000
parents 708827b941b4
children 567eb9703478
comparison
equal deleted inserted replaced
923:8eb9bb511f2a 924:8b0920cc1d64
892 static char * 892 static char *
893 plot_style_token (char *s) 893 plot_style_token (char *s)
894 { 894 {
895 static char *plot_styles[] = 895 static char *plot_styles[] =
896 { 896 {
897 "boxes"
898 "boxerrorbars",
897 "dots", 899 "dots",
898 "errorbars", 900 "errorbars",
899 "impulses", 901 "impulses",
900 "lines", 902 "lines",
901 "linespoints", 903 "linespoints",
1113 else if (strcmp ("unwind_protect", s) == 0) 1115 else if (strcmp ("unwind_protect", s) == 0)
1114 { 1116 {
1115 promptflag--; 1117 promptflag--;
1116 yylval.tok_val = new token (l, c); 1118 yylval.tok_val = new token (l, c);
1117 token_stack.push (yylval.tok_val); 1119 token_stack.push (yylval.tok_val);
1118 return UNWIND_PROTECT; 1120 return UNWIND;
1119 } 1121 }
1120 else if (strcmp ("unwind_protect_cleanup", s) == 0) 1122 else if (strcmp ("unwind_protect_cleanup", s) == 0)
1121 { 1123 {
1122 yylval.tok_val = new token (l, c); 1124 yylval.tok_val = new token (l, c);
1123 token_stack.push (yylval.tok_val); 1125 token_stack.push (yylval.tok_val);
1124 return UNWIND_PROTECT_CLEANUP; 1126 return CLEANUP;
1125 } 1127 }
1126 else if (strcmp ("end_unwind_protect", s) == 0) 1128 else if (strcmp ("end_unwind_protect", s) == 0)
1127 { 1129 {
1128 end_found = 1; 1130 end_found = 1;
1129 yylval.tok_val = new token (token::unwind_protect_end, l, c); 1131 yylval.tok_val = new token (token::unwind_protect_end, l, c);