Mercurial > hg > octave-nkf
annotate src/octave.gperf @ 9023:60b7fb86380a
Added tag ss-3-1-55 for changeset 5e276a0b9997
| author | John W. Eaton <jwe@octave.org> |
|---|---|
| date | Wed, 25 Mar 2009 23:40:43 -0400 |
| parents | a2a9dc5e8565 |
| children | d9b25c5b8ee5 |
| rev | line source |
|---|---|
| 1496 | 1 %{ |
| 7019 | 2 /* |
| 3 | |
| 4 Copyright (C) 1995, 1997, 1998, 2000, 2002, 2004, 2005, 2006, | |
|
8775
a2a9dc5e8565
octave.gperf: eliminate whitespace to allow gperf 2.7.2 to work
John W. Eaton <jwe@octave.org>
parents:
7587
diff
changeset
|
5 2007, 2008, 2009 John W. Eaton |
| 7019 | 6 |
| 7 This file is part of Octave. | |
| 8 | |
| 9 Octave is free software; you can redistribute it and/or modify it | |
| 10 under the terms of the GNU General Public License as published by the | |
| 11 Free Software Foundation; either version 3 of the License, or (at | |
| 12 your option) any later version. | |
| 13 | |
| 14 Octave is distributed in the hope that it will be useful, but WITHOUT | |
| 15 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
| 16 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
| 17 for more details. | |
| 18 | |
| 19 You should have received a copy of the GNU General Public License | |
| 20 along with Octave; see the file COPYING. If not, see | |
| 21 <http://www.gnu.org/licenses/>. | |
| 22 | |
|
8775
a2a9dc5e8565
octave.gperf: eliminate whitespace to allow gperf 2.7.2 to work
John W. Eaton <jwe@octave.org>
parents:
7587
diff
changeset
|
23 NOTE: gperf 2.7.2 will silently generate bad code if there are blank |
|
a2a9dc5e8565
octave.gperf: eliminate whitespace to allow gperf 2.7.2 to work
John W. Eaton <jwe@octave.org>
parents:
7587
diff
changeset
|
24 lines following the "%{" marker above. This comment block seems to be |
|
a2a9dc5e8565
octave.gperf: eliminate whitespace to allow gperf 2.7.2 to work
John W. Eaton <jwe@octave.org>
parents:
7587
diff
changeset
|
25 handled correctly. |
|
a2a9dc5e8565
octave.gperf: eliminate whitespace to allow gperf 2.7.2 to work
John W. Eaton <jwe@octave.org>
parents:
7587
diff
changeset
|
26 |
| 7019 | 27 */ |
| 1496 | 28 enum octave_kw_id |
| 29 { | |
| 30 break_kw, | |
| 2764 | 31 case_kw, |
| 1496 | 32 catch_kw, |
| 33 continue_kw, | |
| 3484 | 34 do_kw, |
| 1496 | 35 else_kw, |
| 36 elseif_kw, | |
| 37 end_kw, | |
| 38 end_try_catch_kw, | |
| 39 end_unwind_protect_kw, | |
| 40 endfor_kw, | |
| 41 endfunction_kw, | |
| 42 endif_kw, | |
| 2764 | 43 endswitch_kw, |
| 1496 | 44 endwhile_kw, |
| 45 for_kw, | |
| 46 function_kw, | |
| 47 global_kw, | |
| 48 if_kw, | |
| 3174 | 49 magic_file_kw, |
| 50 magic_line_kw, | |
| 2764 | 51 otherwise_kw, |
| 1496 | 52 return_kw, |
| 2846 | 53 static_kw, |
| 2764 | 54 switch_kw, |
| 1496 | 55 try_kw, |
| 3484 | 56 until_kw, |
| 1496 | 57 unwind_protect_kw, |
| 58 unwind_protect_cleanup_kw, | |
| 59 while_kw | |
| 60 }; | |
| 61 %} | |
| 2804 | 62 struct octave_kw { const char *name; int tok; octave_kw_id kw_id; }; |
| 1496 | 63 %% |
| 64 break, BREAK, break_kw | |
| 2764 | 65 case, CASE, case_kw |
| 1496 | 66 catch, CATCH, catch_kw |
| 67 continue, CONTINUE, continue_kw | |
| 3484 | 68 do, DO, do_kw |
| 1496 | 69 else, ELSE, else_kw |
| 70 elseif, ELSEIF, elseif_kw | |
| 71 end, END, end_kw | |
| 72 end_try_catch, END, end_try_catch_kw | |
| 73 end_unwind_protect, END, end_unwind_protect_kw | |
| 74 endfor, END, endfor_kw | |
| 75 endfunction, END, endfunction_kw | |
| 76 endif, END, endif_kw | |
| 2764 | 77 endswitch, END, endswitch_kw |
| 1496 | 78 endwhile, END, endwhile_kw |
| 79 for, FOR, for_kw | |
| 80 function, FCN, function_kw | |
| 81 global, GLOBAL, global_kw | |
| 82 if, IF, if_kw | |
| 2764 | 83 otherwise, OTHERWISE, otherwise_kw |
| 4166 | 84 persistent, STATIC, static_kw |
| 1496 | 85 return, FUNC_RET, return_kw |
| 2846 | 86 static, STATIC, static_kw |
| 2764 | 87 switch, SWITCH, switch_kw |
| 1496 | 88 try, TRY, try_kw |
| 3484 | 89 until, UNTIL, until_kw |
| 1496 | 90 unwind_protect, UNWIND, unwind_protect_kw |
| 91 unwind_protect_cleanup, CLEANUP, unwind_protect_cleanup_kw | |
| 92 while, WHILE, while_kw | |
| 5279 | 93 __FILE__, DQ_STRING, magic_file_kw |
| 3174 | 94 __LINE__, NUM, magic_line_kw |