X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=www%2Fwinterp.h;h=d69ede1f1247ed8a5f1ca0ad9db191dba4bc7a02;hb=25db261b6bbbfcc7bc26f679f195b51d31b9d7d7;hp=1519e4842e82f25b741801b13f5e74d53dbf9644;hpb=a6f3beb071fe8c894ee6c846c86296c84f48e3d4;p=egate.git

diff --git a/www/winterp.h b/www/winterp.h
index 1519e48..d69ede1 100644
--- a/www/winterp.h
+++ b/www/winterp.h
@@ -41,7 +41,14 @@
  * USE OR PERFORMANCE OF THIS SOFTWARE.
  *
  * $Log: winterp.h,v $
- * Revision 1.3  1995/10/27 15:12:07  adam
+ * Revision 1.5  1996/02/29 15:39:01  adam
+ * Bug fix: load_state macro invoked save_state method and vice versa!
+ *
+ * Revision 1.4  1995/11/06  17:44:22  adam
+ * State reestablised when shell restarts. History of previous
+ * result sets.
+ *
+ * Revision 1.3  1995/10/27  15:12:07  adam
  * IrTcl incorporated in the gateway.
  * Better separation of script types.
  * Z39.50 gateway scripts entered.
@@ -63,6 +70,8 @@ typedef struct w_interp_type {
     char  *name;
     void  *(*create)(WCLIENT wcl, void *args);
     int   (*exec)(const char *fname, char *parms, void *private);
+    int   (*load_state)(char *parms, void *private);
+    int   (*save_state)(char *parms, void *private);
 } *W_Interp_Type;
 
 typedef struct w_interp {
@@ -72,6 +81,10 @@ typedef struct w_interp {
     
 W_Interp w_interp_create (W_Interp_Type type, WCLIENT wcl, void *args);
 #define w_interp_exec(w,f,p) (*(w)->ctrl->exec)((f),(p), (w)->mydata)
+#define w_interp_load_state(w,p) (*(w)->ctrl->load_state)((p), (w)->mydata)
+#define w_interp_save_state(w,p) (*(w)->ctrl->save_state)((p), (w)->mydata)
 #define w_interp_name(w) ((w)->ctrl.name)
 
+void wshmain (int argc, char **argv, W_Interp_Type w_interp_type);
+
 #endif