* USE OR PERFORMANCE OF THIS SOFTWARE.
*
* $Log: winterp.h,v $
- * Revision 1.3 1995/10/27 15:12:07 adam
+ * 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.
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 {
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->save_state)((p), (w)->mydata)
+#define w_interp_save_state(w,p) (*(w)->ctrl->load_state)((p), (w)->mydata)
#define w_interp_name(w) ((w)->ctrl.name)
#endif