Модератор: Модераторы
kazalex писал(а):Mikhail писал(а):Вот такой код будет работать?
Нет. Тут я вижу две ошибки:
1. Неправильная декларация типов строк
2. Передача в процедуру параметра не соответствующего типа
В остальном, всё должно компилироваться с кучей предупреждений.
Код: Выделить всё
type
String1251 = type AnsiString(1251);kazalex писал(а):Код: Выделить всё
type
String1251 = type AnsiString(1251);
Mikhail писал(а):Гм, даже так? Ну тогда это вдвойне не нужно.
kazalex писал(а):Mikhail писал(а):Гм, даже так? Ну тогда это вдвойне не нужно.
Декларация нового типа от существующего всегда такой была, для строк только параметр добавился. Никакой трагедии.
Код: Выделить всё
type String1251 = AnsiString(1251);Код: Выделить всё
type String12 = AnsiString(1251);Mikhail писал(а):либо непосредственно при объявлении переменной
Код: Выделить всё
var
a : Array [0 .. 10] Of Byte;
b : Array [0 .. 10] Of Byte;Mikhail писал(а):то два разных несовместимых типа?
kazalex писал(а):Код: Выделить всё
var
a : Array [0 .. 10] Of Byte;
b : Array [0 .. 10] Of Byte;
Это не декларация типа, и если у нас будет процедура с параметром аналогичной сигнатуры, то ни одну из этих переменных туда передать не удастся.
Код: Выделить всё
[doj@larion ~/temp]$ cat array_decl.pas
type
t = array[0..10] of Byte;
var
a: array[0..10] of Byte;
procedure Print1(const p: t);
begin
Writeln(p[5]);
end;
procedure Print2(const p: array of Byte);
begin
Writeln(p[6]);
end;
begin
a[5] := 15;
a[6] := 12;
Print1(a);
Print2(a);
end.
[doj@larion ~/temp]$ fpc array_decl.pas && ./array_decl
/usr/bin/ld: warning: link.res contains output sections; did you forget -T?
15
12
kazalex писал(а):Это послабление диалекта FPC, в паскале с древних времён так делать нельзя (в FPC при {$mode delphi} тоже).
Дож писал(а):будто у паскала есть некий общепризнанный стандарт
kazalex писал(а):Дож писал(а):будто у паскала есть некий общепризнанный стандарт
Де-факто есть.
Дож писал(а):Где с ним можно ознакомиться?
В том случае, если данные перед сложением не конвертируются.kazalex писал(а):При сложении строк одного типа потеря данные невозможна по определению.
Верное. Потому что компилятор правит алгоритм программы. А вдруг программа должна складывать в ansistring строки в разных, в том числе в несуществующих, кодировках? Компилятор же возьмёт и поломает работу программы.Неверное предположение. Компилятор принимает решение о конвертировании исходя из информации о типе строк.
Сперва компилятор преобразует каждую из строк в юникод-представление, чтобы избежать потери данных
Код: Выделить всё
Та часть символов, что не может быть представлена в этой кодировке будет заменена согласно стандарта на символ-заменитель, обычно это "?" для однобайтовых строк.Тут в другом вопрос, а зачем пытаться это делать, то есть зачем человеку в здравом уме писать
