X-Git-Url: https://secure.softndesign.org/git/?a=blobdiff_plain;f=parser.h;h=27bc1e1843c2fc9f4fbd027de38a3d59b5fe39bc;hb=c22798f02269ad4ee36c8f01c76f078ba8908bfa;hp=7d486a330c764bc3aecd2bbe32e01eb79a85b5bf;hpb=0b489a77ab06263674d1f4376c3bf6c2ead42cd6;p=calc.git

diff --git a/parser.h b/parser.h
index 7d486a3..27bc1e1 100644
--- a/parser.h
+++ b/parser.h
@@ -1,15 +1,30 @@
 #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,
+    Ln, Log, Exp,
+    Erfc, Erf,
+    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, Arg, Call, List, Edit, Del,
+    Get, Length, Pop, Push, Put, Set, Show,
+    Max, Mean, Median, Min, Order, Prod, Sum, Variance
 } func_t;
 
 /* keyword type */
@@ -19,26 +34,62 @@ typedef struct _keyword_t {
     func_t func;
     int nbops;
     int offset;
+    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;
+    double *argument;
+    int argument_size;
+    element_t *root;
+    double *stack;
+    int stack_size;
+    char *string;
+} workspace_t;
+
 /* parser function */
 
-element_t *parser (char *str, char **next);
+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: */