Mercurial > hg > octave-nkf

comparison src/lex.h @ 3225:7aae2c3636a7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1998-12-04 23:20:12 by jwe]
author jwe
date Fri, 04 Dec 1998 23:20:26 +0000
parents bef7b73c0724
children 8623649c967c
comparison
equal deleted inserted replaced
3224:1e7532b9173b 3225:7aae2c3636a7
31 #define YY_INPUT(buf, result, max_size) \ 31 #define YY_INPUT(buf, result, max_size) \
32 if ((result = octave_read (buf, max_size)) < 0) \ 32 if ((result = octave_read (buf, max_size)) < 0) \
33 YY_FATAL_ERROR ("octave_read () in flex scanner failed"); 33 YY_FATAL_ERROR ("octave_read () in flex scanner failed");
34 34
35 // Try to avoid crashing out completely on fatal scanner errors. 35 // Try to avoid crashing out completely on fatal scanner errors.
36 // The call to yy_fatal_error should never happen, but it avoids a
37 // `static function defined but not used' warning from gcc.
36 38
37 #ifdef YY_FATAL_ERROR 39 #ifdef YY_FATAL_ERROR
38 #undef YY_FATAL_ERROR 40 #undef YY_FATAL_ERROR
39 #endif 41 #endif
40 #define YY_FATAL_ERROR(msg) \ 42 #define YY_FATAL_ERROR(msg) \
41 do \ 43 do \
42 { \ 44 { \
43 error (msg); \ 45 error (msg); \
44 jump_to_top_level (); \ 46 jump_to_top_level (); \
47 yy_fatal_error (msg); \
45 } \ 48 } \
46 while (0) 49 while (0)
47 50
48 #define TOK_RETURN(tok) \ 51 #define TOK_RETURN(tok) \
49 do \ 52 do \