--- parser3/src/include/pa_stack.h	2001/02/21 17:36:30	1.1
+++ parser3/src/include/pa_stack.h	2002/08/01 11:26:48	1.15
@@ -1,37 +1,44 @@
-/*
-  $Id: pa_stack.h,v 1.1 2001/02/21 17:36:30 paf Exp $
+/** @file
+	Parser: stack class decl.
+
+	Copyright (c) 2001, 2002 ArtLebedev Group (http://www.artlebedev.com)
+	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
 */
 
 #ifndef PA_STACK_H
 #define PA_STACK_H
 
+static const char* IDENT_STACK_H="$Id: pa_stack.h,v 1.15 2002/08/01 11:26:48 paf Exp $";
+
+#include "pa_config_includes.h"
 #include "pa_array.h"
 
+/// simple stack based on Array
 class Stack : public Array {
 public:
 
-	Stack(Pool& apool) : Array(apool), top(0) {
+	Stack(Pool& apool) : Array(apool), ftop(0) {
 	}
 
 	void push(Item *item) {
-		if(top<size()) // cell is already allocated?
-			put(top, item); // use it
+		if(ftop<size()) // cell is already allocated?
+			put(ftop, item); // use it
 		else
 			*this+=item; // append it
-		top++;
+		ftop++;
 	}
 	Item *pop() {
-		return get(--top);
+		return get(--ftop);
 	}
 
-	Item *operator [] (int top_offset) {
-		return get(top-top_offset-1);
-	}
+	int top_index() { return ftop-1; }
+	void top_index(int top_index) { ftop=top_index+1; }
+	Item *top_value() { return get(top_index()); }
 
 private:
 
 	// deepest used index
-	int top;
+	int ftop;
 
 };