IPB
ЛогинПароль:

> 

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

 
 Ответить  Открыть новую тему 
> Overloading ...
сообщение
Сообщение #1


Perl. Just code it!
******

Группа: Пользователи
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


Что ему не нравится ?

{$mode objfpc}

uses crt;
const n : word = 3;

type

TType = single;

PVector = ^TVector;
TVector = array [1..1] of TType;

PMatrix = ^TMatrix;
TMatrix = array [1..1] of PVector;


operator + (const a,b : PVector) v : PVector;
var
i : word;
begin
for i := 1 to n do v^[i] := a^[i] + b^[i];
end;

//....

begin
end.


impossible operator overload


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Гость






klem4, ты думаешь, FPC настолько туп, чтобы дать тебе возможность переопределять операции над указателями ??? lol.gif Не пойдет ...
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Perl. Just code it!
******

Группа: Пользователи
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


То есть переопределить операции для динамических массивов возможности нет ?


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Гость






Почему же нету? Все можно... Только пользуйся нормальной встроенной в язык поддержкой динамических массивов:
{$mode objfpc}
uses crt;

type

TType = single;

TVector = array of TType;
TMatrix = array of array of TType;

operator + (const a,b : TVector) v : TVector;
begin
// ...
end;
operator + (const a,b : TMatrix) v : TMatrix;
begin
//
end;

begin
end.

Не забудь, что ТЫ должен выделить память для результируюшего массива (или матрицы)
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5


Perl. Just code it!
******

Группа: Пользователи
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


Цитата
встроенной в язык поддержкой динамических массивов


Круто. Это только в FPC ? unsure.gif


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #6


Гость






Почему? В Дельфи тоже такое есть...
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 2.05.2024 15:17
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name