Ещё один баг в D6

← →
Lamer@fools.ua © (2005-08-27 12:42) [0]

Код неправильный, конечно, но сообщение об ошибке впечатляет :o)

program Project1; {$APPTYPE CONSOLE} type P1 = ^T1; T1 = packed array [0 .. MaxInt div SizeOf(PAnsiChar)] of PAnsiChar; begin end.

P.S. D6.240 (update pack 2)

P.P.S. Правильно так:
program Project1; {$APPTYPE CONSOLE} type P1 = ^T1; T1 = packed array [0 .. MaxInt div SizeOf(PAnsiChar) - 1] of PAnsiChar; begin end.

← →
begin...end © (2005-08-27 12:48) [1]

> Lamer@fools.ua © (27.08.05 12:42)

В D7 -- "T1 is not a type identifier".

> сообщение об ошибке впечатляет

Ну, в каком-то смысле они правы... :-)

← →
Lamer@fools.ua © (2005-08-27 12:55) [2]

>>begin...end © (27.08.05 12:48) [1]

>D7 -- "T1 is not a type identifier".

Значит, так и не исправили.

>Ну, в каком-то смысле они правы... :-)

Забавно то, что если T1 не использовать, а только объявить, то всё ОК:

program Project1; {$APPTYPE CONSOLE} type T1 = packed array [0 .. MaxInt div SizeOf(PAnsiChar)] of PAnsiChar; begin end.

Есои не использовать то и проблемы нет, а если использовать то проблема налицо. Это уже не может быть идентификатором типа.

Ещё один баг в D6 Найти похожие ветки