#ifndef __PARSER_H__
#define __PARSER_H__
+/* global variables */
+
+extern double answer;
+
/* function type */
typedef enum {
- Val = 0, Set,
+ Val = 0, Sig,
Add, Sub,
- Mul, Div, Pow,
- Sqr,
- Cos, Sin, Atn,
- Log, Exp
+ Mul, Div, Mod,
+ Pow, Sqr,
+ Cos, Sin, Tan, Acos, Asin, Atan,
+ Log, Exp,
+ Abs, Ceil, Floor,
+ Store, Recall, Inc, Dec, Disp, Mem, Clear,
+ Quit, Help,
+ Ans, E, Pi,
+ Equal, Diff, Ge, Le, Gt, Lt,
+ And, Or, Not,
+ Cond, While, Code, Print,
+ Prog, Call, List, Edit, Del
} func_t;
/* keyword type */
func_t func;
int nbops;
int offset;
- int prio;
+ float prio;
} keyword_t;
/* calculus element type */
-#define MAX_OPERANDS 10
typedef struct _element_t {
func_t func;
int nbops;
- struct _element_t *ops[MAX_OPERANDS];
- float value;
+ struct _element_t **ops;
+ double value;
int prio;
+ int hidden;
+ char *string;
} element_t;
#define ERROR_OP ((element_t *)(-1))
+/* workspace type */
+
+typedef struct _workspace_t {
+ int id;
+ double answer;
+ double *storage;
+ int storage_size;
+ element_t *root;
+ char *string;
+} workspace_t;
+
/* parser function */
+void delelement (element_t *root);
+
element_t *parser (char *str, char **next, int prio);
void print_element (element_t *root, int level);
+double evaluate_element (element_t *root, char mask);
+
+/* completion functions */
+
+char **generate_completion_list ();
+
+void free_completion_list (char **list);
+
+/* print function */
+
+void set_format (char *prompt, int precision);
+
+void free_format ();
+
+double print (double value);
+
#endif /* __PARSER_H__ */
/* vim: set ts=4 sw=4 et: */