--- parser3/src/include/Attic/code.h	2001/03/09 08:19:47	1.17
+++ parser3/src/include/Attic/code.h	2001/03/16 09:52:58	1.23
@@ -1,5 +1,9 @@
 /*
-  $Id: code.h,v 1.17 2001/03/09 08:19:47 paf Exp $
+	Parser
+	Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
+	Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
+
+	$Id: code.h,v 1.23 2001/03/16 09:52:58 paf Exp $
 */
 
 #ifndef CODE_H
@@ -10,13 +14,13 @@
 
 enum OPCODE {
 	// literals
-	OP_VALUE,  OP_CODE__STORE_PARAM,
+	OP_VALUE,  OP_CURLY_CODE__STORE_PARAM,  OP_EXPR_CODE__STORE_PARAM,
 
 	// actions
 	OP_WITH_SELF,	OP_WITH_ROOT,	OP_WITH_READ,	OP_WITH_WRITE,
 	OP_GET_CLASS,
 	OP_CONSTRUCT_VALUE, OP_CONSTRUCT_EXPR,
-	OP_WRITE,
+	OP_WRITE_VALUE,  OP_WRITE_EXPR_RESULT, OP_STRING__WRITE,
 	OP_GET_ELEMENT,	OP_GET_ELEMENT__WRITE,
 	OP_CREATE_EWPOOL,	OP_REDUCE_EWPOOL,
 	OP_CREATE_RWPOOL,	OP_REDUCE_RWPOOL,
@@ -32,7 +36,8 @@ enum OPCODE {
 	OP_BIN_AND, OP_BIN_OR, OP_BIN_XOR,
 	OP_LOG_AND, OP_LOG_OR, OP_LOG_XOR,
 	OP_NUM_LT, OP_NUM_GT, OP_NUM_LE, OP_NUM_GE, OP_NUM_EQ, OP_NUM_NE,
-	OP_STR_LT, OP_STR_GT, OP_STR_LE, OP_STR_GE, OP_STR_EQ, OP_STR_NE
+	OP_STR_LT, OP_STR_GT, OP_STR_LE, OP_STR_GE, OP_STR_EQ, OP_STR_NE,
+	OP_IS
 };
 
 union Operation {