use tab_t for argument
[calc.git] / program.h
index 8fdca142c58a6085e4ede4503354fa56e7fc05ed..d830b7f1f57ce46d0b8e8e18d4ec3d74f5cbe13f 100644 (file)
--- a/program.h
+++ b/program.h
@@ -2,24 +2,19 @@
 #define __PROGRAM_H__
 
 #include "element.h"
+#include "tabular.h"
 
 /* global variables */
 
-extern int argument_size;
-extern double *argument;
-
 /* workspace type */
 
 typedef struct _workspace_t {
-    int id;
     double answer;
-    double *storage;
-    int storage_size;
-    double *argument;
-    int argument_size;
+    tab_t *argument;
+    int id;
     element_t *root;
-    double *stack;
-    int stack_size;
+    tab_t *stack;
+    tab_t *storage;
     char *string;
 } workspace_t;
 
@@ -29,7 +24,6 @@ extern int nb_programs;
 /* program function */
 
 void prog (int id, element_t *root);
-double arg (int id);
 double call (int id, int nbargs, element_t **args);
 void list ();
 void edit (int id);