On 28 Mar 2008, at 07:47, Martin Schreiber wrote:

What is wrong with this code:
"
program rangeerror;
{$ifdef FPC}{$mode objfpc}{$h+}{$endif}
{$ifdef mswindows}{$apptype console}{$endif}
uses
{$ifdef FPC}{$ifdef linux}cthreads,{$endif}{$endif}
sysutils;
type
colorty = type longword;
const
cl_mapped = colorty($90000000);
type
ttestclass = class
 private
  fcolor: colorty;
 published
property color: colorty read fcolor write fcolor default cl_mapped; //<<--
end;
begin
end.

It compiles again. Unrelated (because I think such declarations are broken for fpu types/values): what code do you have to write so that this default value is actually used?


Jonas
_______________________________________________
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel

Reply via email to