/* A lexical scanner generated by flex */

/* Scanner skeleton version:

 * $Header: /home/daffy/u0/vern/flex/RCS/flex.skl,v 2.91 96/09/10 16:58:48 vern Exp $

 * $FreeBSD: releng/9.3/usr.bin/lex/flex.skl 214272 2010-10-24 15:31:41Z uqs $

 */

#if defined(__FreeBSD__)

#include <sys/cdefs.h>

#else

#define __unused

#define __dead2

#endif

#define FLEX_SCANNER

#define YY_FLEX_MAJOR_VERSION 2

#define YY_FLEX_MINOR_VERSION 5

#include <stdio.h>

/* cfront 1.2 defines "c_plusplus" instead of "__cplusplus" */

#ifdef c_plusplus

#ifndef __cplusplus

#define __cplusplus

#endif

#endif

#ifdef __cplusplus

#include <stdlib.h>

#include <unistd.h>

/* Use prototypes in function declarations. */

#define YY_USE_PROTOS

/* The "const" storage-class-modifier is valid. */

#define YY_USE_CONST

#else	/* ! __cplusplus */

#if __STDC__

#define YY_USE_PROTOS

#define YY_USE_CONST

#endif	/* __STDC__ */

#endif	/* ! __cplusplus */

#ifdef __TURBOC__

 #pragma warn -rch

 #pragma warn -use

#include <io.h>

#include <stdlib.h>

#define YY_USE_CONST

#define YY_USE_PROTOS

#endif

#ifdef YY_USE_CONST

#define yyconst const

#else

#define yyconst

#endif

#ifdef YY_USE_PROTOS

#define YY_PROTO(proto) proto

#else

#define YY_PROTO(proto) ()

#endif

/* Returned upon end-of-file. */

#define YY_NULL 0

/* Promotes a possibly negative, possibly signed char to an unsigned

 * integer for use as an array index.  If the signed char is negative,

 * we want to instead treat it as an 8-bit unsigned char, hence the

 * double cast.

 */

#define YY_SC_TO_UI(c) ((unsigned int) (unsigned char) c)

/* Enter a start condition.  This macro really ought to take a parameter,

 * but we do it the disgusting crufty way forced on us by the ()-less

 * definition of BEGIN.

 */

#define BEGIN yy_start = 1 + 2 *

/* Translate the current start state into a value that can be later handed

 * to BEGIN to return to the state.  The YYSTATE alias is for lex

 * compatibility.

 */

#define YY_START ((yy_start - 1) / 2)

#define YYSTATE YY_START

/* Action number for EOF rule of a given start state. */

#define YY_STATE_EOF(state) (YY_END_OF_BUFFER + state + 1)

/* Special action meaning "start processing a new file". */

#define YY_NEW_FILE yyrestart( yyin )

#define YY_END_OF_BUFFER_CHAR 0

/* Size of default input buffer. */

#define YY_BUF_SIZE 16384

typedef struct yy_buffer_state *YY_BUFFER_STATE;

extern int yyleng;

extern FILE *yyin, *yyout;

#define EOB_ACT_CONTINUE_SCAN 0

#define EOB_ACT_END_OF_FILE 1

#define EOB_ACT_LAST_MATCH 2

/* The funky do-while in the following #define is used to turn the definition

 * int a single C statement (which needs a semi-colon terminator).  This

 * avoids problems with code like:

 *

 * 	if ( condition_holds )

 *		yyless( 5 );

 *	else

 *		do_something_else();

 *

 * Prior to using the do-while the compiler would get upset at the

 * "else" because it interpreted the "if" statement as being all

 * done when it reached the ';' after the yyless() call.

 */

/* Return all but the first 'n' matched characters back to the input stream. */

#define yyless(n) \

	do \

		{ \

		/* Undo effects of setting up yytext. */ \

		*yy_cp = yy_hold_char; \

		YY_RESTORE_YY_MORE_OFFSET \

		yy_c_buf_p = yy_cp = yy_bp + n - YY_MORE_ADJ; \

		YY_DO_BEFORE_ACTION; /* set up yytext again */ \

		} \

	while ( 0 )

#define unput(c) yyunput( c, yytext_ptr )

/* The following is because we cannot portably get our hands on size_t

 * (without autoconf's help, which isn't available because we want

 * flex-generated scanners to compile on their own).

 */

typedef unsigned int yy_size_t;

struct yy_buffer_state

	{

	FILE *yy_input_file;

	char *yy_ch_buf;		/* input buffer */

	char *yy_buf_pos;		/* current position in input buffer */

	/* Size of input buffer in bytes, not including room for EOB

	 * characters.

	 */

	yy_size_t yy_buf_size;

	/* Number of characters read into yy_ch_buf, not including EOB

	 * characters.

	 */

	int yy_n_chars;

	/* Whether we "own" the buffer - i.e., we know we created it,

	 * and can realloc() it to grow it, and should free() it to

	 * delete it.

	 */

	int yy_is_our_buffer;

	/* Whether this is an "interactive" input source; if so, and

	 * if we're using stdio for input, then we want to use getc()

	 * instead of fread(), to make sure we stop fetching input after

	 * each newline.

	 */

	int yy_is_interactive;

	/* Whether we're considered to be at the beginning of a line.

	 * If so, '^' rules will be active on the next match, otherwise

	 * not.

	 */

	int yy_at_bol;

	/* Whether to try to fill the input buffer when we reach the

	 * end of it.

	 */

	int yy_fill_buffer;

	int yy_buffer_status;

#define YY_BUFFER_NEW 0

#define YY_BUFFER_NORMAL 1

	/* When an EOF's been seen but there's still some text to process

	 * then we mark the buffer as YY_EOF_PENDING, to indicate that we

	 * shouldn't try reading from the input source any more.  We might

	 * still have a bunch of tokens to match, though, because of

	 * possible backing-up.

	 *

	 * When we actually see the EOF, we change the status to "new"

	 * (via yyrestart()), so that the user can continue scanning by

	 * just pointing yyin at a new input file.

	 */

#define YY_BUFFER_EOF_PENDING 2

	};

static YY_BUFFER_STATE yy_current_buffer = 0;

/* We provide macros for accessing buffer states in case in the

 * future we want to put the buffer states in a more general

 * "scanner state".

 */

#define YY_CURRENT_BUFFER yy_current_buffer

/* yy_hold_char holds the character lost when yytext is formed. */

static char yy_hold_char;

static int yy_n_chars;		/* number of characters read into yy_ch_buf */

int yyleng;

/* Points to current character in buffer. */

static char *yy_c_buf_p = (char *) 0;

static int yy_init = 1;		/* whether we need to initialize */

static int yy_start = 0;	/* start state number */

/* Flag which is used to allow yywrap()'s to do buffer switches

 * instead of setting up a fresh yyin.  A bit of a hack ...

 */

static int yy_did_buffer_switch_on_eof;

void yyrestart YY_PROTO(( FILE *input_file ));

void yy_switch_to_buffer YY_PROTO(( YY_BUFFER_STATE new_buffer ));

void yy_load_buffer_state YY_PROTO(( void ));

YY_BUFFER_STATE yy_create_buffer YY_PROTO(( FILE *file, int size ));

void yy_delete_buffer YY_PROTO(( YY_BUFFER_STATE b ));

void yy_init_buffer YY_PROTO(( YY_BUFFER_STATE b, FILE *file ));

void yy_flush_buffer YY_PROTO(( YY_BUFFER_STATE b ));

#define YY_FLUSH_BUFFER yy_flush_buffer( yy_current_buffer )

YY_BUFFER_STATE yy_scan_buffer YY_PROTO(( char *base, yy_size_t size ));

YY_BUFFER_STATE yy_scan_string YY_PROTO(( yyconst char *yy_str ));

YY_BUFFER_STATE yy_scan_bytes YY_PROTO(( yyconst char *bytes, int len ));

static void *yy_flex_alloc YY_PROTO(( yy_size_t ));

static void *yy_flex_realloc YY_PROTO(( void *, yy_size_t )) __unused;

static void yy_flex_free YY_PROTO(( void * ));

#define yy_new_buffer yy_create_buffer

#define yy_set_interactive(is_interactive) \

	{ \

	if ( ! yy_current_buffer ) \

		yy_current_buffer = yy_create_buffer( yyin, YY_BUF_SIZE ); \

	yy_current_buffer->yy_is_interactive = is_interactive; \

	}

#define yy_set_bol(at_bol) \

	{ \

	if ( ! yy_current_buffer ) \

		yy_current_buffer = yy_create_buffer( yyin, YY_BUF_SIZE ); \

	yy_current_buffer->yy_at_bol = at_bol; \

	}

#define YY_AT_BOL() (yy_current_buffer->yy_at_bol)

typedef unsigned char YY_CHAR;

FILE *yyin = (FILE *) 0, *yyout = (FILE *) 0;

typedef int yy_state_type;

extern char *yytext;

#define yytext_ptr yytext

static yy_state_type yy_get_previous_state YY_PROTO(( void ));

static yy_state_type yy_try_NUL_trans YY_PROTO(( yy_state_type current_state ));

static int yy_get_next_buffer YY_PROTO(( void ));

static void yy_fatal_error YY_PROTO(( yyconst char msg[] )) __dead2;

/* Done after the current pattern has been matched and before the

 * corresponding action - sets up yytext.

 */

#define YY_DO_BEFORE_ACTION \

	yytext_ptr = yy_bp; \

	yyleng = (int) (yy_cp - yy_bp); \

	yy_hold_char = *yy_cp; \

	*yy_cp = '\0'; \

	yy_c_buf_p = yy_cp;

#define YY_NUM_RULES 19

#define YY_END_OF_BUFFER 20

static yyconst short int yy_accept[39] =

    {   0,

        0,    0,   20,   18,    1,    2,    7,    6,    7,   18,

       16,   16,    2,    7,    7,    7,   16,   17,   18,   18,

       11,    6,    5,    6,   14,   16,    0,   12,    8,   10,

        9,   13,   16,   17,    3,   15,    4,    0

    } ;

static yyconst int yy_ec[256] =

    {   0,

        1,    1,    1,    1,    1,    1,    1,    1,    2,    3,

        1,    2,    1,    1,    1,    1,    1,    1,    1,    1,

        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,

        1,    2,    4,    1,    5,    1,    6,    7,    1,    6,

        6,    6,    6,    6,    6,    1,    6,    8,    9,    9,

        9,    9,    9,    9,    9,    9,    9,    1,   10,   11,

       12,   13,    1,    1,   14,   14,   14,   14,   14,   14,

       15,   15,   15,   15,   15,   15,   15,   15,   15,   15,

       15,   15,   15,   15,   15,   15,   15,   16,   15,   15,

        1,   17,    1,    6,    1,    1,   15,   15,   15,   15,

       15,   15,   15,   15,   15,   15,   15,   15,   15,   15,

       15,   15,   15,   15,   15,   15,   15,   15,   15,   16,

       15,   15,    1,   18,    1,    1,    1,    1,    1,    1,

        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,

        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,

        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,

        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,

        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,

        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,

        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,

        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,

        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,

        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,

        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,

        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,

        1,    1,    1,    1,    1

    } ;

static yyconst int yy_meta[19] =

    {   0,

        1,    1,    1,    1,    1,    1,    1,    2,    2,    1,

        1,    1,    1,    2,    3,    2,    1,    1

    } ;

static yyconst short int yy_base[43] =

    {   0,

        0,    0,   39,   49,   49,   49,   26,   16,   49,   30,

       20,   19,   49,    9,   22,   10,    9,    0,   29,   13,

       49,   23,   49,   24,   49,    0,    0,   49,   49,   49,

       49,   49,   13,    0,   49,   49,   49,   49,   41,   28,

       43,   45

    } ;

static yyconst short int yy_def[43] =

    {   0,

       38,    1,   38,   38,   38,   38,   38,   39,   38,   38,

       40,   40,   38,   38,   38,   38,   41,   42,   38,   38,

       38,   39,   38,   39,   38,   12,   12,   38,   38,   38,

       38,   38,   41,   42,   38,   38,   38,    0,   38,   38,

       38,   38

    } ;

static yyconst short int yy_nxt[68] =

    {   0,

        4,    5,    6,    7,    8,    9,   10,   11,   12,   13,

       14,   15,   16,   17,   18,   18,   19,   20,   23,   28,

       29,   31,   32,   34,   34,   23,   37,   34,   34,   26,

       36,   35,   24,   30,   38,   27,   25,   21,   38,   24,

       24,   22,   22,   22,   33,   33,   34,   34,    3,   38,

       38,   38,   38,   38,   38,   38,   38,   38,   38,   38,

       38,   38,   38,   38,   38,   38,   38

    } ;

static yyconst short int yy_chk[68] =

    {   0,

        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,

        1,    1,    1,    1,    1,    1,    1,    1,    8,   14,

       14,   16,   16,   17,   17,   22,   24,   33,   33,   40,

       20,   19,    8,   15,   12,   11,   10,    7,    3,   22,

       24,   39,   39,   39,   41,   41,   42,   42,   38,   38,

       38,   38,   38,   38,   38,   38,   38,   38,   38,   38,

       38,   38,   38,   38,   38,   38,   38

    } ;

static yy_state_type yy_last_accepting_state;

static char *yy_last_accepting_cpos;

/* The intent behind this definition is that it'll catch

 * any uses of REJECT which flex missed.

 */

#define REJECT reject_used_but_not_detected

#define yymore() yymore_used_but_not_detected

#define YY_MORE_ADJ 0

#define YY_RESTORE_YY_MORE_OFFSET

char *yytext;

#line 1 "../../../gmp/demos/calc/calclex.l"

#define INITIAL 0

/* Lexical analyzer for calc program.

Copyright 2000-2002 Free Software Foundation, Inc.

This file is part of the GNU MP Library.

This program is free software; you can redistribute it and/or modify it under

the terms of the GNU General Public License as published by the Free Software

Foundation; either version 3 of the License, or (at your option) any later

version.

This program is distributed in the hope that it will be useful, but WITHOUT ANY

WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A

PARTICULAR PURPOSE.  See the GNU General Public License for more details.

You should have received a copy of the GNU General Public License along with

this program.  If not, see https://www.gnu.org/licenses/.  */

#line 20 "../../../gmp/demos/calc/calclex.l"

#include <string.h>

#include "calc-common.h"

#if WITH_READLINE

/* Let GNU flex use readline.  See the calcread.c redefined input() for a

   way that might work for a standard lex too.  */

#define YY_INPUT(buf,result,max_size)   \

  result = calc_input (buf, max_size);

#endif

/* Non-zero when reading the second or subsequent line of an expression,

   used to give a different prompt when using readline.  */

int  calc_more_input = 0;

const struct calc_keywords_t  calc_keywords[] = {

  { "abs",       ABS },

  { "bin",       BIN },

  { "decimal",   DECIMAL },

  { "fib",       FIB },

  { "hex",       HEX },

  { "help",      HELP },

  { "gcd",       GCD },

  { "kron",      KRON },

  { "lcm",       LCM },

  { "lucnum",    LUCNUM },

  { "nextprime", NEXTPRIME },

  { "powm",      POWM },

  { "quit",      QUIT },

  { "root",      ROOT },

  { "sqrt",      SQRT },

  { NULL }

};

#line 448 "calclex.c"

/* Macros after this point can all be overridden by user definitions in

 * section 1.

 */

#ifndef YY_SKIP_YYWRAP

#ifdef __cplusplus

extern "C" int yywrap YY_PROTO(( void ));

#else

extern int yywrap YY_PROTO(( void ));

#endif

#endif

#ifndef YY_NO_UNPUT

static void yyunput YY_PROTO(( int c, char *buf_ptr ));

#endif

#ifndef yytext_ptr

static void yy_flex_strncpy YY_PROTO(( char *, yyconst char *, int ));

#endif

#ifdef YY_NEED_STRLEN

static int yy_flex_strlen YY_PROTO(( yyconst char * ));

#endif

#ifndef YY_NO_INPUT

#ifdef __cplusplus

static int yyinput YY_PROTO(( void ));

#else

static int input YY_PROTO(( void ));

#endif

#endif

#if YY_STACK_USED

static int yy_start_stack_ptr = 0;

static int yy_start_stack_depth = 0;

static int *yy_start_stack = 0;

#ifndef YY_NO_PUSH_STATE

static void yy_push_state YY_PROTO(( int new_state ));

#endif

#ifndef YY_NO_POP_STATE

static void yy_pop_state YY_PROTO(( void ));

#endif

#ifndef YY_NO_TOP_STATE

static int yy_top_state YY_PROTO(( void ));

#endif

#else

#define YY_NO_PUSH_STATE 1

#define YY_NO_POP_STATE 1

#define YY_NO_TOP_STATE 1

#endif

#ifdef YY_MALLOC_DECL

YY_MALLOC_DECL

#else

#if __STDC__

#ifndef __cplusplus

#include <stdlib.h>

#endif

#else

/* Just try to get by without declaring the routines.  This will fail

 * miserably on non-ANSI systems for which sizeof(size_t) != sizeof(int)

 * or sizeof(void*) != sizeof(int).

 */

#endif

#endif

/* Amount of stuff to slurp up with each read. */

#ifndef YY_READ_BUF_SIZE

#define YY_READ_BUF_SIZE 8192

#endif

/* Copy whatever the last rule matched to the standard output. */

#ifndef ECHO

/* This used to be an fputs(), but since the string might contain NUL's,

 * we now use fwrite().

 */

#define ECHO (void) fwrite( yytext, yyleng, 1, yyout )

#endif

/* Gets input and stuffs it into "buf".  number of characters read, or YY_NULL,

 * is returned in "result".

 */

#ifndef YY_INPUT

#define YY_INPUT(buf,result,max_size) \

	if ( yy_current_buffer->yy_is_interactive ) \

		{ \

		int c = '*', n; \

		for ( n = 0; n < max_size && \

			     (c = getc( yyin )) != EOF && c != '\n'; ++n ) \

			buf[n] = (char) c; \

		if ( c == '\n' ) \

			buf[n++] = (char) c; \

		if ( c == EOF && ferror( yyin ) ) \

			YY_FATAL_ERROR( "input in flex scanner failed" ); \

		result = n; \

		} \

	else if ( ((result = fread( buf, 1, max_size, yyin )) == 0) \

		  && ferror( yyin ) ) \

		YY_FATAL_ERROR( "input in flex scanner failed" );

#endif

/* No semi-colon after return; correct usage is to write "yyterminate();" -

 * we don't want an extra ';' after the "return" because that will cause

 * some compilers to complain about unreachable statements.

 */

#ifndef yyterminate

#define yyterminate() return YY_NULL

#endif

/* Number of entries by which start-condition stack grows. */

#ifndef YY_START_STACK_INCR

#define YY_START_STACK_INCR 25

#endif

/* Report a fatal error. */

#ifndef YY_FATAL_ERROR

#define YY_FATAL_ERROR(msg) yy_fatal_error( msg )

#endif

/* Default declaration of generated scanner - a define so the user can

 * easily add parameters.

 */

#ifndef YY_DECL

#define YY_DECL int yylex YY_PROTO(( void ))

#endif

/* Code executed at the beginning of each rule, after yytext and yyleng

 * have been set up.

 */

#ifndef YY_USER_ACTION

#define YY_USER_ACTION

#endif

/* Code executed at the end of each rule. */

#ifndef YY_BREAK

#define YY_BREAK break;

#endif

#define YY_RULE_SETUP \

	YY_USER_ACTION

YY_DECL

	{

	yy_state_type yy_current_state;

	char *yy_cp, *yy_bp;

	int yy_act;

#line 57 "../../../gmp/demos/calc/calclex.l"

#line 602 "calclex.c"

	if ( yy_init )

		{

		yy_init = 0;

#ifdef YY_USER_INIT

		YY_USER_INIT;

#endif

		if ( ! yy_start )

			yy_start = 1;	/* first start state */

		if ( ! yyin )

			yyin = stdin;

		if ( ! yyout )

			yyout = stdout;

		if ( ! yy_current_buffer )

			yy_current_buffer =

				yy_create_buffer( yyin, YY_BUF_SIZE );

		yy_load_buffer_state();

		}

	while ( 1 )		/* loops until end-of-file is reached */

		{

		yy_cp = yy_c_buf_p;

		/* Support of yytext. */

		*yy_cp = yy_hold_char;

		/* yy_bp points to the position in yy_ch_buf of the start of

		 * the current run.

		 */

		yy_bp = yy_cp;

		yy_current_state = yy_start;

yy_match:

		do

			{

			YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)];

			if ( yy_accept[yy_current_state] )

				{

				yy_last_accepting_state = yy_current_state;

				yy_last_accepting_cpos = yy_cp;

				}

			while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )

				{

				yy_current_state = (int) yy_def[yy_current_state];

				if ( yy_current_state >= 39 )

					yy_c = yy_meta[(unsigned int) yy_c];

				}

			yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];

			++yy_cp;

			}

		while ( yy_base[yy_current_state] != 49 );

yy_find_action:

		yy_act = yy_accept[yy_current_state];

		if ( yy_act == 0 )

			{ /* have to back up */

			yy_cp = yy_last_accepting_cpos;

			yy_current_state = yy_last_accepting_state;

			yy_act = yy_accept[yy_current_state];

			}

		YY_DO_BEFORE_ACTION;

do_action:	/* This label is used only to access EOF actions. */

		switch ( yy_act )

	{ /* beginning of action switch */

			case 0: /* must back up */

			/* undo the effects of YY_DO_BEFORE_ACTION */

			*yy_cp = yy_hold_char;

			yy_cp = yy_last_accepting_cpos;

			yy_current_state = yy_last_accepting_state;

			goto yy_find_action;

case 1:

YY_RULE_SETUP

#line 59 "../../../gmp/demos/calc/calclex.l"

{ /* white space is skipped */ }

	YY_BREAK

case 2:

YY_RULE_SETUP

#line 61 "../../../gmp/demos/calc/calclex.l"

{ /* semicolon or newline separates statements */

          calc_more_input = 0;

          return EOS; }

	YY_BREAK

case 3:

YY_RULE_SETUP

#line 64 "../../../gmp/demos/calc/calclex.l"

{ /* escaped newlines are skipped */ }

	YY_BREAK

case 4:

YY_RULE_SETUP

#line 67 "../../../gmp/demos/calc/calclex.l"

{

            /* comment through to escaped newline is skipped */ }

	YY_BREAK

case 5:

YY_RULE_SETUP

#line 69 "../../../gmp/demos/calc/calclex.l"

{ /* comment through to newline is a separator */

            calc_more_input = 0;

            return EOS; }

	YY_BREAK

case 6:

YY_RULE_SETUP

#line 72 "../../../gmp/demos/calc/calclex.l"

{   /* comment through to EOF skipped */ }

	YY_BREAK

case 7:

YY_RULE_SETUP

#line 75 "../../../gmp/demos/calc/calclex.l"

{ return yytext[0]; }

	YY_BREAK

case 8:

YY_RULE_SETUP

#line 76 "../../../gmp/demos/calc/calclex.l"

{ return LE; }

	YY_BREAK

case 9:

YY_RULE_SETUP

#line 77 "../../../gmp/demos/calc/calclex.l"

{ return GE; }

	YY_BREAK

case 10:

YY_RULE_SETUP

#line 78 "../../../gmp/demos/calc/calclex.l"

{ return EQ; }

	YY_BREAK

case 11:

YY_RULE_SETUP

#line 79 "../../../gmp/demos/calc/calclex.l"

{ return NE; }

	YY_BREAK

case 12:

YY_RULE_SETUP

#line 80 "../../../gmp/demos/calc/calclex.l"

{ return LSHIFT; }

	YY_BREAK

case 13:

YY_RULE_SETUP

#line 81 "../../../gmp/demos/calc/calclex.l"

{ return RSHIFT; }

	YY_BREAK

case 14:

YY_RULE_SETUP

#line 82 "../../../gmp/demos/calc/calclex.l"

{ return LAND; }

	YY_BREAK

case 15:

YY_RULE_SETUP

#line 83 "../../../gmp/demos/calc/calclex.l"

{ return LOR; }

	YY_BREAK

case 16:

YY_RULE_SETUP

#line 85 "../../../gmp/demos/calc/calclex.l"

{

        yylval.str = yytext;

        return NUMBER; }

	YY_BREAK

case 17:

YY_RULE_SETUP

#line 89 "../../../gmp/demos/calc/calclex.l"

{

        int  i;

        for (i = 0; calc_keywords[i].name != NULL; i++)

          if (strcmp (yytext, calc_keywords[i].name) == 0)

            return calc_keywords[i].value;

        if (yytext[0] >= 'a' && yytext[0] <= 'z' && yytext[1] == '\0')

          {

            yylval.var = yytext[0] - 'a';

            return VARIABLE;

          }

        return BAD;

}

	YY_BREAK

case 18:

YY_RULE_SETUP

#line 105 "../../../gmp/demos/calc/calclex.l"

{ return BAD; }

	YY_BREAK

case 19:

YY_RULE_SETUP

#line 107 "../../../gmp/demos/calc/calclex.l"

ECHO;

	YY_BREAK

#line 801 "calclex.c"

case YY_STATE_EOF(INITIAL):

	yyterminate();

	case YY_END_OF_BUFFER:

		{

		/* Amount of text matched not including the EOB char. */

		int yy_amount_of_matched_text = (int) (yy_cp - yytext_ptr) - 1;

		/* Undo the effects of YY_DO_BEFORE_ACTION. */

		*yy_cp = yy_hold_char;

		YY_RESTORE_YY_MORE_OFFSET

		if ( yy_current_buffer->yy_buffer_status == YY_BUFFER_NEW )

			{

			/* We're scanning a new file or input source.  It's

			 * possible that this happened because the user

			 * just pointed yyin at a new source and called

			 * yylex().  If so, then we have to assure

			 * consistency between yy_current_buffer and our

			 * globals.  Here is the right place to do so, because

			 * this is the first action (other than possibly a

			 * back-up) that will match for the new input source.

			 */

			yy_n_chars = yy_current_buffer->yy_n_chars;

			yy_current_buffer->yy_input_file = yyin;

			yy_current_buffer->yy_buffer_status = YY_BUFFER_NORMAL;

			}

		/* Note that here we test for yy_c_buf_p "<=" to the position

		 * of the first EOB in the buffer, since yy_c_buf_p will

		 * already have been incremented past the NUL character

		 * (since all states make transitions on EOB to the

		 * end-of-buffer state).  Contrast this with the test

		 * in input().

		 */

		if ( yy_c_buf_p <= &yy_current_buffer->yy_ch_buf[yy_n_chars] )

			{ /* This was really a NUL. */

			yy_state_type yy_next_state;

			yy_c_buf_p = yytext_ptr + yy_amount_of_matched_text;

			yy_current_state = yy_get_previous_state();

			/* Okay, we're now positioned to make the NUL

			 * transition.  We couldn't have

			 * yy_get_previous_state() go ahead and do it

			 * for us because it doesn't know how to deal

			 * with the possibility of jamming (and we don't

			 * want to build jamming into it because then it

			 * will run more slowly).

			 */

			yy_next_state = yy_try_NUL_trans( yy_current_state );

			yy_bp = yytext_ptr + YY_MORE_ADJ;

			if ( yy_next_state )

				{

				/* Consume the NUL. */

				yy_cp = ++yy_c_buf_p;

				yy_current_state = yy_next_state;

				goto yy_match;

				}

			else

				{

				yy_cp = yy_c_buf_p;

				goto yy_find_action;

				}

			}

		else switch ( yy_get_next_buffer() )

			{

			case EOB_ACT_END_OF_FILE:

				{

				yy_did_buffer_switch_on_eof = 0;

				if ( yywrap() )

					{

					/* Note: because we've taken care in