--- parser3/src/include/pa_request.h	2001/01/29 21:51:51	1.2
+++ parser3/src/include/pa_request.h	2001/02/24 15:26:02	1.12
@@ -1,28 +1,85 @@
 /*
-  $Id: pa_request.h,v 1.2 2001/01/29 21:51:51 paf Exp $
+  $Id: pa_request.h,v 1.12 2001/02/24 15:26:02 paf Exp $
 */
 
 #ifndef PA_REQUEST_H
 #define PA_REQUEST_H
 
 #include "pa_pool.h"
-#include "pa_error.h"
+#include "pa_exception.h"
+#include "pa_hash.h"
+#include "pa_wcontext.h"
+#include "pa_value.h"
+#include "pa_stack.h"
+#include "pa_vclass.h"
+
+#define MAIN_METHOD_NAME "main"
+#define SELF_NAME "self"
+#define USES_NAME "USES"
+#define NAME_RUN "RUN"
+
+#ifndef NO_STRING_ORIGIN
+#	define COMPILE_PARAMS char *source, char *file
+#	define COMPILE(source, file) real_compile(source, file)
+#else
+#	define COMPILE_PARAMS char *source
+#	define COMPILE(source, file) real_compile(source)
+#endif
+
+class Local_request_exception;
 
-class Request {
+class Request : public Pooled {
 public:
 	
-	// all request' objects are allocated in this pool
-	// they die with request
-	Pool pool;
+	Request(Pool& apool) : Pooled(apool),
+		stack(apool),
+		fclasses(apool),
+		fclasses_array(apool)
+		{
+	}
+	~Request() {}
+
+	// global classes
+	Hash& classes() { return fclasses; }
+	Array& classes_array() { return fclasses_array; }
+
+	// core request processing
+	void core();
+
+private: // core data
+
+	// classes
+	Hash fclasses;
+	Array fclasses_array;
+
+	// contexts
+	Value *self, *root, *rcontext;
+	WContext *wcontext;
 	
-	// these errors handled on global(request) level
-	Error request_error;
+	// execution stack
+	Stack stack;
 
-	// these errors handled on local(operator) level
-	Error operator_error;
+public: // core.C
+
+	void use(char *file, String *name);
+
+private: // core.C
+
+	char *execute_MAIN();
+
+private: // compile.C
+
+	VClass& real_compile(COMPILE_PARAMS);
+
+private: // execute.C
+
+	void execute(const Array& ops);
+
+	Value *get_element();
 
-	Request() {}
-	~Request() {}
 };
 
+// core func
+void core();
+
 #endif