--- parser3/src/main/compile.C	2002/02/19 14:14:16	1.60
+++ parser3/src/main/compile.C	2002/08/01 11:41:17	1.65
@@ -3,10 +3,10 @@
 
 	Copyright (c) 2001, 2002 ArtLebedev Group (http://www.artlebedev.com)
 	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
-
-	$Id: compile.C,v 1.60 2002/02/19 14:14:16 paf Exp $
 */
 
+static const char* IDENT_COMPILE_C="$Date: 2002/08/01 11:41:17 $";
+
 #include "pa_opcode.h"
 #include "pa_request.h"
 #include "pa_string.h"
@@ -62,16 +62,9 @@ VStateless_class& Request::real_compile(
 			pc.line--;
 			pc.col=-1;
 		} 
-		throw Exception(0,0,
+		throw Exception("parser.compile",
 			0,
-#ifndef NO_STRING_ORIGIN
-			"%s(%d:%d): "
-#endif
-			"%s", 
-#ifndef NO_STRING_ORIGIN
-			file, 1+pc.line, pc.col, 
-#endif
-			pc.error);
+			"%s(%d:%d): %s",  file, 1+pc.line, pc.col,  pc.error);
 	}
 
 	// result