X-Git-Url: https://secure.softndesign.org/git/?a=blobdiff_plain;f=parser.h;h=4907c67699a74dc69f5655065e5165df7ae8b072;hb=c7cbb833c65805634f6e9832b49e4a4680a4a4a6;hp=767fcf08bdc848c6005157f22368744e5b9e7ea7;hpb=ef37d966deba005de9def3ef3301634fe918c793;p=calc.git

diff --git a/parser.h b/parser.h
index 767fcf0..4907c67 100644
--- a/parser.h
+++ b/parser.h
@@ -1,15 +1,27 @@
 #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, Prog, Print,
+    Prog, Call, List, Edit, Del
 } func_t;
 
 /* keyword type */
@@ -19,28 +31,55 @@ typedef struct _keyword_t {
     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;
 } element_t;
 
 #define ERROR_OP ((element_t *)(-1))
 
+/* workspace type */
+
+typedef struct _workspace_t {
+    int id;
+    double answer;
+    double *storage;
+    element_t *root;
+} 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: */