please dont rip this site
#if !defined( __PARSE_HPP )
#define __PARSE_HPP

// This block was taken from owldefs.h
#if defined(__cplusplus)
typedef int	    &		Rint;
typedef int	    *		Pint;
typedef void	    *		Pvoid;
typedef void	    *  &	RPvoid;
typedef char	    *		Pchar;
typedef const char  *		PCchar;
typedef const void  *		PCvoid;
#endif


int level;

/*-----------------------------------------------*/
enum PS_state           // Parse & Search States
{
  PS_null,
  PS_have_left_operand,
  PS_search_end,
  PS_search_more,
  PS_search_closed,
  PS_peeking_ahead,
  PS_stop_peeking

};

PS_state result;

extern PS_state search(PS_state);
extern PS_state parse(PS_state);
extern void db_error(int );

enum classType
{
  token_Class,
  BOPH_Class,
  BOPL_Class,
  UOP_Class,
  FOP_Class,
  variable_Class,
  function_Class,
  open_parenthesis_Class,
  closed_parenthesis_Class,
  null_token_Class
};

enum token_types
{
  TT_operand,
  TT_unary_operator,
  TT_binary_operator,
  TT_post_unary,
  TT_parenthesis
};

class token;
token *the_array[100];
token *the_stack[100];
token *function_list[100];
token *variable_list[100];
double numeric_stack[100];
int token_index=0,t1=0,stack_index=0,numeric_stack_index=0;
int number_of_functions, number_of_variables;


//------------------
// The "token" class is the base class for all of the objects.
//
// variables:
//    token_types    
// Member Functions:
//    get_type()     an in-line function that returns the value 

class token 
{
public:
  token_types type;   // Keeps track of the type of the tokens that are derived from this class.
  token_types get_type(void) { return type;}

  virtual classType isA() const { return token_Class; }
  virtual char * nameOf() const { return "token"; }

  //  virtual int isEqual( RCObject Atoken ) const { return 1;}
  //virtual void printOn(Rostream outputStream) const { outputStream << "()"; }
  virtual void printOn() const { cout << "()"; }

  void numeric_push(double v) {numeric_stack[numeric_stack_index++] = v;}
  double numeric_pop(void) { return(numeric_stack[--numeric_stack_index]);}
  virtual void execute(void) { numeric_stack[99] = 99; }
  virtual void push(void)
    {  the_stack[stack_index++] = this;}

  virtual PS_state  a_search(PS_state state)
  {
    push();
    if(state == PS_peeking_ahead)
      return(PS_peeking_ahead);
    else
      return(PS_have_left_operand);
  }

};


class null_token : public token
{
public:
  virtual classType isA() const { return null_token_Class; }
  virtual char * nameOf() const { return "null_token"; }
  //virtual int isEqual( RCObject Anull_token ) const  { return 1; }
  //virtual void printOn(Rostream outputStream) const 
  //  { outputStream << ' '; }
  virtual void printOn() const  { cout << ' '; }


  virtual PS_state  a_search(PS_state state)
  {
      return(PS_search_end);
  }
};


class function : public token
{
public:
  function(void) { type = TT_unary_operator; }
  virtual classType isA() const { return function_Class; }
  virtual char * nameOf() const { return "function"; }
  //virtual int isEqual( RCObject Afunction ) const
  //  { return strcmp(nameOf(), Afunction.nameOf()) == 0; }
  //virtual void printOn(Rostream outputStream) const 
  //  { outputStream << nameOf(); }
  virtual void printOn() const  { cout << nameOf(); }


  virtual PS_state  a_search(PS_state state)
  {
    the_array[t1++]->a_search(PS_null);

    push();
    if(state == PS_peeking_ahead)
      return(PS_peeking_ahead);
    else
      return(PS_have_left_operand);
  }
};


class BOPH : public token
{
public:
  BOPH(void) { type = TT_binary_operator; }
  virtual char get_ASCII(void) const { return ' '; }
  virtual classType isA() const { return BOPH_Class; }
  virtual Pchar nameOf() const { return "BOPH"; }
  //virtual int isEqual( RCObject ABOPH ) const
  //  { return get_ASCII() == ((RBOPH)ABOPH).get_ASCII(); }
  //virtual void printOn(Rostream outputStream) const 
  //  { outputStream << get_ASCII(); }
  virtual void printOn() const  { cout << get_ASCII(); }

  virtual PS_state  a_search(PS_state state)
  {
    result = the_array[t1++]->a_search(state);
    push();
    if(state == PS_peeking_ahead)
      return(PS_peeking_ahead);
    else
      return(result);
  }
};

class UOP : public token
{
public:
  UOP(void) { type = TT_unary_operator; }
  virtual char get_ASCII(void) const { return ' '; }
  virtual classType isA() const { return UOP_Class; }
  virtual char * nameOf() const { return "UOP"; }
  //virtual int isEqual( RCObject AUOP ) const
  //  { return get_ASCII() == ((RUOP)AUOP).get_ASCII(); }
  //virtual void printOn(Rostream outputStream) const 
  //  { outputStream << get_ASCII() << 'U'; }
  virtual void printOn() const  { cout << get_ASCII() << 'U'; }

  virtual PS_state  a_search(PS_state state)
  {
    result = the_array[t1++]->a_search(state);
    push();
    return(result);
  }
};


class BOPL : public token
{
public:
  BOPL(void) { type = TT_binary_operator; }
  virtual char get_ASCII(void) const { return ' '; }
  virtual classType isA() const { return BOPL_Class; }
  virtual char * nameOf() const { return "BOPL"; }
  //virtual int isEqual( RCObject ABOPL ) const
  //  { return get_ASCII() == ((RBOPL)ABOPL).get_ASCII(); }
  //virtual void printOn(Rostream outputStream) const 
  //  { outputStream << get_ASCII(); }
  virtual void printOn() const   { cout << get_ASCII(); }

  virtual PS_state  a_search(PS_state state)
  {
    if(state == PS_have_left_operand)
    {
      do
      {
	result = the_array[t1++]->a_search(PS_peeking_ahead);
      } while(result == PS_peeking_ahead);

      push();
    }
    else if (state == PS_peeking_ahead)
    {
      t1--;
      return(PS_have_left_operand);
    }
    else
    {
      db_error(5);
    }
    return(result);
  }
};

class FOP : public token
{
public:
  double t;
  FOP(double new_t=0) { t = new_t;  type = TT_operand; }
  FOP(char* str);
  virtual classType isA() const { return FOP_Class; }
  virtual char * nameOf() const { return "FOP"; }
  //virtual int isEqual( RCObject AFOP ) const
  //  { return t == ((RFOP)AFOP).t; }
  //virtual void printOn(Rostream outputStream) const 
  //  { outputStream << t; }
  virtual void printOn() const  { cout << t; }

  virtual void execute(void) { numeric_push(t); }
  virtual PS_state  a_search(PS_state state)
  {
    push();
    if(state == PS_peeking_ahead)
      return(PS_peeking_ahead);
    else
      return(PS_have_left_operand);
  }

};


class variable : public token
{
public:
  double value;
  char length;
  char *name_ptr;
  variable(char * new_val_ptr);
  virtual classType isA() const { return variable_Class; }
  virtual char * nameOf() const { return name_ptr; }
  /*  virtual int isEqual( RCObject Avariable ) const
    { if (name_ptr)
	return length == strspn(((Rvariable)Avariable).name_ptr, name_ptr);
      else
	return length == *((Rvariable)Avariable).name_ptr;
    }
  */
  virtual void printOn() const 
    { if (name_ptr)
	cout << name_ptr;
      else
	cout << length;
    }


  virtual PS_state  a_search(PS_state state)
  {
    push();
    if(state == PS_peeking_ahead)
      return(PS_peeking_ahead);
    else
      return(PS_have_left_operand);
  }
  virtual void execute(void) { numeric_push(value); }
};


class open_parenthesis : public token
{
public:
  char p;
  open_parenthesis(char ch) { p = ch; type = TT_parenthesis; }
  virtual classType isA() const { return open_parenthesis_Class; }
  virtual char * nameOf() const { return "open_parenthesis"; }
  /*  virtual int isEqual( RCObject Aopen_parenthesis ) const
    { return p == ((Ropen_parenthesis)Aopen_parenthesis).p; }
  */
  virtual void printOn() const  { cout <<  p; }

  virtual PS_state  a_search(PS_state state)
  {
    level++;
    parse(PS_null);
    if(state == PS_peeking_ahead)
      return(PS_peeking_ahead);
    else
      return(PS_have_left_operand);
  }

};


class closed_parenthesis : public token
{
public:
  char p;
  closed_parenthesis(char ch) { p = ch; type = TT_parenthesis; }
  virtual classType isA() const { return closed_parenthesis_Class; }
  virtual char * nameOf() const { return "closed_parenthesis"; }
  /*  virtual int isEqual( RCObject Aclosed_parenthesis ) const
    { return p == ((Rclosed_parenthesis)Aclosed_parenthesis).p; }
  */
  virtual void printOn() const  { cout <<  p; }

  virtual PS_state  a_search(PS_state state)
  {
    level--;
    if((state != PS_have_left_operand) &&
       (state != PS_peeking_ahead))
          db_error(6);
    return(PS_search_closed);
  }

};

#endif    //  __PARSE_HPP

See also:


file: /Techref/language/ccpp/parser_h.htm, 44KB, , updated: 2001/5/2 11:06, local time: 2018/7/21 07:13,
TOP NEW HELP FIND: 
54.224.2.123:LOG IN

 ©2018 These pages are served without commercial sponsorship. (No popup ads, etc...).Bandwidth abuse increases hosting cost forcing sponsorship or shutdown. This server aggressively defends against automated copying for any reason including offline viewing, duplication, etc... Please respect this requirement and DO NOT RIP THIS SITE. Questions?
Please DO link to this page! Digg it! / MAKE! / 

<A HREF="http://www.piclist.com/techref/language/ccpp/parser_h.htm"> Colorized Source Code</A>

After you find an appropriate page, you are invited to your to this massmind site! (posts will be visible only to you before review) Just type in the box and press the Post button. (HTML welcomed, but not the <A tag: Instead, use the link box to link to another page. A tutorial is available Members can login to post directly, become page editors, and be credited for their posts.


Link? Put it here: 
if you want a response, please enter your email address: 
Attn spammers: All posts are reviewed before being made visible to anyone other than the poster.
Did you find what you needed?

  PICList 2018 contributors:
o List host: MIT, Site host massmind.org, Top posters @20180721 RussellMc, Van Horn, David, Sean Breheny, David C Brown, Isaac M. Bavaresco, Bob Blick, Neil, Denny Esterline, John Gardner, Brent Brown,
* Page Editors: James Newton, David Cary, and YOU!
* Roman Black of Black Robotics donates from sales of Linistep stepper controller kits.
* Ashley Roll of Digital Nemesis donates from sales of RCL-1 RS232 to TTL converters.
* Monthly Subscribers: Gregg Rew. on-going support is MOST appreciated!
* Contributors: Richard Seriani, Sr.
 

Welcome to www.piclist.com!

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

  .