|
|
@@ -32,27 +32,9 @@ interface
|
|
|
tarmtypeconvnode = class(tcgtypeconvnode)
|
|
|
protected
|
|
|
function first_int_to_real: tnode;override;
|
|
|
- function first_real_to_real: tnode; override;
|
|
|
- { procedure second_int_to_int;override; }
|
|
|
- { procedure second_string_to_string;override; }
|
|
|
- { procedure second_cstring_to_pchar;override; }
|
|
|
- { procedure second_string_to_chararray;override; }
|
|
|
- { procedure second_array_to_pointer;override; }
|
|
|
- // function first_int_to_real: tnode; override;
|
|
|
- { procedure second_pointer_to_array;override; }
|
|
|
- { procedure second_chararray_to_string;override; }
|
|
|
- { procedure second_char_to_string;override; }
|
|
|
+ function first_real_to_real: tnode;override;
|
|
|
procedure second_int_to_real;override;
|
|
|
- // procedure second_real_to_real;override;
|
|
|
- { procedure second_cord_to_pointer;override; }
|
|
|
- { procedure second_proc_to_procvar;override; }
|
|
|
- { procedure second_bool_to_int;override; }
|
|
|
procedure second_int_to_bool;override;
|
|
|
- { procedure second_load_smallset;override; }
|
|
|
- { procedure second_ansistring_to_pchar;override; }
|
|
|
- { procedure second_pchar_to_string;override; }
|
|
|
- { procedure second_class_to_intf;override; }
|
|
|
- { procedure second_char_to_char;override; }
|
|
|
end;
|
|
|
|
|
|
implementation
|
florian