|
|
| version 1.54.2.5.2.2, 2003/03/19 16:28:08 | version 1.54.2.5.2.6, 2003/04/02 08:35:43 |
|---|---|
| Line 14 static const char* IDENT_COMPILE_TOOLS_C | Line 14 static const char* IDENT_COMPILE_TOOLS_C |
| #include "pa_vstring.h" | #include "pa_vstring.h" |
| #include "pa_vdouble.h" | #include "pa_vdouble.h" |
| ValuePtr LA2V(ArrayOperation& literal_string_array, int offset) { | Value* LA2V(ArrayOperation& literal_string_array, int offset) { |
| return literal_string_array[offset+0].code==OP_VALUE?literal_string_array[offset+1].value | return literal_string_array[offset+0].code==OP_VALUE?literal_string_array[offset+1].value |
| :ValuePtr(0); | :0; |
| } | } |
| void change_string_literal_to_double_literal(ArrayOperation& literal_string_array) { | void change_string_literal_to_double_literal(ArrayOperation& literal_string_array) { |
| if(literal_string_array[0].code==OP_VALUE) { | if(literal_string_array[0].code==OP_VALUE) { |
| ValuePtr value=literal_string_array[1].value->as_expr_result(); | Value* value=literal_string_array[1].value->as_expr_result(); |
| literal_string_array[1].value=value; | literal_string_array.put(1, value); |
| } | } |
| } | } |
| void change_string_literal_value(ArrayOperation& literal_string_array, const String& new_value) { | void change_string_literal_value(ArrayOperation& literal_string_array, const String& new_value) { |
| if(literal_string_array[0].code==OP_VALUE) { // extra safety | if(literal_string_array[0].code==OP_VALUE) { // extra safety |
| static_cast<VString&>(*literal_string_array[1].value).set_string(new_value); | static_cast<VString*>(literal_string_array[1].value)->set_string(new_value); |
| } | } |
| } | } |
| Line 36 void changetail_or_append(ArrayOperation | Line 36 void changetail_or_append(ArrayOperation |
| OPCODE find, bool with_argument, OPCODE replace, OPCODE notfound) { | OPCODE find, bool with_argument, OPCODE replace, OPCODE notfound) { |
| int tail=opcodes.count()-(with_argument?2:1); | int tail=opcodes.count()-(with_argument?2:1); |
| if(tail>=0) { | if(tail>=0) { |
| Operation& op=opcodes[tail]; | Operation& op=opcodes.get_ref(tail); |
| if(op.code==find) { | if(op.code==find) { |
| op.code=replace; | op.code=replace; |
| return; | return; |