/[m4]/m4/m4/evalparse.c
ViewVC logotype

Diff of /m4/m4/evalparse.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3 by akim, Tue Aug 7 10:35:59 2001 UTC revision 1.4 by gary, Sun Aug 19 10:53:56 2001 UTC
# Line 92  static eval_error unary_term M4_PARAMS(( Line 92  static eval_error unary_term M4_PARAMS((
92  static eval_error simple_term M4_PARAMS((eval_token, number *));  static eval_error simple_term M4_PARAMS((eval_token, number *));
93  static void numb_pow M4_PARAMS((number *x, const number *y));  static void numb_pow M4_PARAMS((number *x, const number *y));
94    
95  /*--------------------.  
96  | Lexical functions.  |  
97  `--------------------*/  /* --- LEXICAL FUNCTIONS --- */
98    
99  /* Pointer to next character of input text.  */  /* Pointer to next character of input text.  */
100  static const unsigned char *eval_text;  static const unsigned char *eval_text;
# Line 288  eval_lex (number *val) Line 288  eval_lex (number *val)
288      }      }
289  }  }
290    
291  /*---------------------------------------.  /* Main entry point, called from "eval".  */
 | Main entry point, called from "eval".  |  
 `---------------------------------------*/  
   
292  boolean  boolean
293  m4_evaluate (struct obstack *obs, const char *expr, const int radix, int min)  m4_evaluate (struct obstack *obs, const char *expr, const int radix, int min)
294  {  {
# Line 358  m4_evaluate (struct obstack *obs, const Line 355  m4_evaluate (struct obstack *obs, const
355    return (boolean) (err != NO_ERROR);    return (boolean) (err != NO_ERROR);
356  }  }
357    
358  /*---------------------------.  /* Recursive descent parser.  */
 | Recursive descent parser.  |  
 `---------------------------*/  
   
359  static eval_error  static eval_error
360  logical_or_term (eval_token et, number *v1)  logical_or_term (eval_token et, number *v1)
361  {  {

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26