parser.h

   1 #ifndef __PARSER_H__
   2 #define __PARSER_H__
   3
   4 /* global variables */
   5
   6 extern double answer;
   7
   8 /* function type */
   9
  10 typedef enum {
  11     Val = 0, Sig,
  12     Add, Sub,
  13     Mul, Div, Mod,
  14     Pow, Sqr,
  15     Cos, Sin, Tan, Acos, Asin, Atan,
  16     Ln, Log, Exp,
  17     Erfc, Erf,
  18     Abs, Ceil, Floor,
  19     Store, Recall, Inc, Dec, Disp, Mem, Clear,
  20     Quit, Help,
  21     Ans, E, Pi,
  22     Equal, Diff, Ge, Le, Gt, Lt,
  23     And, Or, Not,
  24     Cond, While, Code, Print,
  25     Prog, Arg, Call, List, Edit, Del,
  26     Get, Length, Pop, Push, Put, Set, Show
  27 } func_t;
  28
  29 /* keyword type */
  30
  31 typedef struct _keyword_t {
  32     char *keyword;
  33     func_t func;
  34     int nbops;
  35     int offset;
  36     float prio;
  37 } keyword_t;
  38
  39 /* calculus element type */
  40
  41 typedef struct _element_t {
  42     func_t func;
  43     int nbops;
  44     struct _element_t **ops;
  45     double value;
  46     int prio;
  47     int hidden;
  48     char *string;
  49 } element_t;
  50
  51 #define ERROR_OP ((element_t *)(-1))
  52
  53 /* workspace type */
  54
  55 typedef struct _workspace_t {
  56     int id;
  57     double answer;
  58     double *storage;
  59     int storage_size;
  60     double *argument;
  61     int argument_size;
  62     element_t *root;
  63     double *stack;
  64     int stack_size;
  65     char *string;
  66 } workspace_t;
  67
  68 /* parser function */
  69
  70 void delelement (element_t *root);
  71
  72 element_t *parser (char *str, char **next, int prio);
  73
  74 void print_element (element_t *root, int level);
  75
  76 double evaluate_element (element_t *root, char mask);
  77
  78 /* completion functions */
  79
  80 char **generate_completion_list ();
  81
  82 void free_completion_list (char **list);
  83
  84 /* print function */
  85
  86 void set_format (char *prompt, int precision);
  87
  88 void free_format ();
  89
  90 double print (double value);
  91
  92 #endif /* __PARSER_H__ */
  93
  94 /* vim: set ts=4 sw=4 et: */