![]() |
![]() |
klem4 |
![]()
Сообщение
#1
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
Что ему не нравится ?
{$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";'
|
![]() ![]() |
volvo |
![]()
Сообщение
#2
|
Гость ![]() |
klem4, ты думаешь, FPC настолько туп, чтобы дать тебе возможность переопределять операции над указателями ???
![]() |
klem4 |
![]()
Сообщение
#3
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
То есть переопределить операции для динамических массивов возможности нет ?
-------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
volvo |
![]()
Сообщение
#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.
Не забудь, что ТЫ должен выделить память для результируюшего массива (или матрицы) |
klem4 |
![]()
Сообщение
#5
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
Цитата встроенной в язык поддержкой динамических массивов Круто. Это только в FPC ? ![]() -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
volvo |
![]()
Сообщение
#6
|
Гость ![]() |
Почему? В Дельфи тоже такое есть...
|
![]() ![]() |
![]() |
Текстовая версия | 29.07.2025 17:36 |