--- parser3/src/include/pa_string.h	2004/02/27 15:07:46	1.157
+++ parser3/src/include/pa_string.h	2005/11/22 15:09:10	1.166
@@ -1,17 +1,16 @@
 /** @file
 	Parser: string class decl.
 
-	Copyright (c) 2001-2004 ArtLebedev Group (http://www.artlebedev.com)
+	Copyright (c) 2001-2005 ArtLebedev Group (http://www.artlebedev.com)
 	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
 */
 
 #ifndef PA_STRING_H
 #define PA_STRING_H
 
-static const char * const IDENT_STRING_H="$Date: 2004/02/27 15:07:46 $";
+static const char * const IDENT_STRING_H="$Date: 2005/11/22 15:09:10 $";
 
 // includes
-
 #include "pa_types.h"
 #include "pa_array.h"
 
@@ -20,6 +19,8 @@ extern "C" { // cord's author forgot to
 #include "cord.h"
 };
 
+// defines
+
 // cord extension
 /* Returns true if x does contain                                       */
 /* char not_c at positions i..i+n. Value i,i+n must be < CORD_len(x).	*/
@@ -90,11 +91,11 @@ public:
 		L_HTTP_HEADER='h',    ///< text in HTTP response header
 		L_MAIL_HEADER='m',    ///< text in mail header
 		L_URI='U',       ///< text in uri
-		L_TABLE='L',     ///< ^table:set body
 		L_SQL='Q',       ///< ^table:sql body
 		L_JS='J',        ///< JavaScript code
 		L_XML='X',		///< ^dom:set xml
-		L_HTML='H',      ///< HTML code (for editing)
+		L_HTML='H',      ///< HTML code
+		L_REGEX='R',      ///< RegEx expression
 		// READ WARNING ABOVE BEFORE ADDING ANYTHING
 		L_OPTIMIZE_BIT = 0x80  ///< flag, requiring cstr whitespace optimization
 	};
@@ -108,8 +109,15 @@ public:
 	union Languages {
 
 		struct {
+#ifdef PA_LITTLE_ENDIAN
 			Language lang:8;
 			int is_not_just_lang:sizeof(CORD)*8-8;
+#elif defined(PA_BIG_ENDIAN)
+			int is_not_just_lang:sizeof(CORD)*8-8;
+			Language lang:8;
+#else
+#	error word endianness not determined for some obscure reason
+#endif
 		} opt;
 		CORD langs;
 
@@ -146,6 +154,7 @@ public:
 	public:
 
 		const char* v() const;
+		void dump() const;
 
 		Languages(): langs(0) {}
 		Languages(Language alang) {
@@ -234,7 +243,7 @@ public:
 				callback(opt.lang, get_length(current), info);
 		}
 
-		bool invariant(size_t current_length) {
+		bool invariant(size_t current_length) const {
 			if(!langs)
 				return current_length==0;
 			if(opt.is_not_just_lang)
@@ -250,6 +259,7 @@ public:
 	public:
 
 		const char* v() const;
+		void dump() const;
 
 		Body(): body(CORD_EMPTY) {}
 		Body(CORD abody): body(abody) {
@@ -321,11 +331,17 @@ public:
 			return CORD_chr(body, offset, c);
 		}
 
-		template<typename I> void for_each(
+		template<typename I> int for_each(
+			int (*f)(char c, I), 
+			I info) const {
+			return CORD_iter(body, (CORD_iter_fn)f, (void*)info);
+		}
+
+		template<typename I> int for_each(
 			int (*f1)(char c, I), 
 			int (*f2)(const char* s, I), 
 			I info) const {
-			CORD_iter5(body, 0, (CORD_iter_fn)f1, (CORD_batched_iter_fn)f2, info);
+			return CORD_iter5(body, 0, (CORD_iter_fn)f1, (CORD_batched_iter_fn)f2, info);
 		}
 
 		void set_pos(CORD_pos& pos, size_t index) const { CORD_set_pos(pos, body, index); }
@@ -343,6 +359,7 @@ public:
 		const char *str;
 		size_t length;
 		operator const char *() { return str; }
+		C(): str(0), length(0) {}
 		C(const char *astr, size_t asize): str(astr), length(asize) {}
 	};
 
@@ -350,6 +367,7 @@ public:
 		char *str;
 		size_t length;
 		//operator char *() { return str; }
+		Cm(): str(0), length(0) {}
 		Cm(char *astr, size_t asize): str(astr), length(asize) {}
 	};
 
@@ -359,9 +377,9 @@ private:
 	Languages langs; ///< string characters lang
 
 	const char* v() const;
-
-#define ASSERT_STRING_INVARIANT(string) \
-	assert((string).langs.invariant((string).body.length()))
+	void dump() const;
+	#define ASSERT_STRING_INVARIANT(string) \
+		assert((string).langs.invariant((string).body.length()))
 
 public: